压缩access数据库？

Dim JR As jro.JetEngine
    
    Set JR = New jro.JetEngine 'conn.Close    JR.CompactDatabase "Provider=Microsoft.Jet.OLEDB.4.0;DataSource=" + App.Path + "\plkk.mdb", _
    "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + _
    App.Path + "\plkk.mdd"   '进行压缩
'conn.Open ADO_CON
    Set JR = Nothing           '释放JR对象
运行时报错“找不到可安装的isam"请教各位是何原因？

解决方案 »

  1.   

    你用的是哪个版本的OFFICE？可能是版本不对
      

  2.   

    //App.Path + "\plkk.mdd"   '进行压缩
    还是 App.Path + "\plkk.mdb"   '进行压缩
      

  3.   

    对，楼上倒比较细心，
    plkk.mdd  确实写错了
      

  4.   

    你应该用的是office97里的
    把数据库mdb打开转换成新版本的应该就好了
      

  5.   

    在“工具”里菜单里有一个“数据库实用工具”，里面就有转换数据库的选顶你把改成："Provider=Microsoft.Jet.OLEDB.3.5;Data Source=试试