vb与server 2000连接，代码是书上的，怎么连不上

以凯歌之名发布于 2012-12-02 22:00， 451 次点击

Public objconnection As New adodb.Connection
Public objrecordset As New adodb.Recordset
Sub main()
objconnection.ConnectionString = "provider=sqloledb.1;persist security info=false;user id=sa;initial catalog=hang card ;data source=(local)"
objconnection.Open
frmmain.Show

End Sub
Public Sub execute(spl As String)
objconnection.execute spl
End Sub
Public Sub records(sql As String)
Set objrecordset = objconnection.execute(sql)
End Sub
这段代码是书上的，为什么显示用户sa登录失败，或是连接失败什么的，求高手指点

5 回复

以凯歌之名2012-12-02 22:41

我已经把sqlserver2000安装了sp4补丁。但是，在服务器端网络实用工具中没有任何协议。
但是在客户端的网络实用工具中有

怎么解决啊？

bczgvip2012-12-02 22:48

;data source=(local)"
(local) 自己更改

bananas2012-12-03 09:03

初步看来是你的服务器设有密码你没有输入，或是登录方式不对，在SQL2000的服务管理器里改一下

以凯歌之名2012-12-03 13:41

回复 3楼 bczgvip

关键是在服务器端网络实用工具中没有任何协议。但是在客户端的网络实用工具中有。这个咋解决啊
还有就是我虽然连了数据库，但是根本没有往server里写数据，怎么解决？新手，不要见笑啊。。。

[ 本帖最后由以凯歌之名于 2012-12-3 13:43 编辑 ]

以凯歌之名2012-12-03 13:45

回复 4楼 bananas

关键是在服务器端网络实用工具中没有任何协议。但是在客户端的网络实用工具中有。这个咋解决啊
还有就是我虽然连了数据库，但是根本没有往server里写数据，怎么解决？新手，不要见笑啊。。。