使用VB连接本地SQL问题

Question

小弟初学VB,这个论坛也是初来乍到~ 希望各位达人今后能多多指教
那句用VB连接数据库的代码是什么来着?
我是局域网分布的IP192.168.0.123
Provider=SQLOLEDB.1;Password=;Persist Security Info=True;User ID=sa DataSource=192.168.0.123
这句话老报错哦 也不知道什么原因~  SQL是混合验证 没密码 用户名是sa
在线等~ 谢谢拉

Answer 1

你在工程部件里先引用“Micrcsoft ADO Data Control…”，
然后在窗体上拉一个 ADODC 控件，连接数据库测试一下，
如果测试成功，把连接字符串拷过去就行了

Answer 2

没引用ADO对象造成的，否则不可能报错。

Answer 3

LZ的连接没有指定数据库，可以参考下面的连接：'引用ADO(Microsoft ActiveX Data Objects 2.X Library)
Private Sub Command1_Click()
    On Error GoTo err
    Dim cn As New ADODB.Connection
    '有密码的连接：
    'cn.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=登陆用户名;Password=登录密码;Initial Catalog=数据库名;Data Source=服务器别名/IP"
    '无密码的连接：
    cn.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=数据库名;Data Source=服务器别名/IP"
    cn.Open
    ....
    Exit Sub
err:
    MsgBox err.Description
End Sub