gstrDataSource = "DSN=MS Access 97 Database;DBQ=c:\CheckData.mdb;DriverId=281;FIL=MS Access;FILEDSN=C:\Program Files\Common Files\ODBC\Data Sources\MS Access 97 Database (not sharable).dsn;MaxBufferSize=2048;PageTimeout=10;PWD=passwd;UID=admin;

解决方案 »

  1.   

    ACCESS 2000 VS ADO
    dim cn as ADODB.connection
    dim rs as ADODB.recordset
    cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\电子图书室\service\database\libdate.mdb;Jet OLEDB:Database Password=密码;UID=用户名;Persist Security Info=False"
    '填充记录集
    rs.Open "select 需要选的字段 from 表名", cn, adOpenStatic, adLockOptimistic
      

  2.   

    感谢您使用微软产品。 
        
    您可以参考以下的代码使用 OLEDB 来连接被保护的 Access 数据库: Dim conn As ADODB.ConnectionSet conn = New ADODB.ConnectionWith conn
        .Provider = "Microsoft.Jet.OLEDB.4.0"
        .Properties("Jet OLEDB:database password") = "123"
        .Properties("Jet OLEDB:system database") = "C:\Program Files\Common Files\SystemSystem.mdw"
    End Withconn.Open ConnectionString:="D:\test.mdb", UserID:="admin", Password:="123"希望对您有帮助! 微软全球技术中心  桌面产品技术支持 
        
    本帖子仅供CSDN的用户作为参考信息使用。其内容不具备任何法律保障。您需要考虑到并承担使用此信息可能带来的风险。具体事项可参见使用条款(http://support.microsoft.com/directory/worldwide/zh-cn/community/terms_chs.asp)。 
        
    为了为您创建更好的讨论环境,请参加我们的用户满意度调查(http://support.microsoft.com/directory/worldwide/zh-cn/community/survey.asp?key=(S,49854782))。
      

  3.   

    联接字符串为
    Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\xxx.mdb;Jet OLEDB:database password=xxx
      

  4.   

    感谢lxj_freedom:
    再次请教,那设置了用户与组之后,联接字符串又该怎么写呢?
      

  5.   

    recordset.open "select * from t1",connstr