读书人

delphi7+sql2000查询字符改错解决思路

发布时间: 2012-03-14 12:01:12 作者: rapoo

delphi7+sql2000查询字符改错
自定义的一个查询函数QueryBrige,其中Brige1和Brige2两个参数程序中用combox.text和edit.text做实参,比如combox.text为字段名“桥梁名称”,edit.text为查询条件“=***立交桥”;DAHelper.ExeSqlQuery是一个执行sql 语句的函数;但是函数QueryBrige运行中总是提示字符串sql有语法错误,请大家帮忙改错,多谢
function QueryBrige(Brige1:string;Brige2:string):TADOQuery;
var
sql:string;
begin
sql:='select * from 桥涵设施普查基层表 where''''+Brige1+''''+Brige2+'''';
result:=DAHelper.ExeSqlQuery(sql);
end;

[解决办法]
sql:='select * from 桥涵设施普查基层表 where+''''+Brige1+''''+Brige2+'''';


或者用delphi 自带的这个函数 QuotedStr

sql:='select * from 桥涵设施普查基层表 where'+QuotedStr(Brige1)+QuotedStr(Brige2);
还有你这个 Brige1 Brige2 要写好 其实只要一个参数就可以了


function QueryBrige(Brige:string):TADOQuery;
var
sql:string;
begin
sql:='select * from 桥涵设施普查基层表 where '+(Brige1);
result:=DAHelper.ExeSqlQuery(sql);
end;

调用 QueryBrige(combox.text + '=' + edit.text);

读书人网 >.NET

热点推荐