例如:Data1.DatabaseName = "\\mainserver\数据库\111.mdb"
在线等待,谢谢,马上结帖

解决方案 »

  1.   

    试试:
    Data1.DatabaseName = "\\mainserver\数据库\111.mdb;pwd=pass"
      

  2.   

    Data1.Connect = ";pwd=密码"
      

  3.   

    Data1.Connect = ";pwd=密码"
      

  4.   

    用ADO连接
    dim con as new adodb.connection
    con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= \\mainserver\数据库\111.mdb;jet oledb:database password=你的密码"
      

  5.   

    在前面加一句
    shell "net use \\机器名 密码  /user:用户名"
    列如:机器名为:computer 用户为:guest 密码为123456
    shell "net use \\computer 123456 /user:guest"
    98下用户名为guest
      

  6.   

    在前面加一句
    shell "net use \\机器名 密码  /user:用户名"
    列如:机器名为:computer 用户为:guest 密码为123456
    shell "net use \\computer 123456 /user:guest"
    98下用户名为guest