<!--#include file="tj_config.asp"--><html><head><meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta http-equiv="Content-Language" content="zh-cn">
<link rel="stylesheet" type="text/css" href="inc/css.css"></head>
<body topmargin=5 rightmargin=0 leftmargin=0 vlink=#000000>
<%
if Request.Cookies("WrzcNet")("admin_class")<>0 then
response.write "你没有这个权限!"
response.end
end if
%>
<%set conn=server.createobject("adodb.connection")
DBPath = Server.MapPath(connpath)
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
if request("action")="del" then
Response.Cookies(mNameEn)("lao")=0
conn.execute("delete * from view")
Set rs=Server.CreateObject("ADODB.Recordset")
rs.open "Select * from vjian",conn,1,3
rs("today")=1
rs("yesterday")=0
rs("vtop")=1
rs("starttime")=date()
rs("vdate")=date()
rs.update
rs.close
set rs=nothing
vyear=year(now())
vmonth=month(now())
vday=day(now())
vhour=hour(now())
vtime=now()
vweek=weekday(now())
vsoft="Other"
vOs="Other"
vip="127.0.0.1"
vwhere="other"
vwheref="网软志成"
vcome="www.Wrzc.Net"
vpage="www.Wrzc.Net"
vwidth=Request("screenwidth")
Set rs=Server.CreateObject("ADODB.Recordset")
rs.open "Select * from view",conn,1,3
rs.addnew
rs("vyear")=vyear
rs("vmonth")=vmonth
rs("vday")=vday
rs("vhour")=vhour
rs("vtime")=vtime
rs("vweek")=vweek
rs("vip")=vip
rs("vwhere")=vwhere
rs("vwheref")=vwheref
rs("vcome")=vcome
rs("vpage")=vpage
rs("vsoft")=vsoft
rs("vos")=vos
rs("vwidth")=vwidth
rs.update
rs.close
set rs=nothing
conn.Close
set conn=nothing
Response.Write "<script language=javascript>alert('数据清理成功，点击确定返回');window.location.href='ad_tj.asp';</script>"
response.End
end if%><!--#include file="tj_top.asp"--><br><table width="500" cellspacing="0" align="center" cellpadding="0" border="0">
  <tr><td colspan="4"><img src="img/photoup.gif"></td></tr>
  <tr height="30">
    <td width="1" class="backs"></td>
    <td colspan="2" width="489"class="backq">
		&nbsp; <img src="img/tb_title.gif" align=absmiddle> &nbsp;∷∷∷ 总 体 数 据 ∷∷∷ 
	</td>
    <td width="1" class="backs"></td>
  </tr>
  <tr height="50">
    <td width="1" class="backs"></td>
    <td class="backq" valign=top>
		<p style="line-height: 140%; margin-left: 25; margin-right: 0; margin-top: 10; margin-bottom: 5" align=left>
		清除所有历史统计数据（不可恢复，建议先备份数据）<br>
		返回&nbsp;&nbsp; <a href="ad_tjclear.asp?action=del" onClick="return confirm('您确定清除统计数据吗，该操作无法恢复？')">确认清除</a></td>
    <td width="1" class="backs"></td>
  </tr>
  <tr><td colspan="4"><img src="img/photodown.gif"></td></tr>
</table>
<br>

<!--#include file="tj_bottom.asp"-->
</body>
</html>