程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> 網頁編程 >> ASP編程 >> ASP入門教程 >> 在ADO使用SELECT語法四

在ADO使用SELECT語法四

編輯:ASP入門教程
HAVING

    HAVING使用於SELECT 表達式中,篩選已經GROUP BY統計的記錄。在GROUP BY統計記錄後,HAVING將篩選與HAVING子句中條件相吻合的記錄。

語法如下:

SELECT fIEldlist
FROM table
WHERE selectcriteria
GROUP BY groupfIEldlist
[HAVING groupcriteria]

.groupcriteria表示決定應篩選的統計記錄。

    HAVING與WHERE相類似,是用來決定選取哪些記錄。當使用GROUP BY來統計記錄後,HAVING會決定應顯示的記錄,譬如:

SELECT 產品名稱

FROM 產品

GROUP BY 分類

HAVING 單價 > 1000

    一個HAVING子句最多可包含40個運算式,運算式之間將由AND或OR等邏輯運算子來連結。

讓我們看一個於ASP程式當中使用這個SQL指令的例子。

    我們可以利用HAVING子句決定應顯示的記錄,譬如ASP程式rs23.ASP如下,[SELECT 姓名,科目,Avg(分數) As 平均 From 考試 Group By 姓名,科目 Having Avg(分數) >=60],使用Having Avg(分數) >=60找出平均分數大於或等於60分的記錄:

<%

Set conn1 = Server.CreateObject("ADODB.Connection") 

conn1.Open "DBQ=" & Server.MapPath("ntopsamp.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};DriverId=25;FIL=MS Access;" 

Set rs2 = Server.CreateObject("ADODB.Recordset")

SqlStr = "SELECT 姓名,科目,Avg(分數) As 平均 From 考試 Group By 姓名,科目 Having Avg(分數) >=60"

rs2.Open SqlStr,conn1,1,1

Response.Write "<p>Having Avg(分數) >=60"

Do while not rs2.EOF

Response.Write "<BR>" & rs2("姓名") & " " & rs2("科目") & " 平均: " & rs2("平均")

rs2.MoveNext

Loop

rs2.Close

%>

    以上的 ASP程式rs23.ASP,在用戶端使用浏覽器,浏覽執行的結果,顯示找出平均分數大於或等於60分的記錄。

    我們也可以利用HAVING子句找出重復的記錄,譬如ASP程式rs23.ASP如下,[SELECT 代號 From 產品 Group By 代號 Having Count(代號) > 1],使用Having Count(代號) > 1找出代號重復的記錄:

<%

Set conn1 = Server.CreateObject("ADODB.Connection") 

conn1.Open "DBQ=" & Server.MapPath("ntopsamp.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};DriverId=25;FIL=MS Access;" 

Set rs2 = Server.CreateObject("ADODB.Recordset")

SqlStr = "SELECT 代號 From 產品 Group By 代號 Having Count(代號) > 1"

rs2.Open SqlStr,conn1,1,1

Response.Write "<p>找出重復Having Count(代號) > 1"

Do while not rs2.EOF

Response.Write "<BR>" & rs2("代號") 

rs2.MoveNext

Loop

rs2.Close

%>

    以上的 ASP程式rs23.ASP,在用戶端使用浏覽器,浏覽執行的結果,顯示代號重復的記錄。

Union

Union可以合並多組查詢的結果。

語法如下:

查詢1 UNION [ALL] 查詢2 [UNION [ALL]查詢3 [ ... ]]

查詢為一個SELECT表達式。

    當您使用一個 UNION 運算時,不會返回重復的記錄;若要返回所有的記錄,您可以於UNION後加上ALL,加上ALL執行查詢的速度比較快。

    在一個UNION運算中的所有查詢,字段數目必須相同。字段大小可以不同,字段資料類型也可以不同。

只有在第一個SELECT表達式中可使用別名,在其它SELECT表達式中被省略。

可以在每一個SELECT表達式中使用GROUP BY或HAVING子句,以統計查詢的結果。

可以在最後一個SELECT表達式使用ORDER BY 子句,以指定查詢的結果的排列順序。

讓我們看一個於ASP程式當中使用這個SQL指令的例子。

    可以利用Union合並兩組查詢的結果,譬如ASP程式rs25.ASP如下,[(SELECT 姓名,科目,分數 From 考試 Where 科目='算術' and 姓名='李四') Union (SELECT 姓名,科目,分數 From 考試 Where 科目='算術' and 姓名='張三')],使用Union合並兩組SELECT查詢的結果,一組為查詢李四的算術成績記錄,另一組查詢張三的算術成績記錄:

<%

Set conn1 = Server.CreateObject("ADODB.Connection") 

conn1.Open "DBQ=" & Server.MapPath("ntopsamp.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};DriverId=25;FIL=MS Access;" 

Set rs2 = Server.CreateObject("ADODB.Recordset")

SqlStr = "(SELECT 姓名,科目,分數 From 考試 Where 科目='算術' and 姓名='李四') Union (SELECT 姓名,科目,分數 From 考試 Where 科目='算術' and 姓名='張三')"

rs2.Open SqlStr,conn1,1,1

Response.Write "<p>Union"

Do while not rs2.EOF

Response.Write "<BR>" & rs2("姓名") & " " & rs2("科目") & " 分數: " & rs2("分數")

rs2.MoveNext

Loop

rs2.Close

%>

    以上的 ASP程式rs25.ASP,在用戶端使用浏覽器,浏覽執行的結果,顯示李四和張三的算術分數記錄。 
  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved