AnsiString strExepath = ExtractFilePath(Application->ExeName);
ADOTable1->ConnectionString =
AnsiString("Provider=Microsoft.Jet.OLEDB.4.0;") +
AnsiString("Data Source=") +
strExepath +
AnsiString("\\Data\\db4.mdb;") +
AnsiString("Persist Security Info=False");
/* db4.mdb 为access的文件名,位于data文件下*/
温馨提示:答案为网友推荐,仅供参考