include file="include/admin_onlogin.asp" -->
<!-- #include file="../include/jk_ip_sys.asp" -->
<%
admins=true
nsort="fuck"
popedom_num=0
index_url="fuck"
data_name="fuck"
tit_fir="日志"
tit="注入日志"
call admin_header(0,0)
%>
<tr><td align=center colspan=2 height=30>
  <table border=0>
  <tr>
  <td><a href='?'><%response.write tit%></a></td>
  </tr>
  </table>
</td></tr>
</table>
<%
call admin_table(1)

select case action
case "del"
  call joekoe_chk_delete()
case "clear"
  call joekoe_chk_clear()
case "lock"
  Call lockIP()
case "unlock"
   Call UnLockip()
case else
  call gyct_fuck_Main()
end select

call admin_ender(1)

sub joekoe_chk_delete()
  dim sel_id,ddim,dnum,ni
  sel_id=trim(request.form("sel_id"))
  sel_id=replace(sel_id," ","")
  if sel_id="" then
    call joekoe_chk_main()
    exit sub
  end if
  ddim=split(sel_id,",")
  dnum=ubound(ddim)
  ni=0
  for i=0 to dnum
    if isnumeric(ddim(i)) then
      call joekoe_cms.exec("delete from "&data_name&" where id="&ddim(i),0)
      ni=ni+1
    end if
  next
  call admin_msg("已成功删除 "&ni&" 条"&tit_fir&"！","?",1)
end sub

sub joekoe_chk_clear()
  call joekoe_cms.exec("delete from "&data_name,0)
  call admin_msg("已成功清空"&tit_fir&"！","?",1)
end sub

Sub Lockip()
id = clng(request("id"))
call joekoe_cms.exec("update fuck set Kill_ip=true where id="&id,0)
Call gyct_fuck_Main()
End sub

Sub UnLockip()
id = clng(request("id"))
call joekoe_cms.exec("update fuck set Kill_ip=False where id="&id,0)
Call gyct_fuck_Main()
End sub


Sub gyct_fuck_Main()
%>
<form name=sel_form action='?action=del' method=post>
<tr align=center>
<td class=td width='5%'>编号</td>
<td class=td width='15%'>攻击者</td>
<td class=td width='6%'>是否锁定</td>
<td class=td width='20%'><%response.write tit_fir%>提交页面</td>
<td class=td width='20%'>提交时间</td>
<td class=td width='6%'>提交方式</td>
<td class=td width='6%'>提交参数</td>
<td class=td width='15%'>操作</td>
<td class=td width='20%'><input type=checkbox name=sel_all value='yes'

onclick="javascript:select_all(this.form);"></td>
</tr>
<%
sql="select count(id) from "&data_name&sql_add
set rs=joekoe_cms.exec(sql,1)
rssum=rs(0)
rs.close
  call format_pagecute()
  sql="select top "&nummer*viewpage&" * from "&data_name&sql_add&" order by id desc"
  call joekoe_cms.exec(sql,-1)
  rs.open sql,conn,1,1
  if int(viewpage)>1 then rs.move (viewpage-1)*nummer
  if int(viewpage*nummer)>int(rssum) then nums=nummer-(viewpage*nummer-rssum)
  for i=1 to nums
%>
<tr align=center>
<td><%response.write (viewpage-1)*nummer+i%></td>
<td><a href=""&joekoe_cms.web_path&"common/ip_address.asp?ip=?ip=<%=rs("SqlIn_IP")%>"

target="_blank"><%=rs("SqlIn_IP")%></a></td>
<td><%if rs("Kill_ip")=true then
response.write "<font color='red'>已锁定</font>"
else
response.write "<font color='green'>已解锁</font>"
end if
%></td>
<td><%=rs("SqlIn_WEB")%></td>
<td><%=rs("SqlIn_TIME")%></td>
<td><%=rs("SqlIn_FS")%></td>
<td><%=rs("SqlIn_CS")%></td>
<td><%=rs("SqlIn_SJ")%></td>
<td><input type=checkbox name=sel_id value='<%response.write rs("id")%>'></td>
</tr>
<%
    rs.movenext
  next
  rs.close
%>
<tr class=tr1>
<td colspan=5>
现有<font class=red><%response.write rssum%></font>条<%response.write tit_fir%>，
每页<font class=red><%response.write nummer%></font>条，
页次：<font class=red><%response.write viewpage%></font>/<font class=red><%

response.write thepages%></font>
分页：<%response.write jk_pagecute(nummer,thepages,viewpage,pageurl,5,"#ff0000")%>
</td>
<td colspan=4 align=center>
执行
<select name=sel_type size=1>
<option value='del'>删除</option>
<option value='unlock'>解锁IP</option>
<option value='lock'>锁定IP</option>
</select>
<input type=submit class=btn value='操作' onclick="return sel_click(this.form);">
</td>
</tr>
</form>
<%
end sub
%>