Salam rekan-rekan,
Mohon informasinya, saya membuat sebuah project dengan VB6 dan Database MySql.
Ketika saya koneksi ke server local (127.0.0.1) program berjalan lancar dan
cepat sekali, namun ketika Database sudah ada di Server atau komputer lain
dengan koneksi IP program berjalan namun ketika membuka koneksi lama sekali
10-20 detik .
mohon pencerahannya. koneksi saya seperti ini :
Set strCon = New ADODB.Connection
Dim StrString As String
Dim ser, user, pass, db, soc, pro As String
ser = "10.0.0.1" 'ip komputer server
db = "mydb"
user = "myuser"
pass = "mypass"
soc = "UTF8"
pro = "UNIX"
StrString = "DRIVER={MySQL ODBC 5.1 Driver};SERVER=" & ser & ";DATABASE=" & db
& ";UID=" & user & ";PWD=" & pass & ";Protocol=" & pro &
";port=3306;OPTION=2105"
strCon.Open StrString
strCon.CursorLocation = adUseClient
Exit Sub
err:
MsgBox "Sistem belum terhubung ke server..!", vbOKOnly + vbInformation, "My
Project"
End Sub
Server melayani sekitar 70 user, saya baru coba satu client udah lambat. help
.dong rejan-rekan.?
