vb6去mysql..

melvin_tee

我用access的话就没问题~
但是用mysql的话呢，program 可以进到，但是edit不到。。

以下是code

Public Function iOpenDatabase(IsReadOnly As Boolean) As Database
Dim dbs As Database
On Error GoTo errdet

Set dbs = OpenDatabase(SERVER, False, IsReadOnly, "DRIVER={MySQL ODBC 3.51 Driver}; SERVER=SERVER; PORT=3306; DATABASE=sims; Uid=root; Pwd=ablesoft; OPTION=3")
Set iOpenDatabase = dbs
Exit Function

errdet:
MsgBox Err.Description, vbInformation, MsgTitle
End
End Function

melvin_tee

这些是我的configure...

melvin_tee

都是跟default走，不能的？
我第二张的有换，如果选option 1，就不能update；如果选option 2，找不到database...