下面是我的一个小的测试程序,单击按钮后,有错文提示:对象ee无效.
如果去掉b.Open "select * from ee", a这句,没有错误,所以我觉得数据库还是能连上,但是不知道为甚还是会出错.请高手给看看了,多谢!!
Private Sub Command1_Click()
Dim a As New ADODB.Connection
Dim b As New ADODB.Recordset
Dim ss As String
ss = "uid=sa;pwd=aaa;driver={SQL SERVER};server=YQQ;datebase=wy;connection=adConnectAsync"
a.ConnectionString = ss
a.Open
b.Open "select * from ee", a
End Sub

解决方案 »

  1.   

    去掉ee这句你真的能确定你的数据库能连接?
    你还是msgbox a.state来判断吧
      

  2.   

    大哥能不能介绍一下state的取值啊,多谢了!
      

  3.   

    如果以你上面的语句可以连接上,那就有点问题了,你的关键字就有错的。ss = "uid=sa;pwd=aaa;driver={SQL SERVER};server=YQQ;
    datebase=wy;connection=adConnectAsync"
    好像database就写错了,我想应该不行吧!这样找不到数据库名啦!
      

  4.   

    老兄,我没写错是你看错了,我测试了之后state的值确实是1啊.
      

  5.   

    我这边没有SQLSERVER,有谁给测测datebase=到底能不能连上数据库,从楼主得到的state值说明确实已经连接上了,至于说ee无效,我想是不是没有ee这个表啊?不过楼主不至于范这么低级的错误吧?
    郁闷!
      

  6.   

    楼主确实贴的是datebase,我看资料上都写的是database。还有我对这种连接字符串不是很熟悉,就不敢乱说了。还请高人指点。