vb如何连接远程数据库

例如;远程SQLSERVER

连接字符串为:

Provider=SQLOLEDB.1;Password=密码;Persist Security Info=True;User ID=用户名;Initial Catalog=数据库名称Data Source=远程主机IP

1.引用ADO
2.定义连接
Dim Conn as New Connection
3.设置连接串
Conn.Open "Provider=SQLOLEDB;Data Source=数据库服务器IP或名称;UID=登录用户名;PWD=登录密码;initial catalog=数据库的名称"