我用conn.udl连接一个Access数据库,数据库的名字是WFsendat.mdb,密码我知道是123,但是我不知道这个数据库的名字是什么,在连接的时候出现提示:
“测试连接失败,因为初始化提哦你该程序时发送错误。无法启动应用程序。工作组信息文件丢失,或是已被其他用户已独占方式打开。”
怎么办?我怎么才能知道这个数据库的名字?

解决方案 »

  1.   

    Provider=Microsoft.Jet.OLEDB.4.0;Data Source=路径+WFsendat.mdb;Persist Security Info=False;Jet OLEDB:Database Password=123你的数据库名不是WFsendat.mdb吗?还要什么?
    记得加路径
      

  2.   


    数据库的名字是WFsendat.mdb
      

  3.   

    不知道数据库名字,那WFsendat.mdb是什么,工作组文件,是因为用工作组安全设置了,你么样工作组的密码就无法连接
      

  4.   

    请先用access打开,然后修复一次试试
    之后用TAdoconnection组件连接测试一次,然后再写代码
      

  5.   

    给你几个函数,绝对能用 
    '%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    '函数功能:连接指定的数据库 
    '参数说明:cnnP:数据库连接对象; 
    '        :adoP:数据集存储对象; 
    '        :strPath:数据库路径; 
    '        :strPassword:数据库密码; 
    '返回说明:True:连接成功  False:连接失败 
    '%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    Public Function funConnectDataBase(cnnP As ADODB.Connection, adoP As ADODB.Recordset, ByVal strPath As _ 
        String, ByVal strPassword As String) As Boolean 
    On Error GoTo errFunction 
        Set cnnP = New ADODB.Connection 
        Set adoP = New ADODB.Recordset 
        cnnP.Provider = "Microsoft.Jet.OLEDB.4.0" 
        cnnP.Open "Data Source = " & strPath & ";jet oledb:database password=" & strPassword 
        funConnectDataBase = True 
        Exit Function 
    errFunction: 
        funConnectDataBase = False 
    End Function 
    '%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    '函数功能:关闭数据库连接对象和数据文件的关联 
    '参数说明:cnnP:数据库连接对象; 
    '        :adoP:数据库存储对象; 
    '返回说明:True:关闭连接成功  False:关闭连接失败 
    '%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    Public Function funCloseDataBase(cnnP As ADODB.Connection, adoP As ADODB.Recordset) As Boolean 
    On Error GoTo errFunction 
        Set adoP = Nothing 
        Set cnnP = Nothing 
        funCloseDataBase = True 
        Exit Function 
    errFunction: 
        funCloseDataBase = False 
    End Function 
    '%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 
    '过程功能:对指定的对象执行指定的SQL语句 
    '参数说明:cnnP:ADO连接对象 
    '        :adoP:ADO记录集对象 
    '        :strSql:SQL语句 
    '        :bolQueryRecord:是否是查询记录集 
    '%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%Public Sub subExcuteSQL(cnnP As ADODB.Connection, adoP As ADODB.Recordset, strSql As String, bolQueryRecord _ 
        As Boolean) 
        If bolQueryRecord Then  '如果是查询记录集 
            adoP.Open strSql, cnnP, adOpenStatic, adLockBatchOptimistic 
        Else 
            cnnP.Execute strSql 
        End If 
    End Sub 
      

  6.   

    你的数据库名不是WFsendat.mdb吗?
      

  7.   

    WFsendat.mdb 這是你的數據庫文件,他是單機的  你說的問題應該是你的密碼輸錯地方了,應該在屬性設置的地方