📄 sys_cr.asp

📁 一个超级漂亮的班级主页asp代码

💻 ASP

字号:

<!--插入html头部分以及数据库接口-->
<!--#include file="in_conn.asp"-->


<body>
<!--插入网站置顶-->
<% if u_name="" then
	Response.Redirect "log_err.asp"
else
%>
<!--#include file="in_topmb.asp"-->
<% end if %>

<%
if u_power<2 OR u_name<>DEF_sysadm then
	Response.Redirect "resp.asp?cmd=adm_bigpower"
end if
%>


<script language="javascript">
function checkWordCount(){
var vwc,wmax,cha;
var strbox;
vwc=document.fm1.txtcr.value.length;
wmax=255;
strbox="内容限制字数："+wmax+"\n当前字数："+vwc+"\n\n";
cha=Math.abs(wmax-vwc);
	if(vwc>wmax){
		strbox=strbox+"*警告：您的文字数已超出限制"+cha+"个字符";
		}
	else{
		strbox=strbox+"*提示：您还可以输入"+cha+"个字符";
		}
alert(strbox);
}

function okpress(){
	document.fm1.cmdok.disabled=true;
	document.fm1.submit();
}
</script>

<table align="center" width="700" height="25" border="0" cellspacing="0" cellpadding="0" class="rdbar"><tr>
	<td width="100%" height="100%">
		&nbsp;<a href="index.asp">[首页]</a>-<a href="sys.asp">后台维护</a>-<font class="ft1">置底版权信息</font>
	</td>
</tr></table>

<table align="center" width="700" height="101" border="0" cellspacing="0" cellpadding="6" class="rdd">
	<tr>
		<td width="150" valign="top" class="rdk2">
			<!--插入左部分-->
			<!--#include file="in_sys_left.asp"-->
		</td>
		<td valign="top">
		<%
		dim vcr
		vcr=conn.Execute("SELECT copyright FROM tblsys",0,1)(0)
		%>
			<form name="fm1" action="sys_cr_deal.asp" method="post">
				&nbsp;<b>网页置底版权信息：</b>&nbsp;&nbsp;&nbsp;<font class="ft1">**</font>字数限制为255个字符以内！
				&nbsp;<a href="javascript:checkWordCount();">[检查字数]</a>
				<br>&nbsp;<font color="red">(使用HTML代码，请勿胡乱修改)</font>
				<br>&nbsp;<textarea name="txtcr" cols="66" rows="8" class="fill"><% =vcr %></textarea>
				<br>
				<br>&nbsp;<input type="button" name="cmdok" value=" 确定修改 " onClick="javascript:okpress();" class="an">
			</form>
		</td>
	</tr>
</table>


<!--插入在线统计-->
<!--#include file="in_online.asp"-->
<!--插入网站置底-->
<!--#include file="in_bottom.asp"-->
</body>

</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -