<!--#include file="../../conn/conn.asp"-->
<!--#include file="../checkvalid.asp"-->
<%
If Not FRAdminLevel(108) Then
	Call ErrorMsg()
End If
if request("action")="del" then
conn.execute("delete from JOB_links where id=" & request("id"))
response.redirect "admin_linkskey.asp?action=reh"

elseif request("action")="edit" then
set rs=Server.CreateObject("Adodb.Recordset")
sql="select * from JOB_links where id="&request("id")
rs.open sql,conn,1,3
rs("link_key1")=1
rs.update
rs.close
set rs=nothing
response.redirect "admin_linkskey.asp?action=reh"

elseif request("action")="reh" then
response.write "<meta http-equiv='refresh' content='0;URL=admin_linkskey.asp'>"
end if%>
<html>
<head>
<title>友情连接</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../css/style<%=sk%>.css" rel="stylesheet" type="text/css" />
<script type="text/javascript" src="../inc/input.js"></script>
</head>
<body>
<table width="97%" border="0" align="center" cellpadding="3" cellspacing="1" bordercolorlight="#cccccc" bordercolordark="#FFFFFF" class="tableBorder">
<tr align=center>
<%set rs=Server.CreateObject("Adodb.Recordset")
sql="select * from JOB_links where link_key=0 and link_key1=0 order by id desc"
rs.open sql,conn,1,1
if rs.eof then
response.write"<td height=30 align=center class=amtd>暂无文字连接</td>"
else
n=0
do while not rs.eof
n=n+1%>
<td height="25" class=huiby><a href=<%=rs("link_url")%> title=<%=rs("link_sm")%> target="_blank"><%=rs("link_name")%></a> <a href=admin_linkskey.asp?action=edit&id=<%=rs("id")%> class=red>审</a> <a href=admin_linkskey.asp?action=del&id=<%=rs("id")%>>删</a></td>
<%if n mod 5=0 then response.write "</tr><tr align=center>"
rs.movenext
loop
end if
rs.close
set rs=nothing%>
</tr>
<tr align=center>
<%set rs=Server.CreateObject("Adodb.Recordset")
sql="select * from JOB_links where link_key=1 and link_key1=0 order by id desc"
rs.open sql,conn,1,1
if rs.eof then
response.write"<td height=40 align=center class=amrow>暂无图片连接</td>"
else
n=0
do while not rs.eof
n=n+1%>
<td height="40" class="amrow"><a href=<%=rs("link_url")%> title=<%=rs("link_sm")%> target="_blank"><img src="<%=rs("link_name")%>" width=88 height=31 border=0></a> <a href=admin_linkskey.asp?action=edit&id=<%=rs("id")%> class=red>审</a> <a href=admin_linkskey.asp?action=del&id=<%=rs("id")%> class=red>删</a></td>
<%if n mod 5=0 then response.write "</tr><tr align=center>"
rs.movenext
loop
end if
rs.close
set rs=nothing%>
</tr>
</table>
</body>
</html>

