我是个DELPHI新手,求救各位帮!
我用DELPHI做数据库前台,在DataModuleADO模块中放了ADOConnection和ADOQuery控件,利用ADOQuery进行“书号”录入前的判断,可运行是却出现 ADOQuery1:Parameter 'Code'not found 的错误,请各位帮忙,谢!begin
with DataModuleADO.ADOQuery1 do
begin
SQL.Clear;
SQL.Add('select * from Book where Code :Code');//Code是书号的列名
Parameters.ParamByName('Code').value :=Edit1.Text;
Open;
if RecordCount<>0 then //书名存在
begin
MessageDlg('书号<' + Edit1.Text + '>已存在',MTERROR,[MBOK],0);
edit1.SetFocus;
exit;
else
............//录入
end;
close;
end;
end;
我用DELPHI做数据库前台,在DataModuleADO模块中放了ADOConnection和ADOQuery控件,利用ADOQuery进行“书号”录入前的判断,可运行是却出现 ADOQuery1:Parameter 'Code'not found 的错误,请各位帮忙,谢!begin
with DataModuleADO.ADOQuery1 do
begin
SQL.Clear;
SQL.Add('select * from Book where Code :Code');//Code是书号的列名
Parameters.ParamByName('Code').value :=Edit1.Text;
Open;
if RecordCount<>0 then //书名存在
begin
MessageDlg('书号<' + Edit1.Text + '>已存在',MTERROR,[MBOK],0);
edit1.SetFocus;
exit;
else
............//录入
end;
close;
end;
end;
解决方案 »
- TApi拨号后播放语音的问题
- 为何调用DLL不成功呢?
- 求Delphi程序员工作,工作一年半,(广州)
- qreport中qrmemo的数据如何自动换行啊!急啊!
- 如何在多线程中使用ADO数据控件操作数据库?
- 有关Delphi中消息处理
- 如何動態設置添加DBGrid的Column???
- [技术讨论]对TClientSocket和TServerSocket的进一步封装
- 怎样对多个字段进行模糊查询。。在线等候,谢谢。
- 熟悉Asp/MTS/COM+的请进,这个问题可能很难,也可能很简单
- 如何提高打开数据库的速度?(SQL2000,ADO方式)
- 兄弟们,对于OCX感兴趣的进来看看吧(跟帖有分)!!!!!!!
SQL.Clear;
SQL.Add('select * from Book where Code ='''
+ Edit1.Text + '''');
Open;
很奇怪,你的那一句为什么差一个等号呢?
如果这样的话 还是不行的话 那么就不要参数了 直接写吧 不知道为什么 有的时候就是有这个莫名其妙的问题的 我也是遇见过的 你再试试吧
adoquery1.close;
adoquery1.sql.clear;
adoquery1.sql.add('select * from book where code='''+edit1.text+'''');
try
adoquery1.open;
except
showmessage('open book table error');
end;
if adoquery1.eof then
showmessage('cannot fount')
esle
记录存在....