服务器没问题,因为网页调用都很快,就是用VB的ADODB调用时连接的特别久,好慢
代码如下:
strCn = "DRIVER={MYSQL ODBC 3.51 DRIVER};" & "SERVER=" & dbhost & ";" & "DATABASE=" & dbdata & ";" & "UID=" & dbuser & ";" & "PWD=" & dbpass & ";" & "OPTION=3;stmt=SET NAMES GB2312"
con.ConnectionString = strCn
con.Open
Dim sql As String
sql = "select RegCode from DaySystem "
rst.Open Trim(sql), con, adOpenDynamic, adLockOptimistic
就是在OPEN这个地方调用时特别的慢,都要十几秒以上。这是客户端上连接
代码如下:
strCn = "DRIVER={MYSQL ODBC 3.51 DRIVER};" & "SERVER=" & dbhost & ";" & "DATABASE=" & dbdata & ";" & "UID=" & dbuser & ";" & "PWD=" & dbpass & ";" & "OPTION=3;stmt=SET NAMES GB2312"
con.ConnectionString = strCn
con.Open
Dim sql As String
sql = "select RegCode from DaySystem "
rst.Open Trim(sql), con, adOpenDynamic, adLockOptimistic
就是在OPEN这个地方调用时特别的慢,都要十几秒以上。这是客户端上连接
Driver=MySQL ODBC 5.1 Driver;SERVER=Localhost;UID=root;PWD=**;DATABASE=c1;PORT=3306
[mysqld]下增加
skip-name-resolve