⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 admin_update.asp

📁 本人仅业余学习一些基础的ASP知识以供系统设计之用,并非专业人员,相关服务器设置、MSSQL/MySQL数据库方面的专业问题请自行解决。 本人仅提供本系统相关的一些技术问题的解释、解答。
💻 ASP
📖 第 1 页 / 共 2 页
字号:
						<b>发表人:</b><br>
						</td>
						<td width="75%" class="alt1">
						<input name="username" type="text" id="username" size="30" class="form" value="<%=request.cookies("CnendWeb")("admininfo_loginname")%>" maxlength="50">(任何状态下不能为空)</td>
					</tr>
					<tr>
						<td width="25%" height="22" align="right" class="alt2"><b>显示位置:</b></td>
						<td width="25%" class="alt1">
						<select name="Ntype" size="1" class="form">
							<option value="0">网站首页</option>
							<option value="1">作品资料页</option>
							<option value="2">作家专区</option>
							<option value="3">会员专区</option>
						</select><input name="attach" type="hidden"></td>
					</tr>
					<tr>
						<td width="25%" height="22" align="right" class="alt2">
						<b>CnEndcode 代码:<br>
						</b>
						<input onclick="chmode('2')" type="radio" checked value="2" name="mode"> 
						提示插入&nbsp;&nbsp;&nbsp; <br>
						<input onclick="chmode('0')" type="radio" value="0" name="mode"> 
						直接插入&nbsp;&nbsp;&nbsp; <br>
						<input onclick="chmode('1')" type="radio" value="1" name="mode"> 
						帮助信息&nbsp;&nbsp;&nbsp; </td>
						<td width="75%" class="alt1" colspan="3" class="alt1">
						<!--#include file="../inc/ubbcode.asp"--></td>
					</tr>
					<tr>
						<td width="25%" height="22" align="right" class="alt2" valign="top">
						公告内容:<br><a class="smalltxt" onclick="checklength(document.input)"> 
						[字数检查]</a><br>
						</td>
						<td width="75%" class="alt1"><span class="smalltxt">
						<textarea onkeydown="ctlent(event);" onkeyup="javascript: storeCaret(this);" style="WIDTH: 96%; HEIGHT: 300px" onclick="javascript: storeCaret(this);" tabindex="4" name="message" rows="18" onselect="javascript: storeCaret(this);"></textarea>
						</span><br>(任何状态下不能为空)<br>
						<iframe border="0" frameborder="0" noresize scrolling="no" src="Admin_upload.asp?info=gonggao" name="a" height="35" width="450">
						</iframe></td>
					</tr>
					<tr>
						<td width="25%" height="22" align="right" class="alt2">
						<b>是否置顶:</b></td>
						<td width="75%" class="alt1">
						<input type="checkbox" name="Istop" value="1">(点选后将永远在所有公告的顶部)</td>
					</tr>
					<tr>
						<td width="25%" height="22" align="right" class="alt2">
						<b>是否非连接:</b></td>
						<td width="75%" class="alt1">
						<input type="checkbox" name="Iscontent" value="1">(点选后将只显示内容,而不以连接形式显示)</td>
					</tr>
					<tr>
						<td width="25%" height="22" align="right" class="alt2">
						<b>是否为外部连接:</b></td>
						<td width="75%" class="alt1">
						<input type="checkbox" name="Islink" value="1">(点选后请在内容栏填写外部连接绝对地址“http://”+“网络地址”+“文件目录”+“文件名”<br>
						或相对地址“文件目录”+“文件名”)</td>
					</tr>
				</table>
			</div>
			<div style="MARGIN-TOP: 6px;MARGIN-bottom: 6px" align="center">
				<input class="button" tabindex="5" type="submit" value="提 交">   
				<input type="reset" class="button" value="重 置"> </div>
			</td>
		</tr>
	</form>
</table>
<%end sub

Sub edit()
id=request.querystring("id")
set rs=server.createobject("adodb.recordset")
if IsSqlDataBase = 2 then
	sql="select * from news where id="&id
else
	sql="select * from [news] where id="&id
end if
rs.open sql,conn,1,1
%>
<table width="100%" border="0" align="center" cellpadding="1" cellspacing="1" class="tborder">
	<tr height="25">
		<td colspan="4" class="thead">修改公告</td>
	</tr>
	<script language="JavaScript">
var postminchars = parseInt('2');
var postmaxchars = parseInt('50000');
var disablepostctrl = parseInt('0');
function checklength(theform) {
if (postmaxchars != 0) { message = "系统限制: "+postminchars+" 到 "+postmaxchars+" 字节"; }
else { message = ""; }
alert("CnEndWeb(终点)提醒:\n当前长度: "+theform.message.value.length+" 字节\n\n"+message);
}
function validate(theform) {
if (theform.message.value == "" && theform.subject.value == "") {
alert("CnEndWeb(终点)提醒:\n请完成标题或内容栏。");
return false;
} else if (theform.subject.value.length > 200) {
alert("CnEndWeb(终点)提醒:\n您的标题超过 200 个字符的限制。");
return false;
}
if (!disablepostctrl && ((postminchars != 0 && theform.message.value.length < postminchars) || (postmaxchars != 0 && theform.message.value.length > postmaxchars))) {
alert("CnEndWeb(终点)提醒:\n公告内容长度不符合要求。\n\n当前长度: "+theform.message.value.length+" 字节\n系统限制: "+postminchars+" 到 "+postmaxchars+" 字节");
return false;
}			
theform.replysubmit.disabled = true;
return true;
}
</script>
	<form action="admin_Daily.asp?info=update_edit&id=<%=id%>" method="post" name="input" onsubmit="return validate(this)">
		<script language="JavaScript" src="../js/bbcode.js"></script>
		<tr>
			<td colspan="4" class="alt3">
			<div id="panx">
				<table width="98%" border="0" align="center" cellpadding="1" cellspacing="1" class="panel">
					<tr>
						<td width="25%" height="22" align="right" class="alt2">
						<b>公告标题:</b><br>
						</td>
						<td width="75%" class="alt1"><textarea name="subject" rows="3" cols="50" class="form"><%=htmlen(rs("txttitle"))%></textarea>
						<br>(任何状态下不能为空,支持UBB代码)</td>
					</tr>
					<tr>
						<td width="25%" height="22" align="right" class="alt2">
						<b>发表人:</b><br>
						</td>
						<td width="75%" class="alt1">
						<input name="username" type="text" class="form" id="username" value="<%=rs("username")%>" size="30" maxlength="50">(任何状态下不能为空)</td>
					</tr>
					<tr>
						<td width="25%" height="22" align="right" class="alt2"><b>显示位置:</b></td>
						<td width="25%" class="alt1">
						<select name="Ntype" size="1" class="form">
							<option value="0"<%if rs("Ntype")=0 then response.write " selected" end if%>>网站首页</option>
							<option value="1"<%if rs("Ntype")=1 then response.write " selected" end if%>>作品资料页</option>
							<option value="2"<%if rs("Ntype")=2 then response.write " selected" end if%>>作家专区</option>
							<option value="3"<%if rs("Ntype")=3 then response.write " selected" end if%>>会员专区</option>
						</select><input name="attach" type="hidden"></td>
					</tr>
					<tr>
						<td width="25%" height="22" align="right" class="alt2">
						<b>CnEndcode 代码:<br>
						</b>
						<input onclick="chmode('2')" type="radio" checked value="2" name="mode"> 
						提示插入&nbsp;&nbsp;&nbsp; <br>
						<input onclick="chmode('0')" type="radio" value="0" name="mode"> 
						直接插入&nbsp;&nbsp;&nbsp; <br>
						<input onclick="chmode('1')" type="radio" value="1" name="mode"> 
						帮助信息&nbsp;&nbsp;&nbsp; </td>
						<td width="75%" class="alt1" colspan="3" class="alt1">
						<!--#include file="../inc/ubbcode.asp"--></td>
					</tr>
					<tr>
						<td width="25%" height="22" align="right" class="alt2" valign="top">
						公告内容:<br><a class="smalltxt" onclick="checklength(document.input)"> 
						[字数检查]</a><br>
						</td>
						<td width="75%" class="alt1">
						<textarea onkeydown="ctlent(event);" onkeyup="javascript: storeCaret(this);" style="WIDTH: 96%; HEIGHT: 300px" onclick="javascript: storeCaret(this);" tabindex="4" name="message" rows="18" onselect="javascript: storeCaret(this);"><%response.write htmlen(rs("txtcontent"))%></textarea>
						<br>(任何状态下不能为空) <br>
						<iframe border="0" frameborder="0" noresize scrolling="no" src="Admin_upload.asp?info=gonggao" name="a" height="35" width="450">
						</iframe></td>
					</tr>
					<tr>
						<td width="25%" height="22" align="right" class="alt2">
						<b>是否置顶:</b></td>
						<td width="75%" class="alt1">
						<input type="checkbox" name="Istop" value="1" <%if rs("istop")=1 then response.write "checked" end if%>>(点选后将永远在所有公告的顶部)</td>
					</tr>
					<tr>
						<td width="25%" height="22" align="right" class="alt2">
						<b>是否非连接:</b></td>
						<td width="75%" class="alt1">
						<input type="checkbox" name="Iscontent" value="1" <%if rs("iscontent")=1 then response.write "checked" end if%>>(点选后将只显示内容,而不以连接形式显示)</td>
					</tr>
					<tr>
						<td width="25%" height="22" align="right" class="alt2">
						<b>是否为外部连接:</b></td>
						<td width="75%" class="alt1">
						<input type="checkbox" name="Islink" value="1" <%if rs("islink")=1 then response.write "checked" end if%>>(点选后请在内容栏填写外部连接绝对地址“http://”+“网络地址”+“文件目录”+“文件名”<br>
						或相对地址“文件目录”+“文件名”)</td>
					</tr>
				</table>
			</div>
			<div style="MARGIN-TOP: 6px;MARGIN-bottom: 6px" align="center">
				<input class="button" tabindex="5" type="submit" value="提 交">   
				<input type="reset" class="button" value="重 置"> </div>
			</td>
		</tr>
	</form>
</table>
<%rs.close
set rs=nothing
end sub%>

</body>

</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -