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

Question

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;

Answer 1

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;   

Answer 2

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;

Answer 3

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;  

Answer 4

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

Answer 5

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

Answer 6

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

Answer 7

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

Answer 8

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

Answer 9

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

Answer 10

先取一个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;
这样大概就可以了;

Answer 11

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

Answer 12

--也可以用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 ddprint @s1
print @s2
--当然，FieldByName是DELPHI最好的选择，如果在PowerBuilder里，肯定
--是以上sql语句了：）
--也许是脱？？放？啊，呵呵。