category.asp

来自「top-cms内容管理系统」· ASP 代码 · 共 396 行 · 第 1/2 页

ASP
396
字号
          </tr>
          <tr bgcolor="#FFFFFF" class="hidden" id="s2"> 
            <td width="200" align="right"><font color="#0000FF">最新更新</font></td>
            <td><font color="#666666">显示条数 
              <input type="text" name="sOption3" size="2" maxlength="2" value="8">
              (填数字)</font> <font color="#666666"><br>
              标题长度 
              <input type="text" name="sOption4" size="2" maxlength="2" value="20">
              (填数字)</font> <font color="#666666">&nbsp;</font></td>
          </tr>
          <tr bgcolor="#EEEEEE" class="hidden" id="s2"> 
            <td width="200" align="right"><font color="#0000FF">图片信息总条数</font></td>
            <td> <font color="#666666">显示条数 
              <input type="text" name="sOption5" size="2" maxlength="2" value="3">
              (填数字)</font> <font color="#666666"><br>
              每行显示 
              <input type="text" name="sOption6" size="2" maxlength="2" value="3">
              (填数字)</font> <font color="#666666"><br>
              标题长度 
              <input type="text" name="sOption7" size="2" maxlength="2" value="14">
              (填数字)</font> <font color="#666666">&nbsp;</font></td>
          </tr>
          <tr id="s2" class="hidden"> 
            <td width="200" align="right"><font color="#0000FF">推荐信息条数</font></td>
            <td><font color="#666666">显示条数 
              <input type="text" name="sOption8" size="2" maxlength="2" value="8">
              (填数字)</font> <font color="#666666"><br>
              标题长度 
              <input type="text" name="sOption9" size="2" maxlength="2" value="16">
              (填数字)</font> <font color="#666666">&nbsp;</font></td>
          </tr>
        </table>
      </td>
    </tr>
  </table>
  <table width="100%" border="0" cellspacing="0" cellpadding="0" id="cat1">
    <tr> 
      <td> 
        <table width="100%" border="1" cellspacing="0" cellpadding="2" align="center" bgcolor="#FFFFFF" bordercolor="#999999">
          <tr id="cat"> 
            <td width="200" align="right">套用模板:</td>
            <td> <%
		objCMS.CatTemplate()
		%> </td>
          </tr>
          <%if objCMS.L<>"0" or t="add" then%>
          <tr id="cat"> 
            <td width="200" align="right" bgcolor="#EEEEEE">栏目名称:</td>
            <td bgcolor="#EEEEEE"> <input type="text" name="cName" size="15" maxlength="100" value="<%=objCMS.cName%>"> 
            </td>
          </tr>
          <tr id="cat"> 
            <td width="200" align="right">放置文件夹:</td>
            <td> <input type="text" name="cFolder" size="15" maxlength="100" value="<%=objCMS.cFolder%>"<%if t<>"add" then response.write " readonly"%>> 
            </td>
          </tr>
          <tr id="cat"> 
            <td width="200" align="right" bgcolor="#EEEEEE">上级类别:</td>
            <td bgcolor="#EEEEEE"> <%
		if t<>"add" then
			objCMS.PreCat()
		else
			response.write "<input type=""hidden"" name=""preLevel"" value=""" & objCMS.L & """>"
			response.write "<span disabled>"&objCMS.scName&"</span>"
		end if
		%> </td>
          </tr>
          <tr id="cat"> 
            <td align="right">栏目图:</td>
            <td> <%if LCase(t)<>"add" and objCMS.cImg<>"" and not IsNull(objCMS.cImg) then
			text="重新"
			%> <img src="<%response.write AbsWebPath & objCMS.cImg%>"> 
              <br> <%end if%> <input type="checkbox" name="ReUP" value="1" onclick="if (this.checked==true){cImg.className='';}else{cImg.className='hidden';}"> 
              <%=text%>上传 
              <input type="file" name="cImg" id="cImg" class="hidden"> </td>
          </tr>
          <tr id="s1" class="hidden"> 
            <td align="right" bgcolor="#EEEEEE"><font color="#0000FF">栏目页显示子信息类:</font></td>
            <td bgcolor="#EEEEEE"> <%
		if t<>"add" then
			objCMS.CatShtml()
		else
			Response.Write "<span disabled>[无]</span>"
		end if
		%> </td>
          </tr>
          <tr id="s1" class="hidden"> 
            <td align="right"><font color="#0000FF">分几列显示?</font></td>
            <td> <font color="#666666">显示列数</font> <input type="text" name="cOption0" size="2" maxlength="2" value="<%=objCMS.cOption0%>"> 
              <font color="#666666"> (填数字)</font> </td>
          </tr>
          <tr id="s1" class="hidden"> 
            <td align="right" bgcolor="#EEEEEE"><font color="#0000FF">子信息类别信息显示:</font></td>
            <td bgcolor="#EEEEEE"><font color="#666666">显示条数</font> <input type="text" name="cOption1" size="2" maxlength="2" value="<%=objCMS.cOption1%>"> 
              <font color="#666666"> (填数字)<br>
              标题长度 
              <input type="text" name="cOption2" size="2" maxlength="2" value="<%=objCMS.cOption2%>">
              (填数字) </font> </td>
          </tr>
          <tr id="s1" class="hidden"> 
            <td width="200" align="right"><font color="#0000FF">&nbsp;最新更新: </font></td>
            <td><font color="#666666"> 显示条数 
              <input type="text" name="cOption3" size="2" maxlength="2" value="<%=objCMS.cOption3%>">
              (填数字)<br>
              标题长度 
              <input type="text" name="cOption4" size="2" maxlength="2" value="<%=objCMS.cOption4%>">
              (填数字)</font> </td>
          </tr>
          <tr id="s1" class="hidden"> 
            <td width="200" align="right" bgcolor="#EEEEEE"><font color="#0000FF">图片信息:</font></td>
            <td bgcolor="#EEEEEE"><font color="#666666"> 显示条数 
              <input type="text" name="cOption5" size="2" maxlength="2" value="<%=objCMS.cOption5%>">
              (填数字)</font> <font color="#666666"><br>
              每行显示 
              <input type="text" name="cOption6" size="2" maxlength="2" value="<%=objCMS.cOption6%>">
              (填数字)</font> <font color="#666666"><br>
              标题长度 
              <input type="text" name="cOption7" size="2" maxlength="2" value="<%=objCMS.cOption7%>">
              (填数字)</font></td>
          </tr>
          <tr bgcolor="#FFFFFF" class="hidden" id="s1"> 
            <td width="200" align="right"><font color="#0000FF">&nbsp;推荐信息:</font></td>
            <td><font color="#666666"> 显示条数 
              <input type="text" name="cOption8" size="2" maxlength="2" value="<%=objCMS.cOption8%>">
              (填数字)</font> <font color="#666666"><br>
              标题长度 
              <input type="text" name="cOption9" size="2" maxlength="2" value="<%=objCMS.cOption9%>">
              (填数字)</font></td>
          </tr>
          <%else%>
          <tr bgcolor="#EEEEEE" id="cat"> 
            <td align="right">首页显示栏目:</td>
            <td> <%
		if t<>"add" then
			objCMS.IndexShtml()
		else
			Response.Write "<span disabled>[默认]</span>"
		end if
		%> </td>
          </tr>
          <%end if%>
          <%if t<>"add" then%>
          <tr id="cat" bgcolor="#FFFFFF"> 
            <td align="right">栏目建立者:</td>
            <td><%=objCMS.cCreater%></td>
          </tr>
          <tr bgcolor="#EEEEEE" id="cat"> 
            <td align="right">栏目最后修改:</td>
            <td><%=objCMS.cEditer%></td>
          </tr>
          <%end if%>
        </table>
      </td>
    </tr>
  </table>
  <table width="100%" border="1" cellspacing="0" cellpadding="2" align="center" bordercolor="#999999">
    <tr> 
      <td align="right" width="200">当前操作:</td>
      <td> 
        <% 
		if t="add" then
        	Response.Write "<input type=""radio"" name=""cType"" value=""ADD"" checked>添加"
		else
			if objCMS.ListEdit then
				Response.Write "<input type=""radio"" name=""cType"" value=""EDIT"" checked>编辑"
				if Len(objCMS.L)>1 and objCMS.ListDel then
					Response.Write "<input type=""radio"" name=""cType"" value=""DEL"">删除"
				end if
			else
				if Len(objCMS.L)>1 and objCMS.ListDel then
					Response.Write "<input type=""radio"" name=""cType"" value=""DEL"" checked>删除"
				end if
			end if
			
		end if
		%>
      </td>
    </tr>
    <tr bgcolor="#EEEEEE"> 
      <td align="center" colspan="2"> 
        <input type="hidden" name="cID" value="<%= cID %>">
		<input type="hidden" name="sTemplate">
        <input type="submit" name="B1" value=" 提交 " onclick="MM_TempValue (document.form1.sTempTemplate,document.form1.sTemplate);">
        <input type="button" name="B2" value=" 取消 " onclick="history.back();">
      </td>
    </tr>
  </table>
</form>
		<%
	end if
	objCMS.CloseDB	
else
	objCMS.OutInfo "对不起,您还没有登录,请先登录。","Login"
end if
set objCMS=nothing
%>
</body>
</html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?