⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 admin_totemplet.asp

📁 新闻发布系统
💻 ASP
字号:
<!--#include file = include.asp--> 
<!--#include file = admin_Checkmana.asp-->
<%
'=========================================================
'产品目录:风讯产品N系列
'软件名称:风讯站点管理系统
'当前版本:2004.I.0225
'最新更新:2004.2.10
'=========================================================
'Copyright (C) 2002-2004 cooin.com. All rights reserved.
'网站: http://www.cooin.com  Foosun.net
'程序制作:轻风云(QQ:655071)
'Email:skeen@cooin.com,skeen@Foosun.net
'论坛支持:风讯在线论坛(http://bbs.cooin.com   http://bbs.foosun.net)
'=========================================================
if EnoughPopedom("templetto")=1 then
Response.write"<script>alert(""[操作失败]\n\n你的权限不足!\n\n请与系统管理员联系获得足够的权限!"");location.href=""javascript:history.back()"";</script>"
Response.end
end if
%>

<head>
<LINK href=css/css.css rel=stylesheet>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"></head>

<body bgcolor="#FFFFFF" topmargin="0">
<table width="100%" border="0" cellspacing="0" cellpadding="0" align="center" bgcolor="#E6E6E6">
  <tr bgcolor="#FFFFFF" align="center"> 
    <td width="70%" height="62" valign="middle" bgcolor="#F7FFF4"> <table  width="98%" border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#7ED3A7">
        <tr bgcolor="#F7FFF4"> 
          <td height="30" colspan="2" align="center" valign="middle"> <table width="100%" border="0" cellpadding="0" cellspacing="0" background="images/bg1.gif">
              <tr> 
                <td height="26"> <div align="center"><b><font color="#000000">模板捆绑情况(红色为小类,黑色为大类) 
                     </font></b><font color="#000000"><font color="#FF0000"> </font></font></div></td>
              </tr>
            </table></td>
        </tr>
        <tr bgcolor="#F7FFF4"> 
          <td width="45%" height="21" valign="top" > 
            <%
        set rs = server.createobject("adodb.recordset")
        sql = "select * from newsclass order by RootID asc,orders asc"
        rs.open sql,conn,1,1
      if rs.recordcount=0 then
      response.write("你没有添加栏目")
      end if
        while not rs.eof
           if rs("ParentID")=0 then
              response.write("<hr size=1 noshade color=#7ED3A7>")
           end if
           for i=1 to rs("depth")
              response.write("-")
           next
           if rs("Child")<>0 then
        	  response.write(rs("classcn"))
    		  response.write("<br>")
		   else
		   response.write("<font color=red>"&rs("classcn")&"</font><br>")
		   end if
      rs.movenext
    wend
rs.close
%>
          </td>
          <td width="55%" valign="top" bgcolor="#F7FFF4" > 
            <%
        set rs = server.createobject("adodb.recordset")
        sql = "select * from newsclass order by RootID asc,orders asc"
        rs.open sql,conn,1,1
      if rs.recordcount=0 then
      response.write("你没有添加栏目")
      end if
        while not rs.eof
           if rs("ParentID")=0 then
              response.write("<hr size=1 noshade color=#7ED3A7>")
           end if
           if rs("Child")<>0 then
              response.write("大类栏目:<font color=red><b>"&rs("ClassTemplet")&"</b></font><br>")
		   else
              response.write("大类栏目:<font color=red><b>"&rs("ClassTemplet")&"</b></font>、小类栏目:<font color=green><b>"&rs("sClassTemplet")&"</b></font>、新闻:<font color=blue><b>"&rs("NewsTemplet")&"</b></font><br>")
		   end if
      rs.movenext
    wend
rs.close
%>
          </td>
        </tr>
      </table>
      <table width="98%" height="266" border="0" align="center" cellpadding="3" cellspacing="1" bgcolor="#7ED3A7">
        <tr bgcolor="#F7FFF4"> 
          <td height="19" colspan="3"> <table width="100%" border="0" cellpadding="0" cellspacing="0" background="images/bg1.gif">
              <tr> 
                <td height="26"> <div align="center"><b><font color="#FFFFFF"><strong><font color="#000000">大类栏目模板捆绑管理</font></strong></font></b></div></td>
              </tr>
            </table></td>
        </tr>
        <tr bgcolor="#F7FFF4"> 
          <form name="form1" method="POST" action="admin_TempletGo.asp?o=BigClassTemplet">
            <td width="37%" height="24"> <div align="center">模板: 
                <select name="TempletName" id="select2" class=Anbutc>
                  <%
    set rs = server.createobject("adodb.recordset")
    rs.source = "select * from Templet where TempletType='BigClass' order by id desc "
    rs.open rs.source,conn,1,1
    while not rs.eof
%>
                  <option value="<%=rs("TempletName")%>"><%=rs("TempletName")%></option>
                  <%
    rs.movenext
    wend
    rs.close
%>
                </select>
              </div></td>
            <td width="35%"> <div align="center">栏目: 
                <select name="classID" id="classID" class=Anbutc>
                  <%
        set rsSmallClass = server.createobject("adodb.recordset")
        rsSmallClass.source = "select * from newsclass order by RootID asc,orders asc"
        rsSmallClass.open rsSmallClass.source,conn,1,1
        while not rsSmallClass.eof
%>
                  <option value=<%=rsSmallClass("ID")%>><%=rsSmallClass("classCN")%></option>
                  <%
           rsSmallClass.movenext
        wend
        rsSmallClass.Close
%>
                </select>
              </div></td>
            <td width="28%"> <div align="center"> 
                <input name="so" type="submit" id="so" onClick="return center()" value="捆绑" class=Anbut1>
              </div></td>
          </form>
        </tr>
        <tr bgcolor="#EAFFE1"> 
          <form name="form1" method="POST" action="admin_TempletGo.asp?o=BigClassTempletNo">
            <td width="37%" height="25"> <div align="center"></div></td>
            <td width="35%"> <div align="center">栏目: 
                <select name="classID" id="classID" class=Anbutc>
                  <%
        set rsSmallClass = server.createobject("adodb.recordset")
        rsSmallClass.source = "select * from newsclass  order by RootID asc,orders asc"
        rsSmallClass.open rsSmallClass.source,conn,1,1
        while not rsSmallClass.eof
%>
                  <option value=<%=rsSmallClass("ID")%>><%=rsSmallClass("classCN")%></option>
                  <%
           rsSmallClass.movenext
        wend
        rsSmallClass.Close
%>
                </select>
              </div></td>
            <td width="28%"> <div align="center"> 
                <input name="so" type="submit" id="so" onClick="return center1()" value="取消捆绑" class=Anbut1>
              </div></td>
          </form>
        </tr>
        <tr bgcolor="#F7FFF4"> 
          <td height="30" colspan="3"> <div align="center"> 
              <table width="100%" border="0" cellpadding="0" cellspacing="0" background="images/bg1.gif">
                <tr> 
                  <td height="30"> <div align="center"><b><strong>小类栏目捆绑</strong><font color="#FFFFFF"><strong><font color="#000000">管理</font></strong></font></b></div></td>
                </tr>
              </table>
            </div></td>
        </tr>
        <tr bgcolor="#F7FFF4"> 
          <form name="form1" method="POST" action="admin_TempletGo.asp?o=SmallClassTemplet">
            <td width="37%" height="20" bgcolor="#F7FFF4"> <div align="center">模板: 
                <select name="TempletName" id="select2" class=Anbutc>
                  <%

    set rs = server.createobject("adodb.recordset")
    rs.source = "select * from Templet where TempletType='Class' order by id desc "
    rs.open rs.source,conn,1,1
    while not rs.eof
%>
                  <option value="<%=rs("TempletName")%>"><%=rs("TempletName")%></option>
                  <%
    rs.movenext
    wend
    rs.close
%>
                </select>
              </div></td>
            <td width="35%"> <div align="center">栏目: 
                <select name="ClassID" class=Anbutc>
                  <%
        set rsSmallClass = server.createobject("adodb.recordset")
        rsSmallClass.source = "select * from newsclass where Child=0 order by RootID asc,orders asc"
        rsSmallClass.open rsSmallClass.source,conn,1,1
        while not rsSmallClass.eof
%>
                  <option value=<%=rsSmallClass("ID")%>><%=rsSmallClass("ClassCN")%></option>
                  <%
           rsSmallClass.movenext
        wend
        rsSmallClass.Close
%>
                </select>
              </div></td>
            <td width="28%"> <div align="center"> 
                <input name="so" type="submit" id="so" onClick="return center()" value="捆绑" class=Anbut1>
              </div></td>
          </form>
        </tr>
          
        <tr bgcolor="#EAFFE1"> 
          <form name="form1" method="POST" action="admin_TempletGo.asp?o=SmallClassTempletNo">
            <td width="37%" height="20"> <div align="center"></div></td>
            <td width="35%"> <div align="center">栏目: 
                <select name="ClassID" class=Anbutc>
                  <%
        set rsSmallClass = server.createobject("adodb.recordset")
        rsSmallClass.source = "select * from newsclass where Child=0 order by RootID asc,orders asc"
        rsSmallClass.open rsSmallClass.source,conn,1,1
        while not rsSmallClass.eof
%>
                  <option value=<%=rsSmallClass("ID")%>><%=rsSmallClass("ClassCN")%></option>
                  <%
           rsSmallClass.movenext
        wend
        rsSmallClass.Close
%>
                </select>
              </div></td>
            <td width="28%"> <div align="center"> 
                <input name="so" type="submit" id="so" onClick="return center1()" value="取消捆绑" class=Anbut1>
              </div></td>
          </form>
        </tr>
            
        <tr bgcolor="#F7FFF4"> 
          <td colspan="3"> <div align="center"> 
              <table width="100%" border="0" cellpadding="0" cellspacing="0" background="images/bg1.gif">
                <tr> 
                  <td height="26"> <div align="center"><b><font color="#FFFFFF"><strong><font color="#000000">新闻模板捆绑管理</font></strong></font></b></div></td>
                </tr>
              </table>
            </div></td>
        </tr>
        <tr bgcolor="#F7FFF4"> 
          <form name="form1" method="POST" action="admin_TempletGo.asp?o=NewsTemplet">
              
            <td height="20"> <div align="center">模板: 
                <select name="TempletName" id="select2" class=Anbutc>
                  <%
    set rs = server.createobject("adodb.recordset")
    rs.source = "select * from Templet where TempletType='News' order by id desc "
    rs.open rs.source,conn,1,1
    while not rs.eof
%>
                  <option value="<%=rs("TempletName")%>"><%=rs("TempletName")%></option>
                  <%
    rs.movenext
    wend
    rs.close
%>
                </select>
              </div></td>
            <td width="35%" bgcolor="#F7FFF4"> <div align="center">栏目: 
                <select name="ClassID" id="ClassID" class=Anbutc>
                  <%
        set rsSmallClass = server.createobject("adodb.recordset")
        rsSmallClass.source = "select * from newsclass where Child=0 order by RootID asc,orders asc"
        rsSmallClass.open rsSmallClass.source,conn,1,1
        while not rsSmallClass.eof
%>
                  <option value=<%=rsSmallClass("ID")%>><%=rsSmallClass("ClassCN")%></option>
                  <%
           rsSmallClass.movenext
        wend
        rsSmallClass.Close
%>
                </select>
              </div></td>
            <td width="28%"> <div align="center"> 
                <input name="so" type="submit" id="so" onClick="return center()" value="捆绑" class=Anbut1>
              </div></td>
          </form>
        </tr>
        <tr bgcolor="#EAFFE1"> 
          <form name="form1" method="POST" action="admin_TempletGo.asp?o=NewsTempletNo">
              
            <td height="26"> <div align="center"></div></td>
            <td width="35%" bgcolor="#EAFFE1"> <div align="center">栏目: 
                <select name="ClassID" id="ClassID" class=Anbutc>
                  <%
        set rsSmallClass = server.createobject("adodb.recordset")
        rsSmallClass.source = "select * from newsclass where Child=0 order by RootID asc,orders asc"
        rsSmallClass.open rsSmallClass.source,conn,1,1
        while not rsSmallClass.eof
%>
                  <option value=<%=rsSmallClass("ID")%>><%=rsSmallClass("ClassCN")%></option>
                  <%
           rsSmallClass.movenext
        wend
        rsSmallClass.Close
%>
                </select>
              </div></td>
            <td width="28%"> <div align="center"> 
                <input name="so" type="submit" id="so" onClick="return center1()" value="取消捆绑" class=Anbut1>
              </div></td>
          </form>
        </tr>
        <tr bgcolor="#EAFFE1"> 
          <td height="26" colspan="3">
            <!--#include file = name.asp-->
          </td>
        </tr>
      </table></td>
  </tr>
</table>
</body>

⌨️ 快捷键说明

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