高分请教！！vb怎样通过OLE DB（不用ODBC）远程访问SQL Server？急！！！要源码！

Question

set conn=server.createobject("ADODB.connection")
   conn.open "Provider=SQLOLEDB;Data Source=192.0.0.12;DATABASE=nbw;uid=sa;pwd="   Set rs=Server.CreateObject("ADODB.Recordset")
   
Sqlstr="Select * from nbtz where tz_sfsc=0 order by tz_date desc "
   
   rs.Open sqlstr, conn ,3,1这个一点问题没有。

Answer 1

不好意思，我是在ASP里的，VB 里也一样。

Answer 2

con.open"Remote Provider=sqloledb或Microsoft.Jet.OLEDB.4.0;Remote Server=IP地址"

Answer 3

你这不叫远程连接.
你可以参考这个:
Dim con As New Connection
con.Open "Provider=sqloledb;data source=192.168.0.2;initial catalog=master;user id =sa"

Answer 4

Dim con As New Connection
con.Open "Provider=sqloledb;data source=192.168.0.2;initial catalog=master;user id =sa"Provider数据提供者
data source 是sql server服务器的名称，可以是ip，可以是服务器名
initial catalog 是注册数据库的名称
user id 是用户名

Answer 5

Provider=SQLOLEDB.1;Data Source=" + strDataSrv + ";uid=" + strDataUid + ";pwd=" + strDataPwd + ";Initial Catalog="＋strDataBase 
strDataSrv 机器名或者是IP
strDataUid 用户名
strDataPwd 密码
strDataBase 数据库名