用户名应该写什么啊? 或者带有密码的access数据库连接不是这样写代码的?
dim con as adodb.connection
dim ref as adodb.recordset
public function connects()
set con=new adodb.connection
con.provider="microsoft.jet.oledb.4.0"
con.connectionstring="data source = c:\abc.mdb"
con.open ,,"123" '用户名不知道应该写什么啊?大哥大姐们帮帮忙好不啦!
set ref=new adodb.recordset
ref.open "select * from table1",con,....
end function

解决方案 »

  1.   

    con.Properties("User ID").Value = "Test"
        con.Properties("Password").Value = "Test"
      

  2.   

    Provider=Microsoft.Jet.OLEDB.4.0;Password=你的密码;User ID=你的用户名;Data Source=c:\abc.mdb;Pecurity Info=True
      

  3.   

    1、con.Provider = "Microsoft.Jet.OLEDB.4.0"
            con.Properties("Jet OLEDB:Database Password") = "111"
            con.Open "C:\ccc.mdb;Persist" 这个方法用于打开对ACCESS文件加密的方法。
    2、"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=databaseName;User ID=userName;Password=userPassword;" 这个方法是用于打开设置了用户和组的密码
    你用的是哪一种,你试一下总有一个可以
      

  4.   

    感谢hwcqboy!!!!!!!!!!!!!!!!!!!!!!!!!!
    祝你全家精神愉快,天天发财,万事如意,五谷丰登,招财进宝,天上掉馅饼全掉你们家!!!!