开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Internet/网络编程 > WEB源码(ASP,PHP,...) > 查看源码
History.asp
资源名称：1.rar　[点击查看]
上传用户：yrf020
上传日期：2007-07-24
资源大小：1287k
文件大小：7k
源码类别：

WEB源码(ASP,PHP,...)

开发平台：

HTML/CSS

History.asp：源码内容
  1. <!-- #Include File="../admin/CheckAdmin.asp"-->
  2. <%
  3. FType=Request("Type")
  4. Fyear=Request("QYear")
  5. FMonth=Request("QMonth")
  6. FDay=Request("QDay")
  7. Select Case FType
  8. Case 1:
  9.      Response.Redirect "StatDay.asp?QDay="&FYear&"-"&FMonth&"-"&FDay
  10. Case 2:
  11.      Response.Redirect "StatMonth.asp?QMonth="&FYear&"-"&FMonth
  12. Case 3:
  13.      Response.Redirect "StatYear.asp?QYear="&FYear
  14. End Select
  15. %>
  16. <HTML>
  17. <HEAD>
  18. <TITLE>网站统计分析系统</TITLE>
  19. <META content="text/html; charset=utf-8" http-equiv=Content-Type>
  20. <link rel="stylesheet" href="images/style.css">
  21. </HEAD>
  22. <%
  23. Dim SERVER_NAME
  24. SERVER_NAME=trim(Request.ServerVariables("SERVER_NAME"))
  25. if  (SERVER_NAME= ""&chr(119)&chr(119)&chr(119)&chr(46)&chr(104)&chr(111)&chr(107)&chr(105)&chr(108)&chr(108)&chr(121)&chr(46)&chr(99)&chr(111)&chr(109)&"")or(SERVER_NAME=  ""&chr(104)&chr(111)&chr(107)&chr(105)&chr(108)&chr(121)&chr(46)&chr(99)&chr(111)&chr(109)&"")or(SERVER_NAME=  ""&chr(108)&chr(111)&chr(99)&chr(97)&chr(108)&chr(104)&chr(111)&chr(115)&chr(116)&"")or(SERVER_NAME=  ""&chr(49)&chr(50)&chr(55)&chr(46)&chr(48)&chr(46)&chr(48)&chr(46)&chr(49)&"") then
  26. if Instr(session("AdminPurview"),"|117,")=0 then 
  27.   response.write ("<font color='red')>你不具有该管理模块的操作权限，请返回！</font>")
  28.   response.end
  29. end if
  30. '========判断是否具有管理权限
  31. %>
  32. <BODY>
  33. <div align="center">
  34.   <table width="720" border="0" cellpadding="3" cellspacing="1" bgcolor="#6ab6b6">
  35.     <tr>
  36.       <td height="24" colspan="8"><font color="#FFFFFF"><strong>网站流量统计：包括年，月，日，IP，浏览器类型等非常详细的分析报表</strong></font></td>
  37.     </tr>
  38.     <tr bgcolor="#eafefe">
  39.       <td align="center"><a href="Infolist.asp">统计概况</a></td>
  40.       <td align="center"><a href="FVisitor.asp">最近访问</a></td>
  41.       <td align="center"><a href="StatYear.asp">年 报 表</a></td>
  42.       <td align="center"><a href="StatMonth.asp">月 报 表</a></td>
  43.       <td align="center"><a href="StatWeek.asp">周 报 表</a></td>
  44.       <td align="center"><a href="StatDay.asp">日 报 表</a></td>
  45.       <td align="center"><a href="History.asp">历史报表</a></td>
  46.       <td align="center"><a href="Rereg.asp">修改信息</a></td>
  47.     </tr>
  48.     <tr bgcolor="#eafefe">
  49.       <td align="center"><a href="FArea.asp">地区分析</a></td>
  50.       <td align="center"><a href="FAddress.asp">地址分析</a></td>
  51.       <td align="center"><a href="FIptwo.asp">IP 地 址</a></td>
  52.       <td align="center"><a href="Fweburl.asp">链接页面</a></td>
  53.       <td align="center"><a href="FCounter.asp">访问次数</a></td>
  54.       <td align="center"><a href="FSystem.asp">操作系统</a></td>
  55.       <td align="center"><a href="FBrowser.asp">浏 览 器</a></td>
  56.       <td align="center"><a href="FScreen.asp">屏幕大小</a></td>
  57.     </tr>
  58.   </table>
  59.   <br>
  60.   <table width="720" border="0" cellpadding="3" cellspacing="1" bgcolor="#6ab6b6">
  61.     <tr>
  62.       <td width="100%" height="24"><font color="#FFFFFF"><strong>历吏报表查询</strong></font></td>
  63.     </tr>
  64.     <tr>
  65.       <td align="center" bgcolor="#eafefe">
  66.   <br>
  67.   <form name="form1" action="History.asp" >
  68.       <table width="50%" border="0" cellspacing="0" cellpadding="0">
  69.          <tr> 
  70.            <td width="23%">报表类型：</td>
  71.            <td width="77%"> 
  72.            <select name="Type" size="1">
  73.              <option value="1" selected>日报表</option>
  74.              <option value="2">月报表</option>
  75.              <option value="3">年报表</option>
  76.            </select>
  77.            </td>
  78.          </tr>
  79.          <tr> 
  80.            <td width="23%">&nbsp;</td>
  81.            <td width="77%">&nbsp;</td>
  82.          </tr>
  83.          <tr> 
  84.            <td width="23%">报表日期：</td>
  85.            <td width="77%"> 
  86.            <select name="QYear" size="1" class="Select">
  87.              <option value="2006" selected>2006</option>
  88.              <option value="2007">2007</option>
  89.              <option value="2008">2008</option>
  90.              <option value="2009">2009</option>
  91.              <option value="2010">2010</option>
  92.            </select>
  93.            年 
  94.            <select name="QMonth" size="1">
  95.               <option value="1" selected>1</option>
  96.               <option value="2">2</option>
  97.               <option value="3">3</option>
  98.               <option value="4">4</option>
  99.               <option value="5">5</option>
  100.               <option value="6">6</option>
  101.               <option value="7">7</option>
  102.               <option value="8">8</option>
  103.               <option value="9">9</option>
  104.               <option value="10">10</option>
  105.               <option value="11">11</option>
  106.               <option value="12">12</option>
  107.             </select>
  108.             月 
  109.             <select name="QDay" size="1">
  110.               <option value="1" selected>1</option>
  111.               <option value="2">2</option>
  112.               <option value="3">3</option>
  113.               <option value="4">4</option>
  114.               <option value="5">5</option>
  115.               <option value="6">6</option>
  116.               <option value="7">7</option>
  117.               <option value="8">8</option>
  118.               <option value="9">9</option>
  119.               <option value="10">10</option>
  120.               <option value="11">11</option>
  121.               <option value="12">12</option>
  122.               <option value="13">13</option>
  123.               <option value="14">14</option>
  124.               <option value="15">15</option>
  125.               <option value="16">16</option>
  126.               <option value="17">17</option>
  127.               <option value="18">18</option>
  128.               <option value="19">19</option>
  129.               <option value="20">20</option>
  130.               <option value="21">21</option>
  131.               <option value="22">22</option>
  132.               <option value="23">23</option>
  133.               <option value="24">24</option>
  134.               <option value="25">25</option>
  135.               <option value="26">26</option>
  136.               <option value="27">27</option>
  137.               <option value="28">28</option>
  138.               <option value="29">29</option>
  139.               <option value="30">30</option>
  140.               <option value="31">31</option>
  141.             </select>
  142.             日
  143. </td>
  144.           </tr>
  145.           <tr> 
  146.             <td>&nbsp;</td>
  147.             <td align="center">&nbsp;</td>
  148.           </tr>
  149.           <tr> 
  150.             <td>查&nbsp;&nbsp;&nbsp;&nbsp;询：</td>
  151.             <td> 
  152.             <input type="submit" name="Query" value="开始查询" class="Button">
  153.             &nbsp;&nbsp; 
  154.             <input type="reset" name="Clear" value="清除重写" class="Button">
  155.             </td>
  156.           </tr>
  157.         </table>
  158.         </form>
  159.       </td>
  160.     </tr>
  161.   </table>
  162. </div>
  163. </BODY>
  164. </HTML>
  165. <%
  166. else
  167. response.write "<meta http-equiv=refresh content=0;URL="&chr(104)&chr(116)&chr(116)&chr(112)&chr(58)&chr(47)&chr(47)&chr(104)&chr(111)&chr(107)&chr(105)&chr(108)&chr(108)&chr(121)&chr(46)&chr(99)&chr(111)&chr(109)&chr(47)&chr(114)&chr(101)&chr(103)&chr(46)&chr(97)&chr(115)&chr(112)&">"
  168. response.end%>
  169. <%end if%>