?? sys_kind_hb.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%">
<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">
<form name="fm_kind_join" action="sys_kind_hb_go.asp" method="post">
<b>合并版面</b>
<%
'列出所有版面分類
sqlstr="SELECT kd_ID,kd_name FROM tblkind ORDER BY kd_class DESC"
rs.open sqlstr,conn,1,1
rs.MoveFirst
%>
<br>把<Select name="s_kdfrom">
<%
Response.Write "<option value='china'>請選擇</option>"
FOR i=1 TO rs.RecordCount
Response.Write "<option value='"&rs("kd_ID")&"'>"&unhtml(rs("kd_name"))&"</option>"
rs.MoveNext
NEXT
%>
</Select>
<%
rs.MoveFirst
%>
合并到→ <Select name="s_kdto">
<%
Response.Write "<option value='china'>請選擇</option>"
FOR i=1 TO rs.RecordCount
Response.Write "<option value='"&rs("kd_ID")&"'>"&unhtml(rs("kd_name"))&"</option>"
rs.MoveNext
NEXT
%>
</Select>
<%
rs.close
%>
<input type="button" name="cmdok" value=" 確定合并版面 " onClick="javascript:this.disabled=true;submit();" class="an">
<br>**提示：<u>合并后將使用后者的版面名稱、版面描述等信息。</u>
</form>
<form name="fm_kind_kill" action="sys_kind_hb_go.asp" method="post">
<br><b>刪除版面</b>
<%
'列出所有版面分類
sqlstr="SELECT kd_ID,kd_name FROM tblkind ORDER BY kd_class DESC"
rs.open sqlstr,conn,1,1
rs.MoveFirst
%>
<br>把<Select name="s_kdkill">
<%
Response.Write "<option value='china'>請選擇</option>"
FOR i=1 TO rs.RecordCount
Response.Write "<option value='"&rs("kd_ID")&"'>"&unhtml(rs("kd_name"))&"</option>"
rs.MoveNext
NEXT
%>
</Select>
<%
rs.close
%>
<input type="button" name="cmdok" value=" 確定刪除版面 " onClick="javascript:this.disabled=true;submit();" class="an">
<br>**提示：<u>刪除版面將一并刪除版面中所有文章，請慎重選擇</u>
</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 + -