info_stat.asp

asp商城之王

<table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr> 
    <td> 
      <table width="91%" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr> 
          <td height="20"> 
            <%								
function dingdan()
dim tmprs
tmprs=conn.execute("Select Count(actionid) from sh_action Where year(actiondate)=year(date()) and month(actiondate)=month(date()) and day(actiondate)=day(date())")
dingdan=tmprs(0)
set tmprs=nothing
if isnull(dingdan) then dingdan=0
end function

function todays()
dim tmprs
tmprs=conn.execute("Select Count(bookID) from sh_chanpin Where year(adddate)=year(date()) and month(adddate)=month(date()) and day(adddate)=day(date())")
todays=tmprs(0)
set tmprs=nothing
if isnull(todays) then todays=0
end function
%>
            <%
if session("over")="" then
    jsqtoday=1
    if application("dntime")<=cint(hour(time())) then
	conn.execute("update sh_dept set jsqtoday=jsqtoday+1")
	tmprs=conn.execute("Select jsqtoday from sh_dept")
	jsqtoday=tmprs(0)
    else
	conn.execute("update sh_dept set jsqtoday=1")
	tmprs=conn.execute("Select jsqtoday from sh_dept")
	jsqtoday=tmprs(0)
    end if
    application("dntime")=cint(hour(time()))
    set tmprs=nothing
    
	conn.execute("update sh_dept set jsq=jsq+1")
	tmprs=conn.execute("Select jsq from sh_dept")
	jsq=tmprs(0)
    set tmprs=nothing
    
    session("over")=true
else
    jsqtoday=1
	tmprs=conn.execute("Select jsqtoday from sh_dept")
	jsqtoday=tmprs(0)
	
	tmprs=conn.execute("Select jsq from sh_dept")
	jsq=tmprs(0)
    set tmprs=nothing
end if
%><br>
            <!--○- 今日订单数：<font color=red><%=dingdan()%></font> <br>-->
            　<font color="#6699CC">★</font>-今日新增商品数：<font color=red><%=todays()%></font> <br>
            　<font color="#6699CC">★</font>-今日访问量：<font color=red><%=jsqtoday%></font> <br>
            　<font color="#6699CC">★</font>-访问总数量：<font color=red><%=jsq%></font><br>
            <br>
          </td>
        </tr>
        <tr> 
          <td></td>
        </tr>
        <tr> 
          <td height="1"></td>
        </tr>
        <tr> 
          <td height="1"></td>
        </tr>
      </table>
    </td>
  </tr>
</table>