Question

delphi中连续两个sql语句产生错误

有一个DBEdit与姓名字段相连
相关代码如下
with ADOQuery1 do
begin
close;
sql.clear;

adoquery1.sql.add('select * from Student_info');
adoquery1.sql.add('where 学号='''+xm+'''');
adoquery1.sql.add('select count(*) as Exists_ID from Student_info');
adoquery1.sql.add('where 学号='''+xm+'''');
open;
if (FieldByName('Exists_ID').AsInteger=0) then
ShowMessage('无符合条件的记录');

end
若没有第二个sql语句正常，有第二个之后提示找不到DBEdit对应的姓名字段
为什么？如何改？

Answer 1

这本来就是2个独立的sql。应该作2次执行。
代码中的逻辑应该是这样的：？
先执行第2个sql来判断是否有记录存在。
如果没有记录，再执行查询。

所以，应该要执行2次。

Answer 2

sql中的语句没有你这种写法的。
select * from Student_info where 学号='''+xm+''' select count(*) as Exists_ID from Student_info where 学号='''+xm+''' 你自几看下，这样肯定不对的.你这语句没有分开，或者说要加个分号。。。但是在DELPHI7中不能这样写，要不然会有逻辑错误。。

Answer 3

分开写，再弄个Query1查
with ADOQuery2 do
begin
adoquery2.sql.add('select count(*) as Exists_ID from Student_info');
adoquery1.sql.add('where 学号='''+xm+'''');
open
if (FieldByName('Exists_ID').AsInteger=0) then
begin
ShowMessage('无符合条件的记录');
exit；
end；
end

with ADOQuery1 do
begin
close;
sql.clear;

adoquery1.sql.add('select * from Student_info');
adoquery1.sql.add('where 学号='''+xm+'''');
open;

end

Answer 4

delphi不太清楚，但我觉得不管怎么说，2个语句间应该有个;吧。

adoquery1.sql.add('select * from Student_info');
adoquery1.sql.add('where 学号='''+xm+''；''); //这里加个分号看看。