UC知道VB用ADODB连接远程SQL数据库
来源：百度知道 编辑：UC知道 时间：2024/05/30 13:15:00
我在局域网内的一台电脑A上安装了SQL SERVER 2005，A的IP为：192.168.29.21，我在A上通过数据库自带的管理工具建立了一个名为dsy的数据库，里面有一个表名为login的表。
然后我在局域网内的另一台电脑B上用VB通过ADODB连接该数据库，B的IP为192.168.29.4，我是需要通过ADODB来实现连接，我不希望去配置ODBC数据源。
那么，在编程之前，我的电脑A和电脑B分别应做怎样的设置，程序代码应该如何写呢？我只需要能连接上就可以了。
刚才忘说了，电脑A的用户名为YEOSN，安装在其上的SQL服务器名也为YEOSN，采用SQL SERVER身份验证登陆，登陆名为：sa，密码为：abc
我按照 kingson88 的方法做了，可是总是提醒我“一般性网络错误。请检查网络文档”，这是什么原因呢？我引用了"Microsoft ActiveX Data Objects 2.6 Library" ，并且已经禁用了电脑A的防火墙。
然后我在局域网内的另一台电脑B上用VB通过ADODB连接该数据库，B的IP为192.168.29.4，我是需要通过ADODB来实现连接，我不希望去配置ODBC数据源。
那么，在编程之前，我的电脑A和电脑B分别应做怎样的设置，程序代码应该如何写呢？我只需要能连接上就可以了。
刚才忘说了，电脑A的用户名为YEOSN，安装在其上的SQL服务器名也为YEOSN，采用SQL SERVER身份验证登陆，登陆名为：sa，密码为：abc
我按照 kingson88 的方法做了，可是总是提醒我“一般性网络错误。请检查网络文档”，这是什么原因呢？我引用了"Microsoft ActiveX Data Objects 2.6 Library" ，并且已经禁用了电脑A的防火墙。
CnStr = "Provider=SQLOLEDB;Data Source=" & DbIp & ";DATABASE=" & DbName & ";UID=" & DbUser & ";pwd=" & DbPw
DbIp ip地址
DATABASE 数据库名字
DbUser 用户名
DbPw 密码
Dim conn As New ADODB.Connection
CnStr = "Provider=SQLOLEDB;Data Source=192.168.29.21;DATABASE=dsy;UID=sa;pwd=abc"
Conn.Open cnstr
Sql = "select * from 表名" 'SQL查询语句
Set rs = New ADODB.Recordset '新建一个记录集实例
rs.Open Sql, conn, 1, 3 '后面的3是确定读写权限的
不应该叫做“远程”
你的这个叫做基于WEB的软件。