作者： | 来源：互联网 | 2023-09-01 13:32
请各位大侠帮忙，何如链接远程的sql 2000数据库啊？在线等！
16 个解决方案
dataBaseName = "数据库名称"
dataBaseUserID = "用户名"
dataBaseUserPWD = "密码"
dataBaseIP = "远程IP"
ConnStr = "Provider = Sqloledb; User ID = "&dataBaseUserID&";Password = "&dataBaseUserPWD&"; Initial Catalog = "&dataBaseName&"; Data Source = "&dataBaseIP&";"
Set conn = Server.CreateObject("ADODB.Connection")
conn.open ConnStr
如果是本地的，IP可以写成local或是.
如果服务器里面设置不允许远程连接，你要是写成IP就连不上了。
如果以上代码不好使。
有可能是用户名密码不对。
再有可能就是不允许远程连接，自己看看吧。
<%
dim conn
dim connstr
'on error resume next
connstr = "DRIVER=SQL Server; SERVER=192.168.1.8; UID=qw; password=afdfa; DATABASE=MYDB;"
set cOnn=server.createobject("ADODB.CONNECTION")
if err.number<>0 then
err.clear
set cOnn=nothing
response.write "数据库连接出错！"
Response.End
else
conn.open connstr
if err then
err.clear
set cOnn=nothing
response.write "数据库连接出错！"
Response.End
end if
end if
sub endConnection()
conn.close
set cOnn=nothing
end sub
%>
其中SERVER=192.168.1.8中的192.168.1.8为你要连接的远程数据库的地址 UID=qw; password=afdfa; DATABASE=MYDB
UID为数据库SQL登录用户名 password为密码 DATEBASE为要连接的数据库名
但是还是不行啊，还试有错误：
Microsoft OLE DB Provider for ODBC Drivers 错误 '80004005'
[Microsoft][ODBC SQL Server Driver][DBNETLIB]SQL Server 不存在或访问被拒绝
你说的这种情况有可能是 数据库的权限问题或者是网络设置的问题 你应该是在局域网吧 那你 ping 下你所要访问数据库的IP地址
或者你在看看你在程序里把你要访问的数据库的名称是否写对了
这个不是程序问题，你在本地用SQL server也是连不上的
是不是考虑建立一个服务器连接，
[手工添加:] SQL SERVER企业管理器—>服务器—>安全性—>链接服务器—>新建—>常规选项页—>填写链接服务器名或IP,服务器类型选SQL SERVER—>安全性选项页—>用此安全上下文进行，填写登陆数据库的登录名和密码，OK.
接着再按 1，5，7楼的代码连接，试看...
京公网安备 11010802041100号