IIS6.0 + ASP + MS SQL 2K任意一SP,如: CREATE PROCEDURE usp_ProductPopTop AS SELECT SUM(OD.Quantity) AS Times, P.ProductID, P.ProductName FROM Products P INNER JOIN OrderDetails OD ON P.ProductID = OD.ProductID GROUP BY P.ProductID, P.ProductName ORDER BY Times DESC GOASP代码: ConnStr = "Provider=sqloledb;Data Source=localhost;Initial Catalog=Shop;User Id=sa;Password=;" set conn=Server.CreateObject("ADODB.CONNECTION") Conn.Open connstr Set Cmd = Server.CreateObject("ADODB.Command")Cmd.CommandText = "usp_ProductPopTop" '存储过程名'设命令类型为 存储过程Cmd.CommandType = adCmdStoredProcSet cmd.ActiveConnection = ConnSet Rs = Cmd.Execute Rs.PageSize = mPageSizemPageCount = Rs.PageCountIF Page < 1 Then Page = 1IF Page > mPageCount Then Page = mPageCountRs.AbsolutePage = PageFor i = 1 to mPageSize
CREATE PROCEDURE usp_ProductPopTop AS
SELECT SUM(OD.Quantity) AS Times, P.ProductID, P.ProductName
FROM Products P INNER JOIN
OrderDetails OD ON P.ProductID = OD.ProductID
GROUP BY P.ProductID, P.ProductName
ORDER BY Times DESC
GOASP代码:
ConnStr = "Provider=sqloledb;Data Source=localhost;Initial Catalog=Shop;User Id=sa;Password=;"
set conn=Server.CreateObject("ADODB.CONNECTION")
Conn.Open connstr
Set Cmd = Server.CreateObject("ADODB.Command")Cmd.CommandText = "usp_ProductPopTop" '存储过程名'设命令类型为 存储过程Cmd.CommandType = adCmdStoredProcSet cmd.ActiveConnection = ConnSet Rs = Cmd.Execute Rs.PageSize = mPageSizemPageCount = Rs.PageCountIF Page < 1 Then Page = 1IF Page > mPageCount Then Page = mPageCountRs.AbsolutePage = PageFor i = 1 to mPageSize
Response.Write Rs(0) Rs.MovenextNextRs.Close....