日韩性视频-久久久蜜桃-www中文字幕-在线中文字幕av-亚洲欧美一区二区三区四区-撸久久-香蕉视频一区-久久无码精品丰满人妻-国产高潮av-激情福利社-日韩av网址大全-国产精品久久999-日本五十路在线-性欧美在线-久久99精品波多结衣一区-男女午夜免费视频-黑人极品ⅴideos精品欧美棵-人人妻人人澡人人爽精品欧美一区-日韩一区在线看-欧美a级在线免费观看

歡迎訪問 生活随笔!

生活随笔

當前位置: 首頁 > 运维知识 > 数据库 >内容正文

数据库

Delphi与SQL模糊查询(转载)

發布時間:2024/4/15 数据库 46 豆豆
生活随笔 收集整理的這篇文章主要介紹了 Delphi与SQL模糊查询(转载) 小編覺得挺不錯的,現在分享給大家,幫大家做個參考.

1.用變量進行模糊查詢??
對數據進行模糊查詢主要用SQL語句LIKE來實現。該語句放在Where語句的后面,使用標識符“%”、“_”、“[]”、“[^]”對數據進行模糊查詢。??
例如,對姓名為“王”,并且姓名為兩個字的學生信息。??
Select * FROM MR_Student where 姓名 like '林_'??
例如,查詢數學成績在70~79之間的學生信息。??
Select * FROM MR_Student where 數學 like '7[0123456789]'??
例如,查詢除三年級二班的所有學生信息。??
Select * FROM MR_Student where 班級 like '三年[^二]_'??
例如,查詢三年級的所有學生信息。??
Select * FROM MR_Student where 班級like '三*'??
下面對姓名進行模糊查詢,只要在“姓名”文本框中輸入名字中的任意一個字,便可以查找相關人員的信息。??
操作步驟如下:??
(1)運行Delphi,在窗體中添加TADOConnection、TADOQuery、TDateTimePicker、TDataSource、TButton和TDBGrid等組件。??
(2)主要程序代碼如下:??
? with ADOQuery1 do??
? begin??
??? close;??
??? SQL.Clear;??
??? SQL.Add('Select * FROM MR_Student where 姓名 like '+''''+'%'+Trim(edit1.Text)+'%'+'''');??
??? open;??
? end;??
上面的SQL語句也可以寫成如下形式:??
SQL.Add('Select * FROM MR_Student where 姓名 like ''%'+Trim(edit1.Text)+'%''');??
??
??
2.使用參數進行模糊查詢??
在Delphi中進行模糊查詢時,可以用TADOQuery組件來向SQL語句中傳遞參數。??
其格式為:“Like:參數名”。??
利用TADOQuery組件的ParamByName方法將值傳遞給參數。??
* 注意:在Like后面必須加空格。??
下面用TADOQuery組件進行參數傳遞,并對數據進行模糊查詢。??
操作步驟如下:??
(1)運行Delphi,在窗體中添加TADOConnection、TADOQuery、TDateTimePicker、TDataSource、TButton和TDBGrid等組件。??
(2)主要程序代碼如下:??
? with ADOQuery1 do??
? begin??
??? close;??
??? SQL.Clear;??
??? SQL.Add('Select * FROM MR_Student where 姓名 like :aa');??
??? Parameters.ParamByName('aa').Value:='%'+trim(Edit1.text)+'%';??
??? open;??
? end;??
????
????
3.復雜模糊查詢??
在對信息進行模糊查詢的時候,也可以通過邏輯運算符(AND、OR、NOT)插入其他的查詢條件來提高查詢的速度。??
下面是模糊查詢和其他查詢方法相結合而形成的復雜模糊查詢。??
操作步驟如下:??
(1)運行Delphi,在窗體中添加TADOConnection、TADOQuery、TDateTimePicker、TDataSource、TButton、TComboBox和TDBGrid等組件。??
(2)主要程序代碼如下:??
? if CheckBox1.Checked=true then??
?? Str := ' and 班級='+''''+ComboBox1.Text+''''??
? else??
?? ComboBox1.Enabled := False;??
? with ADOQuery1 do??
? begin??
?? close;??
?? SQL.Clear;??
?? SQL.Add('Select * FROM MR_Student where 姓名 like ''%'+Trim(edit1.Text)+'%'''+Str);??
?? open;??
? end;

?

轉載于:https://www.cnblogs.com/shawnloong/archive/2010/11/11/1874806.html

總結

以上是生活随笔為你收集整理的Delphi与SQL模糊查询(转载)的全部內容,希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯,歡迎將生活随笔推薦給好友。