VB 自动化错误 automation 错误!
添哥爱自己 2013-12-24 09:11:24 Sub testaaa()
Dim i As Long, j As Long, t As Long, sht As Worksheet
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim strCn As String
Dim strSQL As String
Dim jo As Boolean
strCn = "Provider=sqloledb;Server=SQLSEVER;Database=AAADDD;Uid=sa;Pwd=123456;"
cn.Open strCn
strSQL ="update icstockbill set fbilleriD=11"
rs.Open strSQL, cn
小弟在做excel修改数据库的时候,如果在AAADDD这个数据库运行strSQL的话 就会出现
运行时错误‘-2147467259(80004005)’
自动化(automation)错误
但是在别的数据库BBBCC就不会,求大神指导。两个数据库是一样的 ,是我备份出来。