荔园在线

荔园之美,在春之萌芽,在夏之绽放,在秋之收获,在冬之沉淀

[回到开始] [上一篇][下一篇]


发信人: andyhua (海地), 信区: Database
标  题: Re: [问]Delphi如何直接用语句行来实现数据库调用?
发信站: 荔园晨风BBS站 (Mon Mar 17 16:34:23 2003)

//这里使用的是ado对象连接sqlserver
use ...db,adodb...

...
var adoconn: Tadoconnection;
var adoquery1: Tadoquery;
var ds:Tdatasource;
....
begin
   //初始化变量
   adoconn:=tadoconnection.Create(nil);
   adoquery1:=tadoquery.Create(nil);
   ds:=tdatasource.Create(nil);

   //为对象属性设定值
   with adoconn do
   begin
         ConnectionString:='Provider=SQLOLEDB.1;Persist Security    Info=False
;User ID=sa;Initial Catalog=serviceDB;Data Source=PSERVICE\SERVICESUPPORT';
         connected:=true;
   end;

   adoquery1.Connection:=adoconn;
   adoquery1.SQL.Text:='select * from reginfo';
   adoquery1.open;
   //到此已经获得数据集,可以从数据集里面取数据了
   //例如:   adoquery1.FieldByName('fieldname');
   ds.DataSet:=adoquery1;
   //

【 在 STS 的大作中提到: 】
: 不用控件,调用Access或者SQL Server
: 具体如何实现?谢谢.

--

※ 来源:.荔园晨风BBS站 http://bbs.szu.edu.cn [FROM: 61.145.128.195]

※ 修改:.andyhua 於 Mar 17 16:43:45 2003 修改本文.[FROM: 61.145.128.195]


[回到开始] [上一篇][下一篇]

荔园在线首页 友情链接:深圳大学 深大招生 荔园晨风BBS S-Term软件 网络书店