vb访问远程access

来源:百度知道 编辑:UC知道 时间:2024/05/05 17:42:26
怎么实现,麻烦会的给写个程序。数据文件存放在D盘db文件夹中。谢谢大家了。
CnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= \\192.168.2.36\D$、Db\EventLog.mdb;Jet OLEDB:Engine Type=5"
上面的不对。
可以实现的还有加分
我要的是具体的,直接把程序写出来。

CnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= \\192.168.2.36\D$\Db\EventLog.mdb;Jet OLEDB:Engine Type=5"
语句没问题,但是不要用D$\db\eventlog.mdb 的管理共享,新建个共享,权限设置为everyone,完全控制,然后在运行数据库连接过程之前运行
shell "cmd.exe /c net use \\ip\d$ 密码 /user:用户名"来先进行连接
或运行
shell "cmd.exe /c net use h:\\ip\d$ 密码 /user:用户名"将远程共享映射为本地h盘,之后按本地数据库进行操作!

你这样写\\192.168.2.36\D$、,以后在别的机子或是换了IP的话就不能用了,access不支持远程,不过可以换一个思路。我现在就是把所有的需要连接数据库的客户端的数据库路径都写为Z:\数据库\..mdb。然后在你的程序里添加一个窗体名为数据库连接设置,在这个窗体里面,你自己设置映射网络驱动器或者是调用windows的映射网络驱动器,在数据库存放的电脑那里新建一个用户,比如A,并把数据库的分区设为完全共享,权限为只有A。然后在客户机里面也建立相同的用户A,然后映射为磁盘Z就可以了。Shell "net user 用户名 密码 /add /passwordchg:no /expires:never" 这是建立用户的批处理,用VB SHELL调用,你可以放到程序的数据库设置里面,点击后就建立了用户。 还可以用VB把用户A隐藏,这样能保证数据库的那台电脑的安全

cnStr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\\192.168.2.36\D$、Db\EventLog.mdb;Persist Security Inf