我是个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;
解决方案 »
- Delphi实现通过字符串执行Published带参方法
- 我按照网上介绍对QuickReport进行了修改,做了自己的Preview界面,在SDI上可以通过,但在MDI却不行.错误...
- 在2000下开发的程序,在xp下运行时,form出现滚动条,如何使form象在2000下完全显示?
- Delphi7编译后的代码是本地代码还是中间代码??
- 解决大数据量的导入导出问题,提供有价值的人,将给高分。(急!!!)
- *.rec格式的文件能转化成ACCESS表吗?
- 请问诸位高手:如何在Win2K以及WinXP下读取硬件信息????
- 有什么方法可以判断网络通不通?
- 求一个ActiveX控件
- 求漂亮的工廠系統界面(或皮膚)
- 如何提高打开数据库的速度?(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
记录存在....