VBGood网站全文搜索 Google

搜索VBGood全站网页(全文搜索)
首页 - 经验之谈 - 如何连接远程数据库(internet上的数据库服务器)?
发表评论(0)作者:不详, 平台:VB6.0+Win98, 阅读:14347, 日期:2001-06-19
kwq_cn 问:
在VB中,如何连接远程数据库(internet上的数据库服务器)?

Richard 答:
Dim cn As ADODB.Connection
Set cn = New ADODB.Connection
cn.Open "Provider=SQLOLEDB.1;Persist Security Info=True;User ID=YourUserName;Password=YourPassword;Initial Catalog=远程数据库名;Data Source=远程服务器的IP地址(如172.00.00.000)"

如:(SQL Server)
cn.Open "Provider=SQLOLEDB.1;Persist Security Info=True;User ID=WanLing;Password=Wan1234;Initial Catalog=资产管理系统2000;Data Source=199.88.111.345"

蚂蚱先生 答:
dim cn as new connection
cn.open "Provider=Ms Remote;Remote server =http://www.my.com;Remote Provider=MSDASQLl;Dsn=Pubs"
dim re as new recordset
re.cursorlocation=aduseclient
re.open tablename,cn,adopenstatic,adlockbatchoptimistic,adcmdtable