28,409
社区成员




<table>
<%
'''''''''''''''''''
'''DB CONNECTION'''
'''''''''''''''''''
dim zh, lp
'TABLE HEADER
response.write("<tr><td></td>")
FOR lp = 1 to 8
response.write("<td>礼品"&lp&"</td>")
NEXT
response.write("<tr>")
'TABLE CONTENT
FOR zh = 1 to 13
response.write("<tr><td>支行"&zh&"</td>")
FOR lp = 1 to 8
sSQL = "select SUM (数量) AS sl FROM 表A WHERE 礼品 = 礼品"&lp&" AND 支行 = 支行"&zh&""
set oRS = oConn.Execute(sSQL)
response.write("<td>" & oRs("sl") & "</td>")
NEXT
response.write("</tr>")
NEXT
'数量合计
response.write("<tr><td>数量合计</td>")
FOR lp = 1 to 8
sSQL = "select SUM (数量) AS sl FROM 表A WHERE 礼品 = 礼品"&lp&"
set oRS = oConn.Execute(sSQL)
response.write("<td>" & oRs("sl") & "</td>")
NEXT
response.write("</tr>")
%>
</table>