怎样设置数据库文件的路么？

Question

请问一下ADO的相对路径设置的格式。为了避免打包后出现问题，我使用的是DSN。但是使用了DSN后，我的打包程序在其它机器上时都需要手工设置一下DSN。请问怎样才能用命令给系统加上DSN，还有就是设置相对路径，以解决安装路径的问题。

Answer 1

一般情况下用相对路径app.path
工程--->引用--->Microsoft ActiveX Data Object 2.x（版本号）    Dim CN   As New ADODB.Connection                '定义数据库的连接
    Dim Rs   As New ADODB.Recordset    CN.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & App.Path & "\student.mdb"     CN.Open
    Rs.CursorLocation = adUseClient
    Rs.Open "select * from employees", CN, adOpenDynamic, adLockOptimistic

Answer 2

在程序中建立DSN数据源：http://support.microsoft.com/default.aspx?scid=kb;EN-US;171146

Answer 3

在程序中建立DSN数据源：http://support.microsoft.com/default.aspx?scid=kb;EN-US;171146

Answer 4

程序中用app.path取相对路径名。

Answer 5

data1.databasename=app.path & "\?.mdb"
data1.tecordsourse="select * from 表"
data1.refresh其余的空间