VB连接远程ACC数据库问题

来源:百度知道 编辑:UC知道 时间:2024/05/26 16:58:08
下面是连接远程数据库用的连接语句
dim mycn As New ADODB.Connection
dim myre As New ADODB.Recordset
dim str As String
str = "Provider=MS Remote;Remote Server=http://*.*.*.*;"
str = str & "Remote Provider=Microsoft.Jet.OLEDB.4.0;"
str = str & "Data Source=d:\www\data\yuebank.mdb;"
str = str & "Persist Security Info=False"
mycn.Open str
myre.open "select * from bank ", mycn
Text1.Text = myre.Fields("username")

连本地的就可以,一连网上<myre.open "select * from bank ", mycn >就会显示为黄色,和出现下面错误
internet服务器错误:找不到对象或模块

假如你是局域网。可以使用\\的形式。假如你是Internet不可以这样。有两种方法。1使用VPN虚拟网专线。然后就象本地局域网一样连接。2使用winsock控件。或者winsockapi函数。来进行远程通讯。一般是转换成byte进行传输。