📄 classmodify.asp
字号:
<!--#include file="check_login.asp"-->
<!--#include file="conn.asp"-->
<!--#include file="script/js1.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="text.css" rel="stylesheet" type="text/css">
<title></title>
</head>
<body topmargin="0" leftmargin="0" rightmargin="0" <%=kkk%>>
<!--#include file="top/Ltop01.asp"-->
<%
operation=Request.QueryString("Operation")
select case Operation
case "ModifyClassA"
AClassA=trim(Request.Form("AClassA"))
set rs=Server.CreateObject("Adodb.RecordSet")
rs.source="select * from deeptree where id="&AClassA
rs.open rs.source,conn,1,1
%>
<form name="formA" method="POST" onSubmit="return CheckDataAA()" action="ClassSubmit.asp?operation=ModifyClassA" >
<br>
<br>
<table style="border-left: 1px solid #A4CEE4;border-top: 1px solid #A4CEE4;border-bottom: 1px solid #A4CEE4; border-right: 1px solid #A4CEE4;font-family: 宋体;font-size:10pt" border="0" cellpadding="5" align="center" cellspacing="1" bgcolor="#FFFFFF">
<tr bgcolor="#C6BEC6">
<td height="25" colspan="2" align="center" valign="middle" style='BORDER-BOTTOM: #333333 1px solid'><b>修改一级栏目</b></td>
</tr>
<tr>
<td width="107" height="25" align="right" valign="middle" bgcolor="#FFFFFF">栏 目 名 称：</td>
<td height="25" width="371" valign="middle" bgcolor="#FFFFFF">
<input type="text" name="updateA" size="30" value="<%=rs("content")%>" >
<input type="hidden" name="updateAID" value="<%=rs("id")%>">
<input type="hidden" name="updatecomm" value="<%=rs("content")%>"><span class="BLUE">*</span></td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="107" valign="middle" bgcolor="#FFFFFF" onMouseOver=this.style.backgroundColor='#FAFBFC'; onMouseOut=this.style.backgroundColor=''; this.style.cursor='hand';> </td>
<td width="371" valign="top" bgcolor="#FFFFFF" onMouseOver=this.style.backgroundColor='#FAFBFC'; onMouseOut=this.style.backgroundColor=''; this.style.cursor='hand';>修改一级栏目的名称，该栏目下的子栏目全部被移到新修改的栏目下，请小心操作！</td>
</tr>
<tr>
<td height="21" align="center" colspan=2 bgcolor="#FFFFFF">
<input type="submit" value=" 修 改 " name="B12" onclick="return DupDate()">
<input type=button value=返回上一层 onclick=history.go(-1)>
</td>
</tr>
</table>
</form>
<%
rs.close
set rs=nothing
%>
<%
'修改一级栏目完成
%>
<%
case "ModifyClassB"
BClassB=request.form("BClassB")
if BClassB="" then
%>
<script luanage=javascript>
history.back()
alert("请选择二级栏目")
</script>
<%
response.end
end if
set rs1=Server.CreateObject("Adodb.RecordSet")
rs1.source="select * from deeptree where id="&BClassB
rs1.open rs1.Source,conn,1,1
%>
<form name="formB" method="POST" onSubmit="return CheckDataBB()" action="ClassSubmit.asp?operation=ModifyClassB" >
<br>
<br>
<table style="border-left: 1px solid #A4CEE4;border-top: 1px solid #A4CEE4;border-bottom: 1px solid #A4CEE4; border-right: 1px solid #A4CEE4;font-family: 宋体;font-size:10pt" border="0" cellpadding="5" align="center" cellspacing="1" bgcolor="#FFFFFF">
<tr bgcolor="#C6BEC6">
<td height="25" colspan="2" align="center" valign="middle" style='BORDER-BOTTOM: #333333 1px solid'><b>修改二级栏目</b></td>
</tr>
<tr>
<td height="25" align="right" valign="middle" bgcolor="#FFFFFF">栏 目 名 称：</td>
<td height="25" valign="middle" bgcolor="#FFFFFF">
<input type="text" name="updateB" size="30" value="<%=rs1("content")%>" >
<input type="hidden" name="updateBID" value="<%=rs1("id")%>">
<input type="hidden" name="updateBcomm" value="<%=rs1("content")%>"><span class="BLUE">*</span>
</td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="108" height="25" align="right" valign="middle" bgcolor="#FFFFFF" onMouseOver=this.style.backgroundColor='#FAFBFC'; onMouseOut=this.style.backgroundColor=''; this.style.cursor='hand';>是否转移目录：</td>
<td width="373" valign="middle" bgcolor="#FFFFFF" onMouseOver=this.style.backgroundColor='#FAFBFC'; onMouseOut=this.style.backgroundColor=''; this.style.cursor='hand';>
<input name="YESOK" type="radio" id="YESOK" value="NO" checked >否
<input name="YESOK" id="YESOK" type="radio" value="YES">是（若要转移目录就选 <strong>是</strong> ，否则不会执行）</td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="108" height="20" align="right" valign="middle" bgcolor="#FFFFFF" onMouseOver=this.style.backgroundColor='#FAFBFC'; onMouseOut=this.style.backgroundColor=''; this.style.cursor='hand';>栏目转移说明：</td>
<td width="373" valign="top" bgcolor="#FFFFFF" onMouseOver=this.style.backgroundColor='#FAFBFC'; onMouseOut=this.style.backgroundColor=''; this.style.cursor='hand';>二级栏目可以转移到一级目录的某一目录下，同时该二级栏目下的三级栏目也全部被移到该一级目录下，请小心操作！</td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="108" height="20" align="right" valign="middle" bgcolor="#FFFFFF" onMouseOver=this.style.backgroundColor='#FAFBFC'; onMouseOut=this.style.backgroundColor=''; this.style.cursor='hand';>转到一级栏目：</td>
<td width="373" valign="middle" onMouseOver=this.style.backgroundColor='#FAFBFC'; this.style.cursor='hand'; onMouseOut=this.style.backgroundColor='';>
<select name="AClassA">
<%
set rs = server.createobject("adodb.recordset")
rs.source = "select id,content from deeptree where parentid=0 order by id desc "
rs.open rs.source,conn,1,1
while not rs.eof
%>
<option value="<%=rs("id")%>" style="background-color:#CCCCCC">╋<%=rs("content")%></option>
<%
rs.movenext
wend
rs.close
set rs=nothing
%>
</select>
</td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="50" colspan="2" align="center" valign="middle" rowspan="2" onMouseOver=this.style.backgroundColor='#FAFBFC'; this.style.cursor='hand'; onMouseOut=this.style.backgroundColor='';>
<input type="submit" value=" 修 改 " name="B122" onclick="return DupDate()">
<input type="button" value="返回上一层" onclick="history.go(-1)">
</td>
</tr>
<tr valign="middle" bgcolor="#FFFFFF"> </tr>
</table>
</form>
<%
rs1.close
set rs1=nothing
%>
<%
'二级目录修改完成
%>
<%
case "ModifyClassC"
BClassC=trim(request.form("BClassC"))
if BClassC="" then
%>
<script luanage=javascript>
history.back()
alert("请选择三级栏目")
</script>
<%
response.end
end if
set rs1=Server.CreateObject("Adodb.RecordSet")
rs1.source="select * from deeptree where id="&BClassC
rs1.open rs1.Source,conn,1,1
%>
<form name="formC" method="POST" onSubmit="return CheckDataCC()" action="ClassSubmit.asp?operation=ModifyClassC" >
<br>
<br>
<table style="border-left: 1px solid #A4CEE4;border-top: 1px solid #A4CEE4;border-bottom: 1px solid #A4CEE4; border-right: 1px solid #A4CEE4;font-family: 宋体;font-size:10pt" border="0" cellpadding="5" align="center" cellspacing="1" bgcolor="#FFFFFF">
<tr bgcolor="#C6BEC6">
<td height="25" colspan="2" align="center" valign="middle" style='BORDER-BOTTOM: #333333 1px solid'><b>修改三级栏目</b></td>
</tr>
<tr>
<td height="25" align="right" valign="middle" bgcolor="#FFFFFF">栏 目 名 称：</td>
<td height="25" valign="middle" bgcolor="#FFFFFF">
<input name="updateC" type="text" id="updateC" value="<%=rs1("content")%>" size="30" >
<input type="hidden" name="updateCID" value="<%=rs1("id")%>">
<input type="hidden" name="updateCcomm" value="<%=rs1("content")%>">
<span class="BLUE">*</span> </td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="108" height="25" align="right" valign="middle" bgcolor="#FFFFFF" onMouseOver=this.style.backgroundColor='#FAFBFC'; onMouseOut=this.style.backgroundColor=''; this.style.cursor='hand';>是否转移目录：</td>
<td width="373" valign="middle" bgcolor="#FFFFFF" onMouseOver=this.style.backgroundColor='#FAFBFC'; onMouseOut=this.style.backgroundColor=''; this.style.cursor='hand';>
<input name="YESOK" type="radio" id="YESOK" value="NO" checked >否
<input name="YESOK" id="YESOK" type="radio" value="YES">是（若要转移目录就选 <strong>是</strong> ，否则不会执行）</td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="108" height="20" align="right" valign="middle" bgcolor="#FFFFFF" onMouseOver=this.style.backgroundColor='#FAFBFC'; onMouseOut=this.style.backgroundColor=''; this.style.cursor='hand';>栏目转移说明：</td>
<td width="373" valign="top" bgcolor="#FFFFFF" onMouseOver=this.style.backgroundColor='#FAFBFC'; onMouseOut=this.style.backgroundColor=''; this.style.cursor='hand';>三级栏目可以转移到二级目录的某一目录下，同时该三级栏目下的所有条目也全部转移过去，请小心操作！</td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="108" height="20" align="right" valign="middle" bgcolor="#FFFFFF" onMouseOver=this.style.backgroundColor='#FAFBFC'; onMouseOut=this.style.backgroundColor=''; this.style.cursor='hand';>转到二级栏目：</td>
<td width="373" valign="middle" onMouseOver=this.style.backgroundColor='#FAFBFC'; this.style.cursor='hand'; onMouseOut=this.style.backgroundColor='';>
<select name="BClassB">
<%
set rs = server.createobject("adodb.recordset")
rs.source = "select id,content,parentid from deeptree where parentid=0 order by id desc"
rs.open rs.source,conn,1,1
if rs.recordcount=0 then
response.write("没有栏目")
end if
while not rs.eof
Bid=rs("id")
%>
<option value="" style="background-color:#CCCCCC" >╋<%=rs("content")%></option>
<%
set rsSmallClass = server.createobject("adodb.recordset")
rsSmallClass.source = "select id,content,parentid from deeptree where parentid="&Bid
rsSmallClass.open rsSmallClass.source,conn,1,1
while not rsSmallClass.eof
%>
<option value="<%=rsSmallClass("id")%>" style="background-color:#DDDDDD"> ┣<%=rsSmallClass("content")%></option>
<%
rsSmallClass.movenext
wend
rsSmallClass.Close
rs.movenext
wend
rs.close
%>
</select>
（选择二级目录）</td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="50" colspan="2" align="center" valign="middle" rowspan="2" onMouseOver=this.style.backgroundColor='#FAFBFC'; this.style.cursor='hand'; onMouseOut=this.style.backgroundColor='';>
<input type="submit" value=" 修 改 " name="B122" onclick="return DupDate()">
<input type=button value=返回上一层 onclick=history.go(-1)>
</td>
</tr>
<tr valign="middle" bgcolor="#FFFFFF"> </tr>
</table>
</form>
<%
rs1.close
set rs1=nothing
%>
<%
end select
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -