<分組查詢（GROUP BY）>是SQL中的一種特殊查詢方式，用于根據(jù)一個(gè)或多個(gè)列對(duì)結(jié)果進(jìn)行分組。通過使用<分組查詢>，我們可以從數(shù)據(jù)庫中獲取有關(guān)數(shù)據(jù)的匯總信息。在ASP開發(fā)中，使用SQL語句和ASP標(biāo)記來實(shí)現(xiàn)動(dòng)態(tài)網(wǎng)頁模塊是很常見的。本文將介紹如何使用ASP和SQL創(chuàng)建一個(gè)動(dòng)態(tài)網(wǎng)頁模塊，并通過一個(gè)具體的例子來說明其工作原理和應(yīng)用場(chǎng)景。
例如，假設(shè)我們有一個(gè)數(shù)據(jù)庫表格記錄了一個(gè)電商平臺(tái)上不同產(chǎn)品的銷售數(shù)量和價(jià)格等信息。我們想要根據(jù)商品類別（category）對(duì)銷售數(shù)據(jù)進(jìn)行匯總，以得到每個(gè)商品類別的銷售總額和銷售數(shù)量。我們可以使用<分組查詢>來實(shí)現(xiàn)這個(gè)目標(biāo)。
首先，我們需要在數(shù)據(jù)庫中創(chuàng)建一個(gè)名為"products"的表格，包含字段：id（產(chǎn)品ID）、name（產(chǎn)品名稱）、category（產(chǎn)品類別）、price（產(chǎn)品單價(jià)）和quantity（銷售數(shù)量）。接下來，我們可以使用以下SQL語句來創(chuàng)建一個(gè)動(dòng)態(tài)網(wǎng)頁模塊，將<分組查詢>應(yīng)用于該例子中：
<%@ Language=VBScript %>
<% Option Explicit %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.SqlClient" %>
<html>
<head>
<title>商品銷售匯總信息</title>
</head>
<body>
<%
' 連接到數(shù)據(jù)庫
Dim conn
conn = "Provider=SQLOLEDB;Data Source=localhost;Initial Catalog=your_database_name;User ID=your_username;Password=your_password;"
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open conn
' 執(zhí)行分組查詢
Dim strSQL
strSQL = "SELECT category, SUM(price * quantity) AS TotalSales, SUM(quantity) AS TotalQuantity FROM products GROUP BY category"
' 獲取查詢結(jié)果
Dim objRS
Set objRS = objConn.Execute(strSQL)
' 顯示查詢結(jié)果
Response.Write "<table border='1'>"
Response.Write "<tr><th>商品類別</th><th>銷售總額</th><th>銷售數(shù)量</th></tr>"
While Not objRS.EOF
Response.Write "<tr>"
Response.Write "<td>" & objRS.Fields("category").Value & "</td>"
Response.Write "<td>" & objRS.Fields("TotalSales").Value & "</td>"
Response.Write "<td>" & objRS.Fields("TotalQuantity").Value & "</td>"
Response.Write "</tr>"
objRS.MoveNext
Wend
Response.Write "</table>"
' 釋放資源
objRS.Close
Set objRS = Nothing
objConn.Close
Set objConn = Nothing
%>
</body>
</html>