//
close;
sql.Clear; //不要忘记
close;
sql.Clear; //不要忘记
解决方案 »
- 急求答案 LoadFromStream(const Stream: IUnknown); 如何调用?
- 发布一个用于 UBB代码转HTML的 程序
- 关于clientDateSet数据更新的问题(请教高手)
- 请问一下,用delphi怎样编写互相网上的数据库应用程序(C/S)结构?
- 关于tchart画实时曲线问题
- Delphi做的多页面浏览器源码,谁要?
- 一个关于ADOQuery的简单问题,在线等侯大虾!!!
- 请问版主大人,如何清空专家分。
- 各位高手,遇到这样一个问题,我的程序中有两个form,
- Install Shield 6.2 汉化包?
- 关于listview 的问题!
- 有关BDE的最新消息(English)
64,65,66 说少了分号
“64 65 66”程序中当然是没有的,是我自己加上去的行号是为了提问题方便些。。
TADOQuery是没有ParamByName属性和Prepare方法的
只有Parameters属性和Prepared属性。
sql.add('where(出版社=:'publish')');
应该这样吗?
TO softwing(无人喝彩):
Parameters属性要替代PARAMBYNAME的作用,该怎么用啊,请指点。谢了!
begin
close;
clear;
sql.Add('select 书名,出版时间,作者');
sql.Add('from 基本信息表');
sql.add('where(出版社=:publish)');
sql.Add('and(著作类型=:type1)');
sql.add('and(藏书来源=:source)');
parameters.ParseSQL(SQL.text,True);
parameters.parambyname('publish').asstring:=memopublish.Text;
parameters.parambyname('type').asstring:=memotype.Text;
parameters.paranbyname('source').asstring:=memosource.Text;
prepare;
open;
end;
with ADOQuerynormal do
begin
close;
sql.Add('select 书名,出版时间,作者');
sql.Add('from 基本信息表');
sql.add('where(出版社=:publish)');
sql.Add('and(著作类型=:type1)');
sql.add('and(藏书来源=:source)');
prepare;
Parameters.CreateParameter('publish', ftString, pdInput,0,emopublish.Text);
Parameters.CreateParameter('type', ftString, pdInput,0,memotype.Text);
Parameters.CreateParameter('source', ftString, pdInput,0,memosource.Text);
open;
end;