首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > .NET >

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

2012-03-14 
delphi7+sql2000查询字符改错自定义的一个查询函数QueryBrige,其中Brige1和Brige2两个参数程序中用combox.

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);

热点排行