📄 admin_linkmanage.asp
字号:
<!-- #include file="inc/config.asp" -->
<!-- #include file="inc/md5.asp" -->
<!-- #include file="inc/conn.asp" -->
<%
if session("adminname")="" then
response.redirect "admin_login.asp"
response.end
end if
%>
<HTML>
<HEAD>
<TITLE>链接管理</TITLE>
<META NAME="Generator" CONTENT="EditPlus">
<META NAME="Author" CONTENT="">
<META NAME="Keywords" CONTENT="">
<META NAME="Description" CONTENT="">
</HEAD>
<style type=text/css>
body { background:#AEC9FB; margin:0px; font:normal 12px 宋体;
SCROLLBAR-FACE-COLOR: #799AE1; SCROLLBAR-HIGHLIGHT-COLOR: #799AE1;
SCROLLBAR-SHADOW-COLOR: #799AE1; SCROLLBAR-DARKSHADOW-COLOR: #799AE1;
SCROLLBAR-3DLIGHT-COLOR: #799AE1; SCROLLBAR-ARROW-COLOR: #FFFFFF;
SCROLLBAR-TRACK-COLOR: #AABFEC;
}
table { border:0px; }
td { font:normal 12px 宋体; }
img { vertical-align:bottom; border:0px; }
a { font:normal 12px 宋体; color:#000000; text-decoration:none; }
a:hover { color:#428EFF;text-decoration:underline; }
.sec_menu { border-left:1px solid white; border-right:1px solid white; border-bottom:1px solid white; overflow:hidden; background:#D6DFF7; }
.menu_title { }
.menu_title span { position:relative; top:2px; left:8px; color:#215DC6; font-weight:bold; }
.menu_title2 { }
.menu_title2 span { position:relative; top:2px; left:8px; color:#428EFF; font-weight:bold; }
</style>
<BODY>
<p> </p>
<%
dim action,rs
action=request.querystring("action")
if action="del" then
call mana_del()
else
call mana_list()
end if
sub mana_del()
conn.execute("delete from link where id="&request("id"))
response.redirect"admin_linkmanage.asp"
response.end
end sub
sub mana_list()
set rs=conn.execute("select * from link order by id desc")
%>
<table cellpadding="0" cellspacing="1" border="0" align=center width="80%" bgcolor=#cacaca>
<tr><td bgcolor=#ffffff height=30 align=center colspan=3><B>合作站点管理</B></td></tr>
<tr bgcolor=#BADCF8 height=25 align=center><td>站点名称</td><td width=120>链接类型</td>
<td width=50>操作</td></tr>
<% do while not rs.eof %>
<tr bgcolor=#D7E8F9 height=20><td > <%=rs("webname")%></td><td width=120 align=center>
<% if rs("ltype")=1 then
response.write"文字链接"
else
response.write"图片链接"
end if
%>
</td>
<td width=50 align=center><A HREF="?id=<%=rs("id")%>&action=del"><FONT COLOR="red" onClick="return confirm('您确定进行删除操作吗？')">删除</FONT></A></td></tr>
<%
rs.movenext
loop
%>
</table>
<% end sub %>
</BODY>
</HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -