| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 2203 人关注过本帖
标题:关于Delphi7用ini文件连接数据库
只看楼主 加入收藏
A号痞子
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2007-9-23
收藏
 问题点数:0 回复次数:1 
关于Delphi7用ini文件连接数据库
小弟正在做一个小系统的登录检验模块,
工作流程:在mainform的Oncreat事件中,程序会在与应用程序相同的目录中查找一个名字为dblink.ini的文件,从该文件中取出
          adoconnection1的connectionstring属性的值进行连接的尝试。如果连接失败,则系统会提示建立数据库连接失败; 如果成功,则弹出权限检验窗口,提示进行登录。
定义单元级变量:
 mainform: Tmainform;
  vlogin:string;
  vloginname:string;
  Vloginstatus:string;
  myinifile:Tinifile;
同目录下的dblink.ini文件内容:
 ;database   link   information   file   
[dblinkstr]   
dbstring=Provider=MSDASQL.1;
password=;   
persist   security   info=true;
user  ID=sa;
data   source=colds;   

窗体onCreat事件的程序代码为:
procedure Tmainform.FormCreate(Sender: TObject);
var
filename:string;

begin
filename:=ExtractFilePath(paramstr(0))+'dblink.ini';
myinifile:=Tinifile.create(filename);
try
adoconnection1.Connected:=false;
adoconnection1.ConnectionString:=myinifile.readstring('part1','dbstring','www');
adoconnection1.Connected:=true;
except
showmessage(数据库连接失败,请检查dblink.ini文件中的连接信息的设置是否正确!');
application.Terminate;
end;

end;
问题1:
运行错误提示窗口:
Project Project1.exe exception class E0leException with message '无效的授权说明'。Process stopped .use step or Run to continue.
 点了‘OK’之后,运行出来结果为:数据库连接失败,请检查dblink.ini文件中的连接信息的设置是否正确!

这是什么原因造成的?

还有,参考书有一段话:
在使用INI文件进行连接之前,一定要先建立一个名字为colds的ODBC数据源.代码为:
;database   link   information   file   
[dblinkstr]   
dbstring=Provider=MSDASQL.1;
password=;   
persist   security   info=true;
user  ID=sa;
data   source=colds;   
问题2:
这个代码要写在哪里的?不是写入dblink.ini文件里的?
 我创建了一个名字为colds的ODBC数据源,但是没有设置什么东西,只是创建了放在那里。请问建立了数据源还需要对它进行什么操作吗?
 使用ini文件连接数据库还需要在窗体中间加什么组件吗?
搜索更多相关主题的帖子: 数据库 ini 文件 
2008-04-10 14:29
makebest
Rank: 8Rank: 8
等 级:蝙蝠侠
威 望:3
帖 子:658
专家分:962
注 册:2005-3-17
收藏
得分:0 
你确保ConnectionString是正确的吗,先这样试一下:
adoconnection1.ConnectionString:='xxxxxxx';

另外,读取设置文件的地方也要改一下:
myinifile.readstring('dblinkstr','dbstring','');
2008-04-10 22:52
快速回复:关于Delphi7用ini文件连接数据库
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.012516 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved