http://www.d1vb.com上万个VB朋友都注册了,50000条记录就是人气的象征!几千个代码和文章是你急需的。我是版主和站长,欢迎您的光顾!我们会尽最大努力帮助你。

解决方案 »

  1.   

    Private Sub Class_Initialize()
    Dim comStr As String
    dim m_con as new ADODB.Connection 
    dim m_Rs as new ADODB.RecordsetcomStr="driver={Microsoft Access Driver_&(*.mdb)};dbq=d:\user\cigarete.mdb"
    m_con.open comStr
      

  2.   

    Dim comStr As String
    dim m_con as new ADODB.Connection 
    dim m_Rs as new ADODB.Recordset这些都已经有了,在通用里面
    运行时出现这样的错误
    [Microsoft][ODBC 驱动程序 管理器] 未发现数据源名称并且未指定默认驱动程序
      

  3.   

    一定是comStr字符串某个地方不对,仔细查查,用Adodc的属性connectstring连一次,再把字符串COPY 过来,试试
      

  4.   

    Access 2000使用:
    Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\user\cigarete.mdb;Persist Security Info=False
    Access 97使用:
    Provider=Microsoft.Jet.OLEDB.3.51;Data Source=d:\user\cigarete.mdb;Persist Security Info=False