在线等...
在access数据库和delphi写的程序中,怎样实现:在界面上的文本框(edit1.txt)输入工号(person_no)后,按"提交"按钮时,系统找到该员工记录,把文本框(edit2.txt)中的金额替换成工资表(gz_table)中该员工的金额. 问题点数：20、回复次数：4Top
1 楼karl（）回复于 2003-06-02 01:20:34 得分 20
ADOQuery.CLose;
ADOQuery.SQL.Clear;
ADOQuery.SQL.Add('Select * From gz_table where person_no='+''''+Edit1.text+'''');
ADOQuery.open;
if ADOQuery.RecordCount>0 then
Edit2.text:=ADOQuery.FieldByName('工资').asString;Top
2 楼xtchl（）回复于 2003-06-02 01:50:11 得分 0
karl(多功能算术逻辑运算单元)大哥,你真行,这问题搞定了.Top
3 楼xtchl（）回复于 2003-06-02 02:00:25 得分 0
不过,如果要是没有满足条件的记录,要用showmessage('没有满足条件的记录');提示,那要怎样写?Top
4 楼JInyk（小小的猪）回复于 2003-06-02 08:48:55 得分 0
ADOQuery.CLose;
ADOQuery.SQL.Clear;
ADOQuery.SQL.Add('Select * From gz_table where person_no='+''''+Edit1.text+'''');
ADOQuery.open;
if ADOQuery.RecordCount>0 then
Edit2.text:=ADOQuery.FieldByName('工资').asString
else
showmessage('没有满足条件的记录');
Top
