高手们，帮帮我！ADO编程，我怎么才能执行一个SQL语句，如我要执行Select f1,f2 form data where id=12 并且要将获取的值存入str1,str2变量中，怎么做呀？小弟初学Delphi，还望各位多多指教！

[kind_li]

[kind_li]

查找的字符串是怎么办，即Select f1,f2 form data where f1='ABC' 这样的语句在DELPHI中如何表示

[票票飞扬]

Sql.Text := 'Select f1,f2 form data where f1=''ABC'''

[li_zhifu]

SQL.Add(select f1,f2 from data where f1="ABC"');
or
SQL.Add(select f1,f2 from data where f1='#39+'ABC'#39);

[free007]

同意二代的说法

[zhouhaijun2]

to：li_zhifu(东北人)，请问阁下贵姓，今晚共进晚餐？

[babyboy]

th

[ysmstoneman]

这么多人，我就不用多说了，

[smaze]

先取一个ADOQUERY,不要忘记设置CONNECTSTRING的属性.
adoquery.close;
adoquery.sql.text:='select f1,f2 from data where id=12 '
adoquery.open;
str1:=adoquery.fieldbyname('f1').asstring;
str2:=adoquery.fieldbyname('f2').asstring;
这样大概就可以了;

[smaze]

对不起,第一次来这里,回复多了,SORRY.浪费空间

[share2002]

哈哈，都是高手

[man8888]

--也可以用Fetch来做,如果你用存储过程实现，使用
--SQL SERVER光标（游标,CURSOR）也可以实现，语句如下：
use pubs
declare @s1 varchar(50),@s2 varchar(50)
declare dd cursor scroll for
select title_id,title from titles
--Select f1,f2 form data where id=12 在你程序里，请用此行替换上一行select
open dd
fetch first from dd into @s1,@s2
close dd
deallocate dd

print @s1
print @s2
--当然，FieldByName是DELPHI最好的选择，如果在PowerBuilder里，肯定
--是以上sql语句了：）
--也许是脱？？放？啊，呵呵。。。。

[票票飞扬]

with ADOQuery do
begin
Close;
Sql.Text := 'Select f1,f2 form data where id=12';
Open;
while not Eof do
begin
Str1 := FieldByName('f1').AsString;
Str2 := FieldByName('f2').AsString;
//处理自己的操作
Next;
end;

end;

[ntserver4]

同意楼上


┃千┃　━　 ━━ ┃新┃
┃禧┃━┳━┏━┓┃年┃
┃举┃┃┃┃┗━┛┃普┃
┃世┃┃┃┃┏┳┓┃天┃
┃共┃　┃　┃╋┃┃同┃
┃欢┃　┛　┗┻┛┃庆┃

新年快乐啦~！

[li_zhifu]

with ADOQuery do
begin
Active:=False;
Sql.Clear;
Sql.Add( 'Select f1,f2 form data where id=12');
Active:=True;
Str1 := FieldByName('f1').AsString;
Str2 := FieldByName('f2').AsString;
end;

[liangwang2001]

var
str1:string;
str2:string;
begin
Adoquery1.close;
adoquery1.sql.text:='select f1,f2 from data where id=12';
str1:=adoquery1.fieldbyname('f1').asstring;
str2:=adoquery1.fieldbyname('f2').asstring;
end;

[踢踏]

with ADOQuery do
begin
Active:=False;
Sql.Clear;
Sql.Add( 'Select f1,f2 form data where id=12');
Active:=True;
Str1 := FieldByName('f1').AsString;
Str2 := FieldByName('f2').AsString;
end;

[superdev]

大家说得都不错！呵呵

[moke]

找本李维写的ADO书看一下，你可先将SELECT放入一个DATASET中，如Dataset1,设它的commandtext为上述select语句，
str1:=Dataset1['f1']
str2:=Dataset2['f2']

[liangwang2001]

不好意思·第6行与第7行之减少了一行adoquery1.open;
我也刚学delphi，多多见谅！