<!--#include file="../siteconfig/conn.asp"-->
<%
if session("adminlogin")<>sessionvar then
Response.Write("<script language=javascript>alert('你尚未登录，或者超时了！请重新登录');this.location.href='login.asp';</script>")
Response.End
End if
%>
<!--#include file="Admin_ClassFunction.asp"-->
<HTML>
<HEAD>
<TITLE>网站审查管理</TITLE>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"> 
<link href="./images/admincp/admincp.css" rel="stylesheet" type="text/css" />

</HEAD>

<script language="JavaScript" type="text/javascript" src="js.js"></script>
<BODY>
<h3><a href="?Login_Yn=0">未审核网址</a>&nbsp;&nbsp;<a href="?Login_Yn=1">已审核网址</a></h3>
<h3>以下是审核列表，审核后请手动添加网址并更新HTML <a href="#" onClick="javascript:DivOpenClose('Admin_UrlAdd.asp',1,450,350);return false"><font color="#669900">添加网址入库</font></a></h3>
<%dim Login_Yn
Login_Yn=Request("Login_Yn")
if Login_Yn="" then Login_Yn=0
rs.open"select * from Login where Login_Yn="&Login_Yn,conn,1,3
dim LoginCount
LoginCount = int(rs.recordcount)
redim LoginArray(LoginCount,7)
dim j,i
j=1
while not rs.eof and not rs.bof
   LoginArray(j,0)=rs("Login_Id")
   LoginArray(j,1)=rs("Login_UrlNmae")
   LoginArray(j,2)=rs("Login_Url")
   LoginArray(j,3)=rs("Login_Class")
   LoginArray(j,4)=rs("Login_Tel")
   LoginArray(j,5)=rs("Login_Email")
   LoginArray(j,6)=rs("Login_Yn")
   LoginArray(j,7)=rs("Login_Memo")
   j=j+1
rs.movenext
wend
rs.close%>
<table width="96%" border="0" cellspacing="1" cellpadding="8" align="center" class="tb tb2 fixpadding">
  <tr>
    <td class="vtop lineheight">ID</td>
    <td class="vtop lineheight">网站名称</td>
    <td class="vtop lineheight">网站网址</td>
    <td class="vtop lineheight">参考分类</td>
	<td class="vtop lineheight">联系QQ</td>
    <td class="vtop lineheight">联系邮箱</td>
	<td class="vtop lineheight">操作</td>
    <td class="vtop lineheight">删除</td>
  </tr>
<%
for i=1 to LoginCount%>
  <tr>
    <td class="vtop lineheight"><%=LoginArray(i,0)%></td>
    <td class="vtop lineheight" title="<%=LoginArray(i,7)%>"><%=Left(LoginArray(i,1),20)%></td>
    <td class="vtop lineheight" title="<%=LoginArray(i,2)%>"><a href="<%=LoginArray(i,2)%>" target="_blank"><%=Left(LoginArray(i,2),20)%></a></td>
    <td class="vtop lineheight"><%=LoginArray(i,3)%></td>
	<td class="vtop lineheight"><%=LoginArray(i,4)%></td>
	<td class="vtop lineheight"><%=LoginArray(i,5)%></td>
	<td class="vtop lineheight"><%if LoginArray(i,6)=0 then%>
	     <a href="#" onClick="javascript:DivOpenClose('Admin_Login_Yn2.asp?Login_Id=<%=LoginArray(i,0)%>',1,450,150);return false"><font color=#FF0000>审核</font></a>
	<%else%>
	    已审核
	<%end if%>
	</td>
    <td class="vtop lineheight"><a href="#" onClick="javascript:DivOpenClose('Admin_Login_Del.asp?Login_Id=<%=LoginArray(i,0)%>',1,450,150);return false">删除</a></td>
  </tr>
<%
next%>
</table>
<br /><div align="center"><a href="#" onClick="javascript:DivOpenClose('Admin_UrlAdd.asp',1,450,350);return false"><font color="#669900">添加网址入库</font></a>
<div id="DivMenu" style="position:absolute; width:100%; height:100%; z-index:1; left: 0px; top: 0px; filter:Alpha(opacity=50); background-color: #E8E8E8; layer-background-color: #E8E8E8; border: 1px none #000000; visibility: hidden;"></div>
<div id="DivIframe" style="position:absolute; width:0; height:0px; z-index:1; visibility: hidden; overflow: visible; filter:Alpha(opacity=80);"><iframe id=OpenIframe name=OpenIframe src=londing.html width=100% height=100% frameborder=0 scrolling=no>管理员</iframe>
</div>
</div>
</BODY>
</HTML>

