数据库连接问题.如果通过IP地址连接另一台电脑上的Access数据库，必须要把存放Access数据库的文件夹完全共享吗？

如题。这是我的连接字符串，如果把存放access数据库的文件夹完全共享的话就可以连接上access。可是这样太不安全了。请问各位GGJJ们有没有更好的办法？
Private Sub Class_Initialize()    Dim connString As String
    Dim cn As New LocalCDB
    Dim rs As ADODB.Recordset
    Dim sql As String
    
    If pub_DB_Sign = "服务端" Then
    
        sql = "SELECT SERVER_IP FROM SYSTEM_INFO WHERE ID = 1"
        Set rs = cn.ExcuSqlRs(sql)
        '获取服务器IP地址
        connString = "DRIVER=Microsoft Access Driver (*.mdb);UID=admin;PWD=1111;DBQ=" & "//" & rs!SERVER_IP & "/" & "/DataBase/db.mdb"
        
    ElseIf pub_DB_Sign = "客户端" Then
    
       connString = "DRIVER=Microsoft Access Driver (*.mdb);UID=admin;PWD=1111;DBQ=" & App.Path & "\DataBase\db.mdb"
        
    End If
    
    Set adoConn = New ADODB.Connection
    adoConn.ConnectionString = connString
    adoConn.CommandTimeout = 5
    adoConn.OpenEnd Sub