with DataFm.ADOQueryBook do
begin
close;
sql.Clear;
sql.Add('select 客房编号 from 客房信息 where 状态=''空房'' and 类型编号=(select 类型编号 from 客房类型 where 类型名称=:vlxmc)');
Parameters.ParamByName('vlxmc').Value:=trim(roomtypebox.Text);
ExecSQL;
open;
First;
while not Eof do
begin
roomnumbox.Items.Add(fieldbyname('客房编号').AsString);
next;
end;
end;帮俺看看这段代码 为啥 我使用了 first 但是 他还是不进下面那个while 循环啊 ?在access里就可以 放到mssql 就不行 很郁闷 帮我看下啊 谢谢了
begin
close;
sql.Clear;
sql.Add('select 客房编号 from 客房信息 where 状态=''空房'' and 类型编号=(select 类型编号 from 客房类型 where 类型名称=:vlxmc)');
Parameters.ParamByName('vlxmc').Value:=trim(roomtypebox.Text);
ExecSQL;
open;
First;
while not Eof do
begin
roomnumbox.Items.Add(fieldbyname('客房编号').AsString);
next;
end;
end;帮俺看看这段代码 为啥 我使用了 first 但是 他还是不进下面那个while 循环啊 ?在access里就可以 放到mssql 就不行 很郁闷 帮我看下啊 谢谢了
解决方案 »
- 禁止程序重复运行后如何传递数据,求思路
- 怎样判断一个mdichild窗口是否获得了焦点?
- 散分~~ 回家过年了!高兴ing
- 重金请教一个简单的DLL动态调用问题,UP有分
- 关于改变文件图标的问题---求助
- 使用TADOConnection连接Oracle数据库,第一次连接成功,第二次... 555
- 谁有DBGridEh控件(及EhLib控件包),能安装在D6上,并能脱离D6运行的。我可以用人民币购买,成交地广州。
- 如何让delphi成为连接acess和excel通道
- 菜鸟提问,谢谢
- 谁知道DELPHI可不可以用C++编程
- 关于delphi的编码问题,请大家帮我分析一下。
- pos打印机与条形码的相关问题
begin
close;
sql.Clear;
sql.Add('select 客房编号 from 客房信息 where 状态=''空房'' and 类型编号=(select 类型编号 from 客房类型 where 类型名称=:vlxmc)');
Parameters.ParamByName('vlxmc').Value:=trim(roomtypebox.Text);
//ExecSQL; 这儿应该注释掉
open;
First;
while not Eof do //你这儿进不去循环,说明你的选出记录数是0,把你上面的SQL语句放到查询分析器里测试一下
begin
roomnumbox.Items.Add(fieldbyname('客房编号').AsString);
next;
end;
end;