使用ado+access的话,无需太多设置。 不必担心新的环境不支持ado数据引擎(只要该机器装过office就有ado引擎)。直接把应用程序和数据库拷贝到新机器中,在程序初始化的时候用这种方法来配置一次。 var myinifile:Tinifile; begin try myinifile:=Tinifile.create('dic_ass.ini'); except abort; end ; try begin adocn.ConnectionString:=myinifile.Readstring('adoconnection','connectionstring',adocn.ConnectionString); adocn.Connected:=true; end; except begin adocn.Close; EditConnectionString(adocn); myinifile.writestring('adoconnection','connectionstring',adocn.ConnectionString); end; end;
如果是dbe,需要把bde一起打包+你的access文件
不必担心新的环境不支持ado数据引擎(只要该机器装过office就有ado引擎)。直接把应用程序和数据库拷贝到新机器中,在程序初始化的时候用这种方法来配置一次。
var myinifile:Tinifile;
begin
try
myinifile:=Tinifile.create('dic_ass.ini');
except
abort;
end ;
try
begin
adocn.ConnectionString:=myinifile.Readstring('adoconnection','connectionstring',adocn.ConnectionString);
adocn.Connected:=true;
end;
except
begin
adocn.Close;
EditConnectionString(adocn);
myinifile.writestring('adoconnection','connectionstring',adocn.ConnectionString);
end;
end;