如果用VB自带的安装程序打包应该自动就安装在同一目录.如果不行可以修改SETUP.VBP就可以了.用ADO控件连接可以这样:ADODC1.DATASOUECE="PROVIDER.JET.OLEDB.4.0;DATA SOURCE=" & APP.PATH" & DATABASENAME".
用ADO控件可以这样;STR1=="PROVIDER.JET.OLEDB.4.0;DATA SOURCE=" & APP.PATH" & DATABASENAME".
ADO.OPEN STR1
用ADO控件可以这样;STR1=="PROVIDER.JET.OLEDB.4.0;DATA SOURCE=" & APP.PATH" & DATABASENAME".
ADO.OPEN STR1
1 你把所有连接字符串中的路径都去掉。2 在主窗口的from_load中加上:
ChDrive App.Path
ChDir App.Path
如果程序中有改变路径的操作,操作之后也要加这两行。3 打包时在有“添加”按钮的一屏上,点此按钮,把数据库加进来。
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=" & App.Path & "\BIBLIO.MDB"
Adodc1.RecordSource = "Authors"
Adodc1.Refresh
至于相对路径APP.PATH即可。