📄 sys_kind.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
%>




<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">



			<table align="center" width="100%" height="25" border="0" cellspacing="0" cellpadding="0" class="rdd">
			<tr>
			<th width="80" class="rdr" style="background-color:<% =bg1 %>">版面名称</th>
			<th width="150" class="rdr" style="background-color:<% =bg1 %>">版面描述</th>
			<th width="120" class="rdr" style="background-color:<% =bg1 %>">版面图标url</th>
			<th style="background-color:<% =bg1 %>">排序数</th>
			</tr>

		<%
		'列出所有版面分类
		sqlstr="SELECT * FROM tblkind ORDER BY kd_class DESC"
		rs.open sqlstr,conn,1,1
			FOR i=1 TO rs.RecordCount
		%>
			<tr>
			<form name='fmkind_<% =rs("kd_ID") %>' action="sys_kind_deal.asp" method="post">
			
			<td width="50">
				<input name="txt_name" class="fill" type="text" value='<% =rs("kd_name") %>'  size="15" maxlength="10">
				<input type="hidden" name="hidKID" value='<% =rs("kd_ID") %>'>
			</td>
			<td width="150"><input name="txt_tip" class="fill" type="text" value='<% =rs("kd_tip") %>'  size="25" maxlength="100"></td>
			<td width="120"><input name="txt_pic" class="fill" type="text" value='<% =rs("kd_pic") %>'  size="20" maxlength="80"></td>
			<td><input class="fill" name="txt_class" type="text" value='<% =rs("kd_class") %>'  size="2" maxlength="3" onKeypress="if (event.keyCode < 48 || event.keyCode > 57) event.returnValue=false;">
				<input type="button" name="btn_edit" value="修改" class="an" onClick="javascript:this.disabled=true;submit();">
			</td>
			</form>
			</tr>
		<%
				rs.MoveNext
			NEXT
		rs.close
		%>
			</table>

**提示：<u>版面排序数越大，则排版越靠前。</u>
<br><br>

			<table align="center" width="100%" height="25" border="0" cellspacing="0" cellpadding="0" class="rde"><tr><td width="100%">
			<form name="fm1" action="sys_kind_add_go.asp" method="post">
				&nbsp;<b>↑快速添加新版面：</b>
				<br>&nbsp;版面名称：
				<input type="text" name="t_kindname" value='' maxlength="10" size="25" class="kong">
				&nbsp;&nbsp;**10字符内
				<br>&nbsp;版面描述：
				<input type="text" name="t_kindtip" value='' maxlength="100" size="50" class="kong">
				&nbsp;&nbsp;**100字符内
				<br>&nbsp;版面图标url：(相对地址或绝对地址均可)
				<br>&nbsp;<input type="text" name="t_kindpic" value='' maxlength="80" size="50" class="kong">
				&nbsp;&nbsp;**80字符内
				<br>&nbsp;<a href="fjup_kj.asp" target="_blank">↑上传版面图片到[共享附件]↑</a>(先上传图片到[共享附件]，再复制url到这边)



				<br><br>&nbsp;<input type="button" name="cmdok" value=" 确定添加版面 " onClick="javascript:this.disabled=true;submit();" class="an">
			</form>
			</td></tr>
			</table>
		</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 + -