做的东西转出去数据库不符
delphi做的时候用的电脑上的数据库上服务器名字,用别的电脑,别的电脑的服务器名字不一样,所以运行不起来,请问怎么办?
我那些定义的adoquery都是用的原来电脑上的服务器名字,难道叫我把里面的名字全部改成现在的服务器名字吗?有没有什么别的办法。
[解决办法]
一般的方法,将adoquery的连接串写在一个配制文件(可用ini格式),这样程序在不同的环境中,只要修改配制文件就可以了
[解决办法]
use inifiles
IniFileName := ExtractFilePath(paramStr(0)) + 'JTHRP.INI'; MyIniFile := TIniFile.Create(IniFileName); dbServerName := MyIniFile.ReadString('SERVER','ServerName','.'); DatabaseName := MyIniFile.ReadString('SERVER','DatabaseName','JTHRP'); LogUserName := MyIniFile.ReadString('SERVER','UserName','sa'); UserPassword := Dec(MyIniFile.ReadString('SERVER','Password','')); Main_F.conMain.Close; Main_F.conMain.ConnectionString := 'provider=sqloledb.1' + ';server=' + dbServerName + ';database=' + DatabaseName + ';uid=' + LogUserName + ';password=' + UserPassword + ';persist securyti info=false'; Main_F.conMain.open;
[解决办法]
一般要将你的connection的active设为false。
然后在form1.create的时候用上面的代码。