模糊查询问题

大家好，我是新手，请问如何在delphi中用adoquery实现模糊查询。我用得数据库是sql   server.  
  比如说在dangan表里查tu字段的‘双酚A项目施工图’，只需查‘双酚*'即可。 问题点数：60、回复次数：11Top

1 楼huojiangui（活见鬼）回复于 2002-03-08 09:06:02 得分 10

select   *   from   adoquery    
  where   tu   like   '双酚%'  
  就可以了呀，老兄Top

2 楼lastlove（活着真没劲）回复于 2002-03-08 09:07:36 得分 10

strsql:=select   *   from     dangan   where   tu   like   '双酚%'  
  Top

3 楼iBear（大熊 不要怀疑我的温柔）回复于 2002-03-08 09:20:24 得分 0

同意！Top

4 楼Tine2（）回复于 2002-03-08 09:20:53 得分 10

adoquery.Locate('双酚','tu',[loCaseInsensitive])Top

5 楼VFP（VFP）回复于 2002-03-08 09:24:04 得分 10

var  
    s:string;  
  begin  
        with   dm.query1   do   begin  
          s:='%'+edit1.text+'%';  
          close;  
          sql.clear;  
          sql.add('select   *   from   dangan   where   tu   like   '''+s+'''');  
          open;  
          end;Top

6 楼xu_xinyu（雪候鸟）回复于 2002-03-08 09:24:49 得分 0

同意楼上几位的发言。Top

7 楼Delit（Delit）回复于 2002-03-08 09:25:10 得分 10

建議:  
      adoquery.Locate('双酚','tu',[loCaseInsensitive])Top

8 楼VFP（VFP）回复于 2002-03-08 09:25:36 得分 10

 
      var    
      s:string;    
  begin    
              with     dm.adoquery1     do     begin    
                  s:='%'+edit1.text+'%';    
                  close;    
                  sql.clear;    
                  sql.add('select     *     from     dangan     where     tu     like     '''+s+'''');    
                  open;    
                  end    
  Top

9 楼Delit（Delit）回复于 2002-03-08 09:28:36 得分 0

D.以上答案都正確.Top

10 楼xunji（呵呵，MM，我想……）回复于 2002-03-08 09:54:20 得分 0

var  
    sqlstr:string;  
  begin  
    sqlstr:='select   *   from   dangan   where   tu   like   '+''''+'%'  
                    +trim(edit1.text)+'%'+'''';    
    with         dm.adoquery1         do          
    begin      
        close;      
        sql.clear;      
        sql.add(sqlstr);      
        open;      
    end  
  end;Top

11 楼sailbird（启航鸟）回复于 2002-03-14 11:13:42 得分 0

我这种方法100%好使，哈哈没问题，快给分！    
  with   dm.ADOQuery   do    
  begin    
  close;    
  sql.Clear;    
  sql.Add('select   *   from   employee   where   empname   like   :empname1');    
  parameters.ParamValues['empname1']:='%'+trim(Edit1.text)+'%';    
  open;    
  end;Top

相关问题

• sql
• 酚
• adoquery
• tu
• empname
• sqlstr
• clear
• edit
• begin
• from dangan where

• 帖主：songsongzh
• huojiangui
• lastlove
• Tine2
• VFP
• Delit
• VFP

• Delphi类图书
• Delphi类源码下载
• Delphi控件下载