📄 admin_classsmamon.asp
字号:
<%
Option Explicit
Response.buffer=true
const purviewlevel=2
%>
<!--#include file="admin_PurviewChe.asp" -->
<!--#include file="conn.asp" -->
<!--#include file="admin_Function.asp" -->
<%
dim smallclassid,oldsmall,smallmon,newsmallclass,newbigclass,newsmanager,newsmallintr,SuccessMsg,errmsg
smallclassid=trim(request("smallclassid"))
if smallclassid="" then
response.redirect("admin_ClassMan.asp")
end if
oldsmall=trim(request("oldsmall"))
smallmon=trim(request("smallmon"))
newsmallclass=trim(request("newsmallclass"))
newbigclass=trim(request("newbigclass"))
newsmanager=trim(request("newsmanager"))
newsmallintr=trim(request("newsmallintr"))
if smallmon="monsmall" then
dim rs
set rs=conn.execute("select * from smallclass where smallclass='"&newsmallclass&"'")
conn.execute"update smallclass set smallclass='"&newsmallclass&"',bigclass='"&newbigclass&"',smanager='"&newsmanager&"',smallintr='"&newsmallintr&"'where smallclassid="&smallclassid&""
conn.execute"update article set smallclass='"&newsmallclass&"'where smallclass='"&oldsmall&"'"
rs.close
set rs=nothing
call closeconn()
SuccessMsg=SuccessMsg + "<br><br><li>小类栏目修改成功！</li>"
SuccessMsg=SuccessMsg + "<br><br><li>你可以：［<a href='admin_ClassMan.asp'>返回栏目管理面板</a>］</li>"
call ShowSuccessMsg()
end if
%>
<%
dim rsbig
set rsbig=server.createobject("ADODB.Recordset")
rsbig.open"select * from bigclass order by bigclassid desc",conn,1,1
if rsbig.eof or rsbig.bof then
rsbig.close
set rsbig=nothing
call closeconn()
errmsg=errmsg + "<br><br><li>还没有大类栏目，请先添加大类栏目！</li>"
errmsg=errmsg + "<br><br><li>你可以：［<a href='admin_ClassBigAdd.asp'>添加大类栏目</a>］［<a href='admin_ClassMan.asp'>返回栏目管理面板</a>］</li>"
call ShowErrMsg()
else
dim rssma
set rssma=conn.execute("select * from smallclass where smallclassid="&smallclassid&"")
if rssma.eof or rssma.bof then
rsbig.close
set rsbig=nothing
call closeconn()
errmsg=errmsg + "<br><br><li>该小类不存在！</li>"
errmsg=errmsg + "<br><br><li>你的操作有误或参数出现致命错误！</li>"
errmsg=errmsg + "<br><br><li>你可以：［<a href='admin_ClassSmaAdd.asp'>添加小类栏目</a>］［<a href='admin_ClassMan.asp'>返回栏目管理面板</a>］</li>"
call ShowErrMsg()
else
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>添加小类栏目</title>
<link href="Style.css" rel="stylesheet" type="text/css">
<script language=javascript>
function checkform()
{
if (document.form1.newbigclass.value=="")
{
alert("请选择所属大类栏目！");
return false;
}
if (document.form1.newsmallclass.value=="")
{
alert("小类栏目不能为空！");
return false;
}
if (document.form1.newsmanager.value=="")
{
alert("管理员不能为空！");
return false;
}
}
</script>
</head>
<body>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center" class="txt1">欢迎来到小类栏目修改面板</td>
</tr>
<tr>
<td align="center" class="txt05">［<a href="admin_ClassMan.asp">返回栏目管理面板</a>］</td>
</tr>
<tr>
<td><form name="form1" method="post" action="" onsubmit="return checkform();">
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="4">
<tr>
<td align="right" class="txt05">原小类栏目ID：</td>
<td><span class="txt05"><%=rssma("smallclassid")%></span></td>
</tr>
<tr>
<td align="right" class="txt05">原所属大类栏目：</td>
<td><span class="txt05"><%=rssma("bigclass")%></span></td>
</tr>
<tr>
<td width="50%" align="right" class="txt05">所属大类栏目：</td>
<td width="50%"><select name="newbigclass" class="but" id="newbigclass">
<option>请选择所属的大类栏目</option>
<%do while not rsbig.eof %>
<option value="<%=rsbig("bigclass")%>"><%=rsbig("bigclass")%></option>
<%
rsbig.movenext
loop
rsbig.close
set rsbig=nothing
%>
</select></td>
</tr>
<tr>
<td align="right" class="txt05">小类栏目名称：</td>
<td><input name="newsmallclass" type="text" class="but" id="newsmallclass" value="<%=rssma("smallclass")%>" maxlength="30"></td>
</tr>
<tr>
<td align="right" class="txt05">简介：</td>
<td><input name="newsmallintr" type="text" class="but" id="newsmallintr" value="<%=rssma("smallintr")%>" size="40" maxlength="100"></td>
</tr>
<tr>
<td align="right" class="txt05">管理员：</td>
<td><input name="newsmanager" type="text" class="but" id="newsmanager" value="<%=rssma("smanager")%>" maxlength="50"></td>
</tr>
<tr align="center">
<td colspan="2" class="txt05"><input name="Submit" type="submit" class="but" value="修改">
<input name="smallmon" type="hidden" id="smallmon" value="monsmall">
<input name="oldsmall" type="hidden" id="oldsmall" value="<%=rssma("smallclass")%>"></td>
</tr>
</table>
</form></td>
</tr>
<tr>
<td> </td>
</tr>
</table>
<%
end if
end if
rssma.close
set rssma=nothing
call closeconn()
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -