'=' 附近有语法错误。.
时间:2011-09-05
来源:互联网
procedure TMain.Button1Click(Sender: TObject);
var
tj,tj1,tj2,tj3,tj4:string;
begin
tj1:='1=1';
if checkbox1.checked then //按计算机名查询
tj1:='name1 like'''+'%'+edit1.text+'%'+'''';
tj2:='1=1';
if checkbox2.checked then //按部门名称查询
tj2:='dept like'''+'%'+edit2.text+'%'+'''';
tj3:='1=1';
if checkbox3.checked then //按使用者查询
tj3:='user like'''+'%'+edit3.text+'%'+'''';
tj4:='1=1';
if checkbox4.Checked then //按IP地址查询
tj4:='ip like'''+'%'+edit3.text+'%'+'''';
tj:='select * from eekspcb where'
+tj1+'and'+tj2+'and'+tj3+'and'+tj4;
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add(tj);
ADOQuery1.Open;
end;
end.
运行上面的代码
为什么提示:'=' 附近有语法错误。.
http://duoken.cn/showtopic-140.aspx
var
tj,tj1,tj2,tj3,tj4:string;
begin
tj1:='1=1';
if checkbox1.checked then //按计算机名查询
tj1:='name1 like'''+'%'+edit1.text+'%'+'''';
tj2:='1=1';
if checkbox2.checked then //按部门名称查询
tj2:='dept like'''+'%'+edit2.text+'%'+'''';
tj3:='1=1';
if checkbox3.checked then //按使用者查询
tj3:='user like'''+'%'+edit3.text+'%'+'''';
tj4:='1=1';
if checkbox4.Checked then //按IP地址查询
tj4:='ip like'''+'%'+edit3.text+'%'+'''';
tj:='select * from eekspcb where'
+tj1+'and'+tj2+'and'+tj3+'and'+tj4;
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add(tj);
ADOQuery1.Open;
end;
end.
运行上面的代码
为什么提示:'=' 附近有语法错误。.
http://duoken.cn/showtopic-140.aspx
作者: duoken 发布时间: 2011-09-05
你showmessage(tj)这样输出一样看看,看看哪一句出问题了,很明显
作者: varick_zhong 发布时间: 2011-09-05
open前,showmessage(adoquery1.sql.text)看看对不对,
每个and,都要有空格的,
a=1 and b=2 and c=3
每个and,都要有空格的,
a=1 and b=2 and c=3
作者: gxgyj 发布时间: 2011-09-05
tj1~4前后要留空格啊
作者: funxu 发布时间: 2011-09-05
这种拼字符串最好用 Format 和 QuotedStr 这两个函数。
作者: ZyxIp 发布时间: 2011-09-05
我是新手,听不懂你们说的是什么
作者: duoken 发布时间: 2011-09-05
相关阅读 更多
热门阅读
-
office 2019专业增强版最新2021版激活秘钥/序列号/激活码推荐 附激活工具
阅读:74
-
如何安装mysql8.0
阅读:31
-
Word快速设置标题样式步骤详解
阅读:28
-
20+道必知必会的Vue面试题(附答案解析)
阅读:37
-
HTML如何制作表单
阅读:22
-
百词斩可以改天数吗?当然可以,4个步骤轻松修改天数!
阅读:31
-
ET文件格式和XLS格式文件之间如何转化?
阅读:24
-
react和vue的区别及优缺点是什么
阅读:121
-
支付宝人脸识别如何关闭?
阅读:21
-
腾讯微云怎么修改照片或视频备份路径?
阅读:28