花落谁家，你作主！	盛大widget设计大赛英雄榜

请教高手,如何通过ADO来连接数据库?

楼主shift（宁静的夜,思索的我.）2001-04-06 21:21:00 在 Delphi / 数据库相关提问

不要通过ODBC,直接通过ADO来连接.
我是初学者,请问哪里有学习DELPHI的好站点?
先谢谢了!!
问题点数：75、回复次数：9Top

1 楼shift（宁静的夜,思索的我.）回复于 2001-04-06 21:34:00 得分 0

要求像VB一样,用代码实现.Top

2 楼Hank（星星农场）回复于 2001-04-06 21:59:00 得分 15

添加TADOConnection控件，然后双击，出现提示框后选择Builder，然后继续就有提示
当然要安装MDAC！
添加TADODataSet的Connection为ADOConnection和TDataSet的DataSet为TADODataSet，此时就可以了Top

3 楼wangxd1976（东东）回复于 2001-04-06 23:29:00 得分 10

我现在也在考虑这个问题,如何动态生成对数据库的连接,我想是否是在安装程序中用代码根据客户的具体情况动态的写ConnectionString,把连接字符串保存在客户端的某个位置,每次程执行时从文件载入连接字符串,然后动态连接.Top

4 楼wangxd1976（东东）回复于 2001-04-06 23:34:00 得分 0

如果shift兄最后有更好的方法解决这个问题,请把方法告知小弟.
please mail to: wang.xd@263.net.
thanks.Top

5 楼wangxd1976（东东）回复于 2001-04-06 23:37:00 得分 0

www.csdn.net
www.delphibbs.com
上搜索引擎查查就知道了-->www.google.com 一个很快的搜索引擎.Top

6 楼czzw（山水）回复于 2001-04-07 22:40:00 得分 10

我想可以象VB那样，定义一个connection对象，然后再动态指定即可
也就是填入provider的信息

当然使用数据模块是最简单的办法，然后再使用uses语句将模块包含至单元文件中Top

7 楼jjdelphi（小义）回复于 2001-04-07 23:12:00 得分 0

是不是在双击TADOConnection控件出现提示框后选择Builder后在ALL里面设置参数值来实现Top

8 楼jjdelphi（小义）回复于 2001-04-08 12:14:00 得分 30

连接方法如下(以连接SQL Servier为例):
添加TADOConnection控件,然后双击,
选择use connection string,
单击Build...按钮,
在Provider选项卡中选择Microsoft Ole DB Provider for SqlServer,
单击Next进入Connection选项卡,
从1中选择服务器名称,若在本地机上可以省略,
从2中选择访问方式,不是NT选择第二种,输入用户名和用户密码.若正确就可以从3中选择数据库了,
然后单击Test Connection 检测是否连接成功
单击确定,返回会从Use Connection String中看到你刚才的设置,
你也可以通过Edit.text读入服务器,数据库,用户名,用户密码直接设置
程序如下:
procedure TForm1.Button1Click(Sender: TObject);

begin
With ADOConnection1 do
begin
if ADOtable1.Active=True then ADOTable1.Active:=False;
Close;
LoginPrompt:=False;
Connectionstring:='Provider=SQLOLEDB.1;Password='+edit5.text+'; Persist Security Info=True;User Id='+edit3.text+';Initial Catalog='+edit2.text+';Locale Identifier=2052;Connect Timeout=15;Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Workstation ID='+edit1.text;
Connected:=True;
ADOTable1.TableName:=edit4.text;//设置数据表
ADOTable1.Active:=True;
end;
end;
注意ConnectionString中的引号、分号位置Top

9 楼SavageRen（我爱编程，我也爱人民币，我更爱祖国！）回复于 2001-04-08 14:59:00 得分 10

用 ADO Builder (Delphi 里自带的工具 TAdoTabel TAdoDataSet 里均有）Top