7,763
社区成员
发帖
与我相关
我的任务
分享
'安装mysql驱动
With g_strDBConn
If .State = adStateOpen Then .Close
.ConnectionString = " DRIVER={MySQL ODBC 5.1 Driver};" _
& " SERVER=" & Trim(txtcServerName.Text) & ";" _
& " DATABASE=" & Trim(txtcDatabaseName.Text) & ";" _
& " UID=" & Trim(txtcLoginName.Text) & ";" _
& " PWD=" & Trim(txtcLoginPassword.Text) & ";" _
& " stmt=SET NAMES GB2312"
.CommandTimeout = 0
.Open
End With