怎么设置daodc 的相对路径.

解决方案 »

  1.   

    cn.ConnectionString = "provider= Microsoft.Jet.OLEDB.4.0;data Source=" & App.Path & "\data.mdb" 
      

  2.   

    app.path & "\*.mdb"
      

  3.   

    dim strApp as string
    strApp=app.path
    if right$(strApp,1)<>"\" then strApp=strApp+"\"
    strApp&"*.mdb"
      

  4.   

    怎么不对?把你的绝对路径写出来!ADODC1.ConnectionString = "provider= Microsoft.Jet.OLEDB.4.0;data Source=" & App.Path & "\yourdata.mdb"
      

  5.   

    App.Path 是你程序存放的文件夹路径
    如果你的数据库存放在该文夹的子文件夹下还要写出子文件夹的路径
    如:你的源程序存放在d盘的test文件夹下数据库存放在test下的data文件夹下
    那么App.Path指向d:\test
    应该写的路径为App.Path & "\data\YourDB.mdb"
      

  6.   

    dim str as string
    str="provider= Microsoft.Jet.OLEDB.4.0;data Source=" & App.Path & "\yourdata.mdb"
    Replace str, "\\", "\"   ’将“\\”替换成“\”
    cn.ConnectionString =str
    数据库要放在你工程目录的下面,
      

  7.   

    假设数据库在程序所在的路径下,用代码实现数据库的连接像楼上各位的方法即可。
    如果想在设计时连接,可以试试用不带路径的文件名,即直接输入YourDB.mdb
      

  8.   

    cn.ConnectionString = "provider= Microsoft.Jet.OLEDB.4.0;data Source=" & App.Path & "\data.mdb"
       如果你所编制的这个程序在C:\VB98\123文件夹中  则必须有data.mdb这个数据库 如果没有 运行时就会出错!
      

  9.   

    在数据源中直接输入你的数据库文件的名称(base.mdb)
      

  10.   

    str="provider= Microsoft.Jet.OLEDB.4.0;data Source=" & App.Path  & "\data.mdb"
    97 应该是 microsoft.jet.oledb.3.51
      

  11.   

    小心在不同的机上App.path的格式是不同的,应该这样做
    filename=app.path
    if right(filenamem,1)<>"\" then filename=filename & "\"
    filename=filename & "db1.mdb"