<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="top.htm"--><!--#include file="conn.asp"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>盘古网|站点统计</title>
</head>

<body>
<%
set rsask=server.CreateObject("adodb.recordset")
rsask.activeconnection=conn
rsask.cursortype=3
sql="select * from askrec order by askcount desc"
rsask.open sql
%>
<table width="60%" height="86" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#99CC00">
  <tr>
    <td colspan="3" bgcolor="#336633"><span style="color: #FFFFFF; font-weight: bold; font-size: 14px">站点统计</span></td>
  </tr>
  <tr>
    <td height="29"><div align="center" class="STYLE9">来源IP</div></td>
    <td><div align="center" class="STYLE9">访问次数</div></td>
    <td><div align="center" class="STYLE9">最后访问日期</div></td>
  </tr>
  <%
  do while not rsask.eof
  %>
  <tr>
    <td height="31"><div align="center" class="STYLE9"><%=rsask("ip")%></div></td>
    <td><div align="right" class="STYLE9"><%=rsask("askcount")%></div></td>
    <td><div align="center" class="STYLE9"><%=rsask("askdate")%></div></td>
  </tr>
  <%
  rsask.movenext
  loop
  %>
</table>
<p>&nbsp;</p>
<p>&nbsp;</p>
</body>
</html>
<!--#include file="bottom.htm"-->
<%
set rsask=nothing
conn.close
%>
