在线等候,高手请进

yexiaozi2004 2005-01-01 10:00:36
procedure TForm7.Button1Click(Sender: TObject);
begin
if (edit1.Text='')and(edit2.Text='')then
begin
showMessage('没有需要查询的记录,请重新确认');
end
else
begin
adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add('select * from stockin');
adoquery1.SQL.Add('where rq='''+edit1.text+'''');
adoquery1.Open;
if adoQuery1.RecordCount=0 then
begin
showmessage('没有需要查询的记录,请重新确认');
End;
这段查询语句中的Where语句我想要他在满足rq这个条件的同时也满足sqbh应该如何来写
...全文
46 8 点赞 打赏 收藏 举报
写回复
8 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
yexiaozi2004 2005-01-01
谢谢大家
  • 打赏
  • 举报
回复
ChinaEinstein 2005-01-01
哇, 看问题这会就有人回答了,还挺快的呢
  • 打赏
  • 举报
回复
ChinaEinstein 2005-01-01
这要就可以了.呵呵..用AND连一下
procedure TForm7.Button1Click(Sender: TObject);
begin
if (edit1.Text='')and(edit2.Text='')then
begin
showMessage('没有需要查询的记录,请重新确认');
end
else
begin
adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add('select * from stockin');
adoquery1.SQL.Add('where rq='''+edit1.text+'''');
adoquery1.SQL.Add(' and sqbh='''+edit2.text+'''');
adoquery1.Open;
if adoQuery1.RecordCount=0 then
begin
showmessage('没有需要查询的记录,请重新确认');
End;
  • 打赏
  • 举报
回复
vpoor 2005-01-01
procedure TForm7.Button1Click(Sender: TObject);
begin
if (edit1.Text='')and(edit2.Text='')then
begin
showMessage('没有需要查询的记录,请重新确认');
end
else
begin
adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add('select * from stockin');
adoquery1.SQL.Add('where rq='''+edit1.text+'''');
adoquery1.SQL.Add(' and sqbh='''+edit2.text+''''); //这里
adoquery1.Open;
if adoQuery1.RecordCount=0 then
begin
showmessage('没有需要查询的记录,请重新确认');
End;
  • 打赏
  • 举报
回复
Kshape 2005-01-01
adoquery1.SQL.Add('where rq='''+edit1.text+'''');
修改为:
adoquery1.SQL.Add('where rq='''+edit1.text+'''+ and sqbh=.....');
省略号处加上你自己的条件就可以啦
  • 打赏
  • 举报
回复
stan001140 2005-01-01
就是把vpoor的那句添在你主句下面啊!
  • 打赏
  • 举报
回复
yexiaozi2004 2005-01-01
能写完整来吗
就是在adoquery1.SQL.Add('where rq='''+edit1.text+'''')中写完整来吗

怎么来连上你写的and
  • 打赏
  • 举报
回复
vpoor 2005-01-01
adoquery1.SQL.Add(' and sqbh='''+edit2.text+'''');
  • 打赏
  • 举报
回复
相关推荐
发帖
数据库相关
创建于2007-08-02

2456

社区成员

Delphi 数据库相关
申请成为版主
帖子事件
创建了帖子
2005-01-01 10:00
社区公告
暂无公告