VB 编程通过互联网 连接 SQL server 2000 数据库

Question

求问高手：怎样VB编程通过互联网 连接 SQL server 2000 数据库，在线传输数据库中的数据

Answer 1

能否给一方法，怎样连接互联网中的服务器。客户端通过ADSL上网，然后在线传输本地sql server 200 数据库中的数据到服务器的数据库中。
非常感谢！

Answer 2

互联网中的服务器的ip地址和本机的ip地址如何通讯？请指教

Answer 3

服务器是有两块网卡，两个IP地址的，一个用于内网，一个用于外网，在内网输入内网的IP就可以访问的到，在外网输入外网的IP地址就可以访问。

Answer 4

Public SQLCN As New ADODB.ConnectionPublic Function InitSQLConnect() As Boolean'初始化ＳＱＬ连接
  
   On Error GoTo ErrHandle
   
   InitSQLConnect = True
     
   SQLCN.Provider = "SQLOLEDB"
   
   SQLCN.Properties("Data Source") = Server     '(或IP)
   SQLCN.Properties("Initial Catalog") = DataBase
   
   If SSPI = 0 Then  '验证模式,0为混合模式,1为NT模式
      SQLCN.Properties("User ID") = UserName
      SQLCN.Properties("Password") = PassWord
   Else
      SQLCN.Properties("Integrated Security") = "SSPI"
   End If
   
   SQLCN.Open
   
   Exit Function
   
ErrHandle:
   
   InitSQLConnect = False
   MsgBox Err.Description, vbCritical, "连接SQL Server失败"End Function在互联网跑数据,建议使用VPN安全,数据库连接方法还是一样

Answer 5

SSPI根据预定义的验证模式来选择
If SSPI = 0 Then  '验证模式,0为混合模式,1为NT模式
      SQLCN.Properties("User ID") = UserName
      SQLCN.Properties("Password") = PassWord
Else
      SQLCN.Properties("Integrated Security") = "SSPI"
End If
二者选一即可