monthsale.asp

漂亮的模板,商店销售统计,日销售,月销售统计,销售录入

<!-- pingmac www.pingmac.com -->

<!--#include file="../dbconnect/conn.asp" -->
<%
if Session("yufen")="" then
s_yuefen = month(now())
else
s_yuefen = Session("yufen")
end if
if trim(request("yuefen"))<>"" then
if Session("yufen")="" or trim(request("yuefen"))<>"" then
s_yuefen = trim(request("yuefen"))
Session("yufen") = s_yuefen
end if
end if
if trim(request("account"))="" then
s_keyword = "saleTotal"
else
s_keyword = trim(request("account"))
end if
msaleyear=year(now())
msalemonth=month(now())
msaleday=day(now())
Set Rs1 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='1'")
%>
<%
Set Rs2 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='2'")
%>
<%
Set Rs3 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='3'")
%>
<%
Set Rs4 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='4'")
%>
<%
Set Rs5 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='5'")
%>
<%
Set Rs6 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='6'")
%>
<%
Set Rs7 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='7'")
%>
<%
Set Rs8 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='8'")
%>
<%
Set Rs9 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='9'")
%>
<%
Set Rs10 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='10'")
%>
<%
Set Rs11 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='11'")
%>
<%
Set Rs12 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='12'")
%>
<%
Set Rs13 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='13'")
%>
<%
Set Rs14 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='14'")
%>
<%
Set Rs15 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='15'")
%>
<%
Set Rs16 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='16'")
%>
<%
Set Rs17 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='17'")
%>
<%
Set Rs18 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='18'")
%>
<%
Set Rs19 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='19'")
%>
<%
Set Rs20 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='20'")
%>
<%
Set Rs21 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='21'")
%>
<%
Set Rs22 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='22'")
%>
<%
Set Rs23 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='23'")
%>
<%
Set Rs24 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='24'")
%>
<%
Set Rs25 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='25'")
%>
<%
Set Rs26 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='26'")
%>
<%
Set Rs27 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='27'")
%>
<%
Set Rs28 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='28'")
%>
<%
Set Rs29 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='29'")
%>
<%
Set Rs30 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='30'")
%>
<%
Set Rs31 = Conn.execute("Select Sum(["&s_keyword&"]) as sumreveuue From SalesData where saleyear='"&msaleyear&"' and salemonth='"&s_yuefen&"' and saleday='31'")
%>
 <%
if Rs1("sumreveuue")<>"" then 
sumreveuue1=Rs1("sumreveuue")
else
sumreveuue1=0
end if 
if Rs2("sumreveuue")<>"" then 
sumreveuue2=Rs2("sumreveuue")
else
sumreveuue2=0
end if 
if Rs3("sumreveuue")<>"" then 
sumreveuue3=Rs3("sumreveuue")
else
sumreveuue3=0
end if 
if Rs4("sumreveuue")<>"" then 
sumreveuue4=Rs4("sumreveuue")
else
sumreveuue4=0
end if 
if Rs5("sumreveuue")<>"" then 
sumreveuue5=Rs5("sumreveuue")
else
sumreveuue5=0
end if 
if Rs6("sumreveuue")<>"" then 
sumreveuue6=Rs6("sumreveuue")
else
sumreveuue6=0
end if 
if Rs7("sumreveuue")<>"" then 
sumreveuue7=Rs7("sumreveuue")
else
sumreveuue7=0
end if 
if Rs8("sumreveuue")<>"" then 
sumreveuue8=Rs8("sumreveuue")
else
sumreveuue8=0
end if 
if Rs9("sumreveuue")<>"" then 
sumreveuue9=Rs9("sumreveuue")
else
sumreveuue9=0
end if 
if Rs10("sumreveuue")<>"" then 
sumreveuue10=Rs10("sumreveuue")
else
sumreveuue10=0
end if 
if Rs11("sumreveuue")<>"" then 
sumreveuue11=Rs11("sumreveuue")
else
sumreveuue11=0
end if 
if Rs12("sumreveuue")<>"" then 
sumreveuue12=Rs12("sumreveuue")
else
sumreveuue12=0
end if 
if Rs13("sumreveuue")<>"" then 
sumreveuue13=Rs13("sumreveuue")
else
sumreveuue13=0
end if 
if Rs14("sumreveuue")<>"" then 
sumreveuue14=Rs14("sumreveuue")
else
sumreveuue14=0
end if 
if Rs15("sumreveuue")<>"" then 
sumreveuue15=Rs15("sumreveuue")
else
sumreveuue15=0
end if 
if Rs16("sumreveuue")<>"" then 
sumreveuue16=Rs16("sumreveuue")