Menggunakan database apa ? Saya pake Access. Kalau mau buka di 
komputer lain, selama dia di share ga masalah. Caranya cukup buat 
variable alamat koneksi, dan untuk melakukan koneksi, pakai common 
dialog, pada properties pagenya isi seperti ini

Filter = Access Data|*.mdb

Defaultext=*.mdb

kemudian set variable misalkan Koneksi as string

commondialog1.ShowOpen
koneksi = commondialog1.FileName

if koneksi<>"" then

' call connection

    dim cn as adodb.connection

    Set cn = New ADODB.Connection
    If cn.State = adStateOpen Then cn.Close
    cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data 
Source=" & koneksi & ";Jet OLEDB:Database Password=qsources;Persist 
Security Info=False"
    cn.CursorLocation = adUseClient
    cn.Open


Mudah2n bisa


Kirim email ke