www.gusucode.com > 学校共青团组织网站源代码 > 学校共青团组织网站源代码/626/admin/admin_link_mb.asp
<%
if Request.Cookies("admindj")<>"1" then
Response.Write "<BR><BR><BR><BR><center>权限不足，你没有此功能的管理权限"
Response.end
end if
%>
<!--#include file = admin_chk.asp -->
<!--#include file = admin_conn.asp -->
<head>
<!--#include file = language.asp -->
<STYLE type="text/css">
<!--
a:link {text-decoration: none; font-family: AdobeSm; color: #000000 }
a:visited {text-decoration: none; color: #000000 }
A:hover {COLOR: green; FONT-FAMILY: "宋体,MingLiU"; TEXT-DECORATION: underline}
body {font-size: 9pt; font-family: 宋体,MingLiU, Arial;color: #000000}
TD {FONT-SIZE: 9pt; FONT-FAMILY: "宋体,MingLiU, Arial";color: #000000;table-layout:fixed;word-break:break-all}
p {FONT-SIZE: 9pt; FONT-FAMILY: "宋体,MingLiU, Arial";color: #000000}
input {FONT-SIZE: 9pt; FONT-FAMILY: "宋体,MingLiU, Arial";color: #000000}
body {margin-top: 0; margin-bottom: 0;margin-left:0;margin-right:0; color: #000000}
select {FONT-SIZE: 9PT;}
option {FONT-SIZE: 9pt;}
textarea {FONT-SIZE: 9pt;}
-->
</STYLE>
</head>
<body bgcolor="#EFEFDE">
<center><BR><BR>
<%
if trim(request("LinkMBtop"))<>"" and trim(request("linkMBdown"))<>"" then
'conn.Execute "update [config] set [LinkMBtop]='"&trim(request("LinkMBtop"))&"',[linkMBdown]='"&trim(request("linkMBdown"))&"'"
set rs = Server.CreateObject("ADODB.RecordSet")
rs.Open "select * from [config] order by id desc",conn,1,3
rs("LinkMBtop")=trim(request("LinkMBtop"))
rs("linkMBdown")=trim(request("linkMBdown"))
rs.update
Response.Write "<a href=admin_mb.asp>保存成功! </a>"
end if
Set rs = Server.CreateObject("ADODB.RecordSet")
rs.Open "select * from [config]",conn,1,1
LinkMBtop=rs("LinkMBtop")
linkMBdown=rs("linkMBdown")
rs.close
set rs=nothing
%>
<a href=admin_Link.asp>返回友情链接管理</a><br>
<br>
<b>友情链接模版管理</b><BR><BR>
</center>
<!--webbot BOT="GeneratedScript" PREVIEW=" " startspan --><script Language="JavaScript" Type="text/javascript"><!--
function FrontPage_Form1_Validator(theForm)
{
if (theForm.LinkMBtop.value == "")
{
alert("请在 页头 域中输入值。");
theForm.LinkMBtop.focus();
return (false);
}
if (theForm.LinkMBtop.value.length < 1)
{
alert("在 页头 域中，请至少输入 1 个字符。");
theForm.LinkMBtop.focus();
return (false);
}
if (theForm.linkMBdown.value == "")
{
alert("请在 页尾 域中输入值。");
theForm.linkMBdown.focus();
return (false);
}
if (theForm.linkMBdown.value.length < 1)
{
alert("在 页尾 域中，请至少输入 1 个字符。");
theForm.linkMBdown.focus();
return (false);
}
return (true);
}
//--></script><!--webbot BOT="GeneratedScript" endspan --><form method="POST" action="?" name="FrontPage_Form1" onsubmit="return FrontPage_Form1_Validator(this)" language="JavaScript">
<div align="center">
<table border="1" cellpadding="3" width="700" id="table1" style="border-collapse: collapse">
<tr>
<td align="center" width="54">页头<br>
<br>
<font color="#666666">支持HTML</font></td>
<td align="center">
<p align="left">
<!--webbot bot="Validation" s-display-name="页头" b-value-required="TRUE" i-minimum-length="1" --><textarea rows="16" name="LinkMBtop" cols="99"><%=LinkMBtop%></textarea></td>
</tr>
<tr>
<td width="54">
<p align="center">页尾<p align="center">
<font color="#666666">支持HTML</font></td>
<td>
<!--webbot bot="Validation" s-display-name="页尾" b-value-required="TRUE" i-minimum-length="1" --><textarea rows="17" name="linkMBdown" cols="99"><%=linkMBdown%></textarea></td>
</tr>
</table>
</div>
<p align="center"><input type="submit" value="保存" name="B1"> <input type="reset" value="重置" name="B2"></p>
</form>
<%
conn.close
set conn=nothing
%>