问题不在打包,而在于你的ADO控件是用相对路径还是绝对路径?如果是绝对路径的话,就算打包也没用。还是用相对路径的好。例: Private Sub Form_Load() Dim Strsql As String Strsql = "Select * From TableName" Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=App.Path & "\Temp.mdb;Persist Security Info=False" Adodc1.RecordSource = Strsql Adodc1.Refresh End Sub
如果是用安装工厂,你就用%APPDIR%\文件名就可以了.
Private Sub Form_Load()
Dim Strsql As String
Strsql = "Select * From TableName"
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=App.Path & "\Temp.mdb;Persist Security Info=False"
Adodc1.RecordSource = Strsql
Adodc1.Refresh
End Sub