具体错误是什么? 下面的代码可以参考: dim conn as new adodb.connection With conn If .State = adStateOpen Then .Close .ConnectionString = "driver=SQL Server;server=SQL实例名;uid=SA;pwd=SA的密码;database=数据库名" .CommandTimeout = 0 .Open End With
我估计还是数据库的链接的问题,链接字串应该没错……查询是老是显示无效的过程调用……很纠结啊 Private Sub Form_Load() Dim connectionstring As String connectionstring = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=carsshale;Data Source=(local)"conn.Open connectionstring cnt = 0 End Sub 这是链接字串……
下面的代码可以参考:
dim conn as new adodb.connection
With conn
If .State = adStateOpen Then .Close
.ConnectionString = "driver=SQL Server;server=SQL实例名;uid=SA;pwd=SA的密码;database=数据库名"
.CommandTimeout = 0
.Open
End With
Private Sub Form_Load()
Dim connectionstring As String
connectionstring = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=carsshale;Data Source=(local)"conn.Open connectionstring
cnt = 0
End Sub
这是链接字串……
显示在哪一句上?我也没看到里面调用过程啊?唯一说的过去的是conn.Open connectionstring,如果你定义了conn的话也不会出现无效的调用过程吧.