VB连接远程服务器方法
PrivateSubcmdConnect_Click()DimcnAsADODB.ConnectionSetcn=NewADODB.Connectioncn.Open"P...
Private Sub cmdConnect_Click()
Dim cn As ADODB.Connection
Set cn = New ADODB.Connection
cn.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=d:\sqbt\vb\db1.mdb;"
If cn.State = adStateOpen Then
MsgBox "连接成功！"
Else
MsgBox "连接失败！"
End If
cn.Close
Set cn = Nothing
End Sub
上面是连接本地服务器的源码，可以正常连接。
现在想连接远程服务器：（假设）IP地址：60.160.221.89
（还需要填写远程服务器的密码吗？假设，密码：123456）
请问在上面源码上直接修改可以吗，怎样编写；
如不能修改，怎样重新编写，谢谢...
假设，
IP地址：60.160.221.89
用户名：admin
密码：123456
数据库：abc\def\db1.mdb 展开
Dim cn As ADODB.Connection
Set cn = New ADODB.Connection
cn.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=d:\sqbt\vb\db1.mdb;"
If cn.State = adStateOpen Then
MsgBox "连接成功！"
Else
MsgBox "连接失败！"
End If
cn.Close
Set cn = Nothing
End Sub
上面是连接本地服务器的源码，可以正常连接。
现在想连接远程服务器：（假设）IP地址：60.160.221.89
（还需要填写远程服务器的密码吗？假设，密码：123456）
请问在上面源码上直接修改可以吗，怎样编写；
如不能修改，怎样重新编写，谢谢...
假设，
IP地址：60.160.221.89
用户名：admin
密码：123456
数据库：abc\def\db1.mdb 展开
展开全部
ACCESS数据消裂核库是没有办法远程直接访源老问的
可以做拿掘中转或换成其他类型数据库，比如，MSSQL
可以做拿掘中转或换成其他类型数据库，比如，MSSQL
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
|
广告 您可能关注的内容 |
