To:xwtao(飞雪)定义了 Dim conn As ADODB.Connection 引用的是ADO库2.5 我试过Acess连接,没问题的
我的代码 Dim conn As Connection Dim rs As Recordset Dim fld As Field Dim sql As String 'connect to MySQL server using MySQL ODBC 3.51 Driver Set conn = New ADODB.Connection conn.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};" & _ "SERVER=localhost;" & _ "DATABASE=test;" & _ "UID=root;PWD=;OPTION=3" conn.Open 这是MySQL4.18手册上的例子啊
To: xwtao(飞雪)我查过了,就是只引用了ADO2.5 运行到 conn.Open就出错实在想不通啊!!!!
To: fenghua2003(094核子潜艇) 补丁我装了,可以连接上,ADODB.Connection命令集执行没问题。 可是ADODB.Recordset的执行有问题,如下: rs.close rs.Open "select * from my_ado", conn, adOpenDynamic, adLockOptimistic rs.AddNew rs!Name = "Monty" '程序停在此处!!! rs!txt = "Insert row" rs.Update rs.Close提示:“Multiple-step OLE DB operation generated errors.Check each OLE DB status valuse,if available,no work was done."
你这个问题与MySQL ODBC Coonector没有关系了。 这与你执行SQL操作有关。改用insert into 语句代替Addnew方法看看。 用AddNew的时候,只要有一个字段插入失败就整个操作不能进行。你最好检查一下每个字段的类型和你要插入的值是否相符?
引用的是ADO库2.5
我试过Acess连接,没问题的
Dim conn As Connection
Dim rs As Recordset
Dim fld As Field
Dim sql As String 'connect to MySQL server using MySQL ODBC 3.51 Driver
Set conn = New ADODB.Connection
conn.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};" & _
"SERVER=localhost;" & _
"DATABASE=test;" & _
"UID=root;PWD=;OPTION=3" conn.Open 这是MySQL4.18手册上的例子啊
运行到 conn.Open就出错实在想不通啊!!!!
Cnmysql.ConnectionString = "uid=root;pwd=;dsn=build"
Cnmysql.Open
我的系统没有ADO2.6我用RDO2.0试过,可以连接和操作.可ADO不行.郁闷ing!!!!
access和sql server都可以连接成功的。
试验一下通过named-pipe连接
str = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=192.168.2.8;PORT=3306;DATABASE=sales;USER=root;PASSWORD=;OPTION=3;"
conn.Open str
http://www.cnblogs.com/netelite/archive/2005/01/30/99458.html
可是ADODB.Recordset的执行有问题,如下: rs.close rs.Open "select * from my_ado", conn, adOpenDynamic, adLockOptimistic
rs.AddNew
rs!Name = "Monty" '程序停在此处!!!
rs!txt = "Insert row"
rs.Update
rs.Close提示:“Multiple-step OLE DB operation generated errors.Check each OLE DB status valuse,if
available,no work was done."