请问一个Delphi+Access数据库+ADO的问题!
我用Access创建一个名为ABC.mdb数据库,里面包含有一个X数据表,X数据表包含qw、qa两个字段,X数据表共有8千多条记录。现要在Delphi程序中用到ABC.m...
我用Access创建一个名为ABC.mdb数据库,里面包含有一个X数据表,X数据表包含qw、qa两个字段,X数据表共有8千多条记录。
现要在Delphi程序中用到ABC.mdb数据库,达到在EDIT输入框中输入一个包含qw字段的内容,就能定位到qw字段所在的这条记录,并取出qa字段的值到一个变量里! 展开
现要在Delphi程序中用到ABC.mdb数据库,达到在EDIT输入框中输入一个包含qw字段的内容,就能定位到qw字段所在的这条记录,并取出qa字段的值到一个变量里! 展开
1个回答
展开全部
adoquery的连接要用 microsoft jet 4。0 ole db provide
procedure TForm1.Edit1Change(Sender: TObject);
var s:string;
s_var:string;
begin
s:=edit1.text;
with adoquery1 do
begin
close;
sql.Clear;
sql.Text:='select qw,qa from x where qw='+#39+s+#39;
open;
s_var:=Fields[1].AsString;
end;
end;
procedure TForm1.Edit1Change(Sender: TObject);
var s:string;
s_var:string;
begin
s:=edit1.text;
with adoquery1 do
begin
close;
sql.Clear;
sql.Text:='select qw,qa from x where qw='+#39+s+#39;
open;
s_var:=Fields[1].AsString;
end;
end;
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询