classmodifysmall.asp

admin/admin.asp是WAP的后台管理登陆页面

<%@language=vbscript codepage=936 %>
<%
  if session("flag")="" then
      response.redirect "adminlogin.asp"
	  response.end
  end if
%>
<%if session("flag")>1 then
response.write"<SCRIPT language=JavaScript>alert('对不起，你没有这个权限！');"
response.write"javascript:history.go(-1)</SCRIPT>"
response.end
end if%>
<!--#include file="conn.asp"-->
<%
  set rs=server.createobject("adodb.recordset")
  sql="select * from ANclass where nclassID="&request("nclassID")
  rs.open sql,conn,3,3
if not rs.eof then
nclassname=rs("nclass")
nclassurl=rs("nclassurl")
brclass=rs("nclassbr")
upclass=rs("nclassup")
end if
  %>
<link rel="stylesheet" type="text/css" href="style.css">
<table width="60%" border="0" cellpadding="0" cellspacing="0" align="center">
  <tr> 
    <td align="center" valign="top"> <br>
      <a href="ClassManage.asp"><strong>产 品 类 别 设 置</strong></a> <br> <form name="form2" method="post" action="Smallsave.asp" >
        <table width="100%" border="0" align="center" cellpadding="0" cellspacing="2" class="border">
          <tr bgcolor="#999999" class="title"> 
            <td height="25" colspan="2" align="center"><strong>修改小类</strong></td>
          </tr>
<tr class="tdbg"> 
            <td width="30%" height="22" bgcolor="#C0C0C0"><strong>小类序号：</strong></td>
            <td bgcolor="#E3E3E3" width="70%"> <input name="nclasstop" type="text" size="20" maxlength="30" value="<%=rs("nclasstop")%>"></td>
          </tr>
          <tr class="tdbg"> 
            <td width="30%" height="22" bgcolor="#C0C0C0"><strong>所属大类：</strong></td>
            <td width="70%" bgcolor="#E3E3E3"><select name="classid">
<%	
        set rs = server.createobject("adodb.recordset")
	sql="select * from Aclass where id="&request("classID")
	rs.open sql,conn,1,1   
        if not rs.eof then %>              
        <option selected value="<%=rs("id")%>"><%=rs("class")%></option>
</select><%end if%></td>
          </tr>
          <tr class="tdbg"> 
            <td width="30%" height="22" bgcolor="#C0C0C0"><strong>小类名称：</strong></td>
            <td bgcolor="#E3E3E3" width="70%"> <input name="nclass" type="text" size="20" maxlength="30" value="<%=nclassname%>"></td>
          </tr>
       <tr bgcolor="#E3E3E3" class="tdbg"> 
            <td width="126" height="22" bgcolor="#C0C0C0"><strong>个性话语：</strong></td>
            <td width="218" bgcolor="#E3E3E3" width="70%"> <textarea rows="5" name="nclassurl" cols="25" class="smallarea"><%=nclassurl%></textarea>
            </td>
          </tr>
<tr bgcolor="#E3E3E3" class="tdbg">
      <td width="30%" height="22" bgcolor="#C0C0C0"><strong>文件上传限制：</strong></td>
      <td width="70%" height="22"> 
        <select name="nclassup" class="input">
<% if upclass=1 then %>
<option value=1>允许会员上传文件</option> 
<option value=2>禁止会员上传文件</option>
<%else%>
<option value=2>禁止会员上传文件</option>
<option value=1>允许会员上传文件</option>
<% end if %>
</select>
</td>
</tr>
<tr bgcolor="#E3E3E3" class="tdbg"> 
      <td width="30%" height="22" bgcolor="#C0C0C0"><strong>类别排列方式：</strong></td>
      <td bgcolor="#E3E3E3" width="70%">
<select name="nclassbr" class="input">
<% if brclass=1 then %>
<option value=1>使用 换行</option>
<option value=2>使用|符号</option>
<option value=3>使用 空格</option><%end if%>
<% if brclass=2 then %>
<option value=2>使用|符号</option>
<option value=3>使用 空格</option>
<option value=1>使用 换行</option><%end if%>
<% if brclass=3 then %>
<option value=3>使用 空格</option>
<option value=2>使用|符号</option>
<option value=1>使用 换行</option><%end if%>
</select>
</td>
</tr>
          <tr class="tdbg"> 
            <td height="22" align="center" bgcolor="#C0C0C0">&nbsp; </td>
            <td height="22" align="center" bgcolor="#E3E3E3"> <div align="left">
                <input name="nclassid" type="hidden"  value="<%=request("nclassID")%>">
                <input name="types" type="hidden"  value="mod">
                <input name="Add" type="submit" value=" 修 改 ">
              </div></td>
          </tr>
        </table>
      </form></td>
  </tr>
</table>
<%
rs.close
set rs=nothing
%>