vb 局域网ACCESS数据库

来源：百度知道 编辑：UC知道 时间：2024/06/23 14:26:23
求一个局域网内，可以对服务器ACCESS数据库 修改添加的简单的程序。也可RMB求做一个..有意发站内短信我

没那么复杂，你要的话给你来一个。

Set DB1 = OpenDatabase("\\server\share" & "\" & "data\xxxx.MDB")
这是我用vba调用时用的，希望对你有用

你可以去 http://www.codesky.net/ 找个实例，如果你要对局域网的数据库进行修改，那么数据路径前加上 服务器的IP 就可以了

大概的语句如下
sub test()
dim cn as adodb.connection
dim rs as adodb.recordset
set cn=new adodb.connection
cn.open "Driver={Microsoft Access Driver (*.mdb)};DBQ=你的数据库路径全称.mdb;UID=Admin;PWD=数据库密码"
set rs=new adodb.recordset
rs.open 查询语句,cn,4,2-----------------------查询语句
cn.execute 非查询语句-------------------------非查询语句
set rs=nothing
set cn=nothing
end sub
如果有具体需求可以给我发邮件。