请教，网络访问共享Access数据库

在IP为192.168.0.1的电脑上将Data文件夹设置共享，在局域网其他电脑上使用以下代码进行连接    Dim Connstr As String
    Dim HisConn As New ADODB.Connection
    Dim HisRs As New ADODB.Recordset    Connstr = "Provider=Microsoft.Jet.OLEDB.4.0; " & "Data Source= " _
        & "\\192.168.0.1\Data\Now.mdb"
    HisConn.Open Connstr可以实现Access网络连接，但现在问题是，每次启动后连接，都在打开处提示需要输入192.168.0.1目标PC的登陆用户和密码，这样才可以进行连接，请问各位高人，有没有代码解决，自动输入用户、密码的方案？
多谢了！