OCapption=Caption;
conTxt->ConnectionString=
"Provider=Microsoft.Jet.OLEDB.4.0;"
"Password=\"\";"
"User ID=Admin;"
"Data Source=\""+AppPath+"\";"//AppPath是可执行文件的路径
"Mode=Share Deny None;"
"Extended Properties=\"text;HDR=Yes;FMT=Delimited;\";"
/* "Jet OLEDB:System database=\"\";"这几行可以不要
"Jet OLEDB:Registry Path=\"\";"
"Jet OLEDB:Database Password=\"\";"
"Jet OLEDB:Engine Type=96;"
"Jet OLEDB:Database Locking Mode=0;"
"Jet OLEDB:Global Partial Bulk Ops=2;"
"Jet OLEDB:Global Bulk Transactions=1;"
"Jet OLEDB:New Database Password=\"\";"
"Jet OLEDB:Create System Database=False;"
"Jet OLEDB:Encrypt Database=False;"
"Jet OLEDB:Don't Copy Locale on Compact=False;"
"Jet OLEDB:Compact Without Replica Repair=False;"*/
"Jet OLEDB:SFP=TRUE";
conTxt->Connected=true;
ADOqry1->SQL->Text="select * from 石油英语词汇.txt";
ADOqry1->Open();
你说的是相对路径,以ACCESS为例,可以这样实现:
在调用数据库的窗体(或程序中先运行的窗体等)创建事件中加入代码:
String DataPath;
DataPath=ExtractFilePath(ParamStr(0));
ADOConnection1 -> ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+DataPath+"你的库.mdb;Persist Security Info=False";
ADOConnection1->Connected=true;