<!--#include virtual="/show/adminhead.asp"-->
<!--#include file="adminleft.asp"-->
<title><%=webname%>-最高权限-错误查看</title>
<%
call logquanxian("g1",1)
%>

<DIV>


<%

act=SafeRequest("act")
cact=SafeRequest("cact")
page=SafeRequest("page")

link="adminerr.asp?ct=&act="&act



if act="delall" then
call lognamecode()

sql="select * from ayerr" 
rs.open sql,conn,1,3
if not(rs.bof and rs.eof) then
do while not rs.eof
rs.delete  
rs.movenext 
loop
end if
rs.close

response.Redirect "adminerr.asp?page="&page
			
end if

if act="yidu" then
id=request("id")
sql="select * from ayerr where errid="&id&"" 
rs.open sql,conn,1,3
if not(rs.bof and rs.eof) then
rs("errisdu")=1
rs.update 
end if
rs.close
response.Redirect "adminerr.asp?page="&page
end if

if act="del" then
id=request("id")
sql="select * from ayerr where errid="&id&"" 
rs.open sql,conn,1,3
if not(rs.bof and rs.eof) then
rs.delete  
end if
rs.close
response.Redirect "adminerr.asp?page="&page
end if
%>
<DIV id=main1200> 
<%call webleft()%>

<DIV id=main_right>
<DIV id=main_right_content>
<STYLE>.apply_style {
	POSITION: absolute
}
.right_title A {
	LINE-HEIGHT: 27px; WIDTH: 126px; DISPLAY: inline-block; BACKGROUND: url(<%=ossurl%>images/bg22.gif) no-repeat; HEIGHT: 27px
}
.right_title A.current {
	BACKGROUND: url(<%=ossurl%>images/main_right_title_bg.gif) no-repeat; COLOR: #fff; FONT-WEIGHT: bold
}
.table_style_1 TD {
	HEIGHT: 38px
}
.table_style_home_info TD {
	PADDING-BOTTOM: 0px; PADDING-LEFT: 10px; PADDING-RIGHT: 0px; HEIGHT: 30px; PADDING-TOP: 0px
}
</STYLE>

<DIV class=right_titleadmin>&nbsp;&nbsp;错误查看</DIV>
<DIV class=main><br>
  <table width="99%" border="0" cellpadding="0" cellspacing="0" class="table_style_a1">
     <form action="?act=alldel&page=<%=page%>" method="post" name="myform" id="myform"> 
       <tr>
        <th width="800" align="center" class="border_right border_bottom" >
		  内容
		<th align="center" class="border_right border_bottom">路径
        <th align="center" class="border_right border_bottom">
        备注        
        <th align="center" class="border_right border_bottom">订单        
        <th align="center" class="border_right border_bottom">渠道        
        <th align="center" class="border_right border_bottom">方式        
        <th align="center" class="border_right border_bottom">客户端        
        <th align="center" class="border_bottom border_right">时间                
        <th align="center" class="border_bottom border_right">操作               </tr>
<%



sql="select * from ayerr order by errid desc" 
'response.Write sql
'response.End()
rs.open sql,conn,1,1
rs.pagesize=100
pagecount=rs.pagecount 
if request("page")="" then 
page=1
else
page=int(request("page")) 
end if
if page<=0 then page=1 
if request("page")="" then page=1
if not(rs.bof and rs.eof) then
rs.absolutepage=page
do while not rs.eof%>

	  <tr onmouseover=this.bgColor='#D2FFFF' onmouseout=this.bgColor='#ffffff'>
        <td align="center" class="border_right border_bottom">
		<%if cint(rs("errisdu"))=0 then%>
		<strong><%=server.HTMLEncode(trim(rs("errcon")))%></strong> 
        <%else%>
        <%=server.HTMLEncode(trim(rs("errcon")))%>
        <%end if%>
        </td>
        <td align="center" class="border_right border_bottom">
		<%=trim(rs("errlu"))%>	</td>
        <td align="center" class="border_right border_bottom">
		<%=trim(rs("errbei"))%>	</td>
        <td align="center" class="border_right border_bottom"><%=trim(rs("errdd"))%></td>
        <td align="center" class="border_right border_bottom"><%=trim(rs("errqudao"))%></td>
        <td align="center" class="border_right border_bottom"><%=trim(rs("errfs"))%></td>
        <td align="center" class="border_right border_bottom"><%=trim(rs("errpcwap"))%></td>
        <td align="center" class="border_bottom border_right"><%=rs("errdate")%></td>
        <td align="center" class="border_bottom border_right">
        <%if cint(rs("errisdu"))=0 then%>
		<a href="?act=yidu&id=<%=rs("errid")%>">转已读</a> 
		<%end if%>
        <a href="?act=del&id=<%=rs("errid")%>">删除</a>
        </td>
	    </tr>
<%
n=n+1
rs.movenext  '指针向下移动
if n>=rs.pagesize then exit do  
loop
end if
zongshu=rs.RecordCount
rs.close%>
	  

      <tr>
        <td colspan="9">&nbsp;
        

<%if pagecount=0 then   
response.write("首页 ")
elseif page=1 then       
response.write("首页 ")
else%>                   
<a href="<%=link%>&page=1">首页</a>
<%end if

if pagecount=0 then   
response.write("上页&nbsp;")
elseif page=1 then       
response.write("上页&nbsp;")
else%>                   
<a href="<%=link%>&page=<%=page-1%>">上页</a>&nbsp;
<%end if

if pagecount>20 then
if page<=10 then 
aa=1
bb=20
aabu=""
bbbu=" … "
elseif page>=11 then 
aa=page-9
bb=page+10
aabu=" …"
bbbu=" … "
	if bb>=pagecount then 
	aa=pagecount-20
	bb=pagecount
	aabu=" … "
	bbbu=""
	end if
end if
response.Write aabu
for aa=aa to bb
if page=aa then
response.Write("<a href="&link&"&page="&aa&"><strong>"&aa&"</strong></a>&nbsp;")
else
response.Write("<a href="&link&"&page="&aa&">"&aa&"</a>&nbsp;")
end if
next
response.Write bbbu

else

for i=1 to pagecount
if page=i then
response.Write("<a href="&link&"&page="&i&"><strong>"&i&"</a></strong>&nbsp;")
else
response.Write("<a href="&link&"&page="&i&">"&i&"</a>&nbsp;")
end if
next

end if

if pagecount=0 then 
response.write("下页&nbsp;")
elseif page=pagecount then 
response.write("下页&nbsp;")
else%>                    
<a href="<%=link%>&page=<%=page+1%>">下页</a>
<%end if%>
<%if pagecount=0 then  '总页数为0 显示空
response.write("尾页 ") 
elseif page=pagecount then 
response.write("尾页 ")
else%>                    
<a href="<%=link%>&page=<%=pagecount %>">尾页</a>
<%end if

if pagecount<>0 then 
response.Write page&"/"&pagecount
end if
response.Write "&nbsp;共"&zongshu&"条"
%>		<a href="?act=delall">删除全部</a> </td>
      </tr></form>
    </table>
</DIV>


</DIV></DIV>
<DIV class=clear></DIV></DIV>
</DIV>



<!--#include virtual="/show/footadmin.asp"-->

