vb sqlserver 如何远程连上 互联网的数据库?

Question

有许多种方法：
一种是用ADO
另一种是用ODBC，许多方法。

Answer 1

兄弟，我来吧！
可以啊！
1。odbc
在添加数据库时，不是有一个要求填写服务器的嘛，在这里只要你写上服务器的ip地址就可以了，然后后面就象在本地一样的
2。ado
    dim cnn as ADODB.Connection
    Set cnn = New ADODB.Connection
    cnn.ConnectionTimeout = 5
    cnn.Open "PROVIDER=SQLOLEDB.1;User ID=" & strDBUser & ";Password=" & strDBUserPsd _
            & ";Initial Catalog=" & strDBName _
            & ";Data Source=" & sServerName
    
    其中在sServerName输入你的服务器的ip 也就好了
如果很难明白的话，我就给你一个例子，要吗

Answer 2

我有一种方法，是用来联接SQL-SERVER数据库的。可先在服务器端建立SQL XML支持。
（开始\程序\Microsoft SQL Server\在IIS中配置SQL XML支持)
然后在本地VB代吗中直接用SQL语句联接XML支持，获取数据。示例：
private Const HTTP_LINK = "http://www.xxx.com/所建支持的名称?sql="
private XMLDOC_Data As DOMDocument30Dim sSql As StringDim i As Integer, sFields As String
Dim xFirstChild As IXMLDOMNode
sSql = HTTP_LINK
sSql = sSql & "SELECT+*+"
sSql = sSql & "FROM+v_trans_ro"Set XMLDOC_Data = New DOMDocument30
XMLDOC_Data.async = False
XMLDOC_Data.Load (sSql)这样通过解析XMLDOC_DATA就能获得数据了。还有方法就是用ADO直接联，这样的例子很多，你在网上找找吧。

Answer 3

前辈,给我个例子吧,[email protected]

Answer 4

例子:  Dim remoters As ADODB.Recordset
 Dim remoteconn As ADODB.Connection
 Dim ConnectString As String
 
 ConnectString = "driver={SQL server};server=服务器IP地址;uid=用户名;pwd=密码;database=数据库名"  '连接字符串
 Set remoteconn = New ADODB.Connection
 remoteconn.Open ConnectString  '打开连接
 Set remoters = New ADODB.Recordset  
 remoters.Open "select * from zblb", remoteconn, 1, 3  '打开记录集
 ......