程序里有一个listbox 当点击查询按钮时 利用adoquery查询出所有包含listbox.items[1] 或 包含listbox.items[2]... 请问这样的查询语句该怎么写??
解决方案 »
- 关于区分多个同样标题同样类名的窗体问题
- 怎样隐藏StringGrid的一列,不要destory,也不要设置width=0,有没有好的办法
- ocx怎么装不上去???D5着急
- 图片存取,用什么工具编程更好?
- 小弟在做COM+三层东东,那里有源码啊?学习学习啊!!
- 100分求一用b/s连接的简单例子,我想用delphi6做行吗,用什么控件做就够了呢?
- ★朋友,请救我!(关于调用外部程序)
- 100分求购一个语法编译器
- yi ge wenti heheheheheh
- 怎样通过kylix生成在linux下可以直接运行的程序!!!
- FastReport3.0頁碼歸零
- 开发邮件收发系统,报酬可谈,能帮忙的兄弟致电给我
例如select A from table where A like '%'+listbox[1]+'%'
Adoquery1.Open;
select X from table where X like ''%A%''' or X like ''%A%''' or X like ''%A%'''...;
还有其他的写法吗??
union
select X from table where X like ''%B%'''
union
select X from table where X like ''%C%'''...;
begin
sqlstr:='select * from shiyukey where ShiyuKeyName like ''%'+Edit1.Text+'%'' '; ADOQuery1.sql.Clear ;
ADOQuery1.SQL.Add(sqlstr);
ADOQuery1.Open ;
end;如果edit1的内容为空将查询出所有记录
sqlstr:string;
i:integer;
begin
sqlstr:='select * from table_a ';
for i:=0 to listbox.items.count-1 do
if i=0 then
sqlstr:=sqlstr+'where field_a like ''%'+listbox.items[1] +'%'' '
else
sqlstr:=sqlstr+'and field_a like ''%'+listbox.items[1] +'%'' ';
ADOQuery1.sql.Clear ;
ADOQuery1.SQL.Add(sqlstr);
ADOQuery1.Open ;end;