怎么设置ADOQuery连接Oracle8.1.6数据库的ini文件? 我在程序中用了ADOQuery控件。想连接数据库在delphi里怎么写?在ini文件里对应怎么写呢?我要具体的源代码!比如:服务器的IP地址是192.168.0.108,数据库名是repair。用户名是sjt。密码是sjt 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 正好我用的是ORACLE 8的数据库,你可以参考一下:function GetConnectionString: string;var SYSINI: TINIFile; ServerName, UserName, Password, tmpstr: string;begin SYSINI := TIniFile.Create(ExtractFilePath(Application.ExeName)+'DB.INI'); try ServerName := SYSINI.ReadString('Database', 'ServerName', ''); UserName := SYSINI.ReadString('Database', 'UserName', ''); tmpstr := SYSINI.ReadString('Database', 'Password', ''); Password := Decrypt(tmpstr, ''); Result := ''; Result := 'Provider=OraOLEDB.Oracle.1;Password=' + Password + ';Persist Security Info=True;User ID=' + UserName + ';Data Source='+ServerName+';Extended Properties=""'; finally SYSINI.Free; end;end;{这是读取INI文件,组成一个连接字符串用的}这个函数可以在ADOCONNECTION的WILLCONNECT事件中使用我的DB.INI文件的内容[Database]ServerName=oracledbUserName=franshionPassword=BA4BD753AB75当然,我这里的PASSWORD是加过密的,加密程序由楼主自己写了:)还有一个就是设置数据库的INI文件 的函数,楼主对着上面的函数自己再写一下吧,就当是练手! mainmenu怎么贴图,或者有没有类型的可以贴图的控件 开始进行一个费时的处理(查询),鼠标变成漏斗,窗口上其他按钮都暂时都不响应,如何实现啊 在dxDBGrid中,如何用程序指定选中行? 读版本号BCB下错误,delphi正常(分不够再加) 画图程序中的撒消操作?怎么实现 关于 Tjpegimage 与 Tpicture 的区别!!!! 今天发分热,我也发分 :-)>,多认识几个朋友吧 Help 两个小问题,关于全局变量的定义和String类型,在线等待。 在delphi中如何触发一个事件 我的google又上不去了,一上 发送邮件问题,为何验证失败,100分奉送!急!
var
SYSINI: TINIFile;
ServerName, UserName, Password, tmpstr: string;
begin
SYSINI := TIniFile.Create(ExtractFilePath(Application.ExeName)+'DB.INI');
try
ServerName := SYSINI.ReadString('Database', 'ServerName', '');
UserName := SYSINI.ReadString('Database', 'UserName', '');
tmpstr := SYSINI.ReadString('Database', 'Password', '');
Password := Decrypt(tmpstr, '');
Result := '';
Result := 'Provider=OraOLEDB.Oracle.1;Password=' + Password + ';Persist Security Info=True;User ID=' + UserName + ';Data Source='+ServerName+';Extended Properties=""';
finally
SYSINI.Free;
end;
end;{这是读取INI文件,组成一个连接字符串用的}这个函数可以在ADOCONNECTION的WILLCONNECT事件中使用我的DB.INI文件的内容[Database]
ServerName=oracledb
UserName=franshion
Password=BA4BD753AB75
当然,我这里的PASSWORD是加过密的,加密程序由楼主自己写了:)还有一个就是设置数据库的INI文件 的函数,楼主对着上面的函数自己再写一下吧,就当是练手!