ADO连接MYSQL出现灾难性故障!!
开发环境:
win2000,
mysql4.1,
vb6.0,
MyODBC-3.51.10-2-win
现装在同一台机子上。用ADO连接的时候出现灾难性故障.连接的代码如下:Private Sub ado_Click()
Dim g_Cn As ADODB.Connection
Set g_Cn = New ADODB.Connection
'设置服务器名称,数据库名称,登录名
Dim ServerName As String, DBName As String, UserName As String, strPwd As String
ServerName = "server1"
DBName = "testdb"
UserName = "test"
strPwd = "test"
'连接到数据库
With g_Cn
.ConnectionString = "DRIVER={MySql ODBC 3.51 Driver};SERVER=" & ServerName & ";DATABASE=" & DBName & ";UID=" & UserName & ";PWD=" & strPwd & ";OPTION=0"
.Open
End With
End Sub
开发环境:
win2000,
mysql4.1,
vb6.0,
MyODBC-3.51.10-2-win
现装在同一台机子上。用ADO连接的时候出现灾难性故障.连接的代码如下:Private Sub ado_Click()
Dim g_Cn As ADODB.Connection
Set g_Cn = New ADODB.Connection
'设置服务器名称,数据库名称,登录名
Dim ServerName As String, DBName As String, UserName As String, strPwd As String
ServerName = "server1"
DBName = "testdb"
UserName = "test"
strPwd = "test"
'连接到数据库
With g_Cn
.ConnectionString = "DRIVER={MySql ODBC 3.51 Driver};SERVER=" & ServerName & ";DATABASE=" & DBName & ";UID=" & UserName & ";PWD=" & strPwd & ";OPTION=0"
.Open
End With
End Sub
connStr = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=10.168.41.39;PORT=3306;DATABASE=mygame;
USER=root;PASSWORD=;OPTION=3;"但是系统提示“灾难性故障”,晕~~~http://community.csdn.net/Expert/topic/3732/3732149.xml?temp=.4265253
我的帖子100分,哪位帮忙解决了,一块给了,呵呵