文件夹1的工程中data1.databasename=""&app.path&"\库文件.mdb"
文件夹拷到别的机子会丢失,也就是找不到库文件.mdb,提示错误“数据错误事件命中错误:定义的应用程序或对象错误”
请问是何种原因引起的。谢谢

解决方案 »

  1.   

    应该这样吧data1.databasename=app.path&"\库文件.mdb"
      

  2.   

    app.path在根目录时末尾没\,其它则有\
    所以应该这样写
    mdbPath=app.path
    if right(mdbPath,1)<>"\" then mdbPath=mdbpath & "\"
    data1.databasename=mdbpath & "\库文件.mdb"
      

  3.   

    mdbPath = app.path & "\库文件.mdb"
    mdbPath = Replace(mdbPath, "\\", "\")
    data1.databasename = mdbPath
      

  4.   

    位置是从桌面考到桌面,
    是在用ado 捆绑的datacombo向库文件.mdb中写数据时出错。其中Adodc控用到"Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" 库文件.mdb",
    data1.databasename=""&app.path&"\库文件.mdb"
    **************************
    mdbPath = app.path & "\库文件.mdb"
    mdbPath = Replace(mdbPath, "\\", "\")
    data1.databasename = mdbPath
    也会提示同样的错误
      

  5.   

    是否应该改以下的代码呢
    "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" 库文件.mdb",