VB 网络访问Access的有关问题?

VB 网络访问Access的问题??
我现在用VB访问数据库,数据库是放在局域网的服务器上(或者局域网中的一台机子上)。我现在想让局域网中的其他机子都能访问这个数据库。该如何建立链接。
我实现的方法是把数据库是放在局域网中的一个共享目录下(我指定的一台机子
Public cn As ADODB.Connection 
Set cn = New ADODB.Connection 

Dim db As String 
db = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=true;Data Source=\\MyName\数据库\数据库.mdb" 
cn.CursorLocation = adUseClient 
cn.Open db 
Set rs = New ADODB.Recordset 
Set rst = New ADODB.Recordset 
但这样要设置共享的权限。造成了数据库的很不安全
请问大家,不用共享文件该如何访问?
请会的朋友帮帮忙,万分感激!

------解决方案--------------------
不管是sql还是access,数据库都可以设置密码。
远程应该可以开个端口吧,不用共享。我只用过本地的
------解决方案--------------------
...网络access数据库,数据库操作免不了读写操作,不完全共享貌似不可能。
------解决方案--------------------
没有办法。ACCESS是文件数据库,也就是要以文件的形式来访问。你必须从文件系统上给予权限。
------解决方案--------------------
楼主可以将数据库改成SQL
------解决方案--------------------
ACCESS是以文件方式提供服务的,必须进行文件共享.SQL-SERVER是以C/S模式提供,建议你换成SQL-SERVER,程序不会做大的改动.只是连接字符串改改,以及后台数据的修改.
------解决方案--------------------
试试 映射网络驱动器,开始--运行 如 \\192.168.1.XX,以管理员的身份登录共享机器,保存用户名和密码,然后再进行网络驱动器的映射----驱动器: 如Z: 文件夹: \\192.168.1.X\d$\数据库路径,这样利用系统默认共享实现文件访问,就不会把数据库暴露在一般共享目录里,相对来说比较安全,不过建议还是用SQL Server