tadoquery1.sql.add('select * from table where filed1 = :field1 and filed1 = :field1') tadoquery1.Parameters.ParamByName('field1').Value := ''; tadoquery1.Parameters.ParamByName('field2').Value := '';
tadoquery1.sql.add('select * from table where filed1 = :field1 and filed1 = :field1') tadoquery1.Parameters.ParamByName('field1').Value := ''; tadoquery1.Parameters.ParamByName('field2').Value := '';
不是这个意思,比如说我的SQL语句是“select users,password from table” 我要把返回的users,password字段的值分别方到两个变量里,这样的SQL语句怎么写啊
var pwd:string;adoquery1.sql.text='select users,password from table where user=:u'; adoquery1.Parameters.ParamByName('u').Value := 'somevalue'; adoquery1.sql.open; pwd:=adoquery1.fieldbyname('password').asstring; adoquery1.next; //如果返回不止一条记录 pwd:=adoquery1.fieldbyname('password').asstring;
var a:string; begin .....a:=query1.ParamByName().asstring;... end;
var a1,a2,...:string; begin ... adoquery.sql.add('select users,password from tablenaem where ...'); adoquery.open; adoquery.first;//如果多条记录,定位到第一条 while adoquery.eof<>false do begin a1:=adoquery.parambymane().asstring; ... adoquery.next;//下一条记录 end; end;
2ADOQuery1.Fields[0].AsString;//AsInteger;AsCurrency...
3用显示控件如TDBEdit等与ADOQuery1所对应的DataSet相关联。
tadoquery1.Parameters.ParamByName('field1').Value := '';
tadoquery1.Parameters.ParamByName('field2').Value := '';
tadoquery1.Parameters.ParamByName('field1').Value := '';
tadoquery1.Parameters.ParamByName('field2').Value := '';
pwd:string;adoquery1.sql.text='select users,password from table where user=:u';
adoquery1.Parameters.ParamByName('u').Value := 'somevalue';
adoquery1.sql.open;
pwd:=adoquery1.fieldbyname('password').asstring;
adoquery1.next; //如果返回不止一条记录
pwd:=adoquery1.fieldbyname('password').asstring;
begin
.....a:=query1.ParamByName().asstring;...
end;
a1,a2,...:string;
begin
...
adoquery.sql.add('select users,password from tablenaem where ...');
adoquery.open;
adoquery.first;//如果多条记录,定位到第一条
while adoquery.eof<>false do
begin
a1:=adoquery.parambymane().asstring;
...
adoquery.next;//下一条记录
end;
end;