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

📄 change.asp

📁 实现一定上传功能
💻 ASP
字号:
<!--#include file="articleconn.asp"-->
<%
IF Session("KEY")<>"super"THEN
	response.redirect "mymanage.asp"
	response.end
END IF
%>
 <%
dim rs,tsql
dim rst
	set rst=server.CreateObject("ADODB.RecordSet")
	  
%> 
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>天荣现代农业</title>
<meta name="GENERATOR" content="Microsoft FrontPage 3.0">
<link rel="stylesheet" type="text/css" href="style.css">
<style type="text/css">
<!--
.unnamed1 {  font-size: 9pt; line-height: 12pt; color: #000000}
.unnamed2 {  font-size: 9pt; line-height: 18pt; color: #FFFFFF}
-->
</style>
</head>


<body bgcolor="#FFFFFF">
<div align="center" class="unnamed1">
<center>
    <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
      <tr bgcolor="#304D7C"> 
        <td bgcolor="#304D7C" class="unnamed1" height="24"> 
          <div align="center"><a href="myaddarticle.asp"><font color="#FFFFFF">增加新闻文章</font></a> 
            <font color="#FFFFFF"><b>|</b></font> <a href="makeindex.asp"><font color="#FFFFFF">生成首页图片新闻</font></a> 
            <font color="#FFFFFF"><b>|</b></font> <a href="newschk.asp"><font color="#FFFFFF">审核新闻</font></a> 
            <font color="#FFFFFF"><b></b></font><font color="#FFFFFF"><b>|</b></font> 
            <a href="usermanage.asp"><font color="#FFFFFF">用户管理</font></a><font color="#FFFFFF"> 
            <b>|</b> </font><a href="change.ASP"><font color="#FFFFFF">栏目管理</font></a> 
            <font color="#FFFFFF"><b>|</b></font> <a href="templates.asp"><font color="#FFFFFF">新闻模版管理</font></a> 
            <font color="#FFFFFF"><b>|</b></font> <a href="mymanage.asp"><font color="#FFFFFF">浏览</font></a><font color="#FFFFFF"> 
            <b>|</b> </font><a href="myaddarticle.asp"><font color="#FFFFFF"></font></a><a href=""><font color="#FFFFFF">退出系统</font></a></div></td>
        <td width="10" valign="bottom" align="right" height="17"><img src="images/x1.gif" width="11" height="11"></td>
      </tr>
    </table>
    <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" height="1">
      <tr> 
        <td bgcolor="#3A5C9F" width="168" height="322" valign="top"> 
          <table width="100%" border="0" cellpadding="0" cellspacing="0">
            <tr bgcolor="#000000"> 
              <td><img src="images/dot.gif" width="1" height="1"></td>
            </tr>
          </table>
          
          <table width="151" border="0" cellpadding="0" cellspacing="0">
            <tr bgcolor="#DFDFDF"> 
              <td width="131" class="unnamed2" height="2"> 
                <div align="center" class="unnamed1">&nbsp;增 加 栏 目</div>
              </td>
              <td width="20" valign="bottom" align="right" height="2"><img src="images/x9.gif" width="16" height="8"></td>
            </tr>
          </table>
          <table width="75%" border="0" align="center" cellpadding="0" cellspacing="0">
            <tr>
              <td><FORM METHOD=POST ACTION="changeADD.asp">
                  <div align="center">
                    <table width="75%" border="0" cellpadding="0" cellspacing="3">
                      <tr> 
                        <td> 
                          <div align="center"><font color="#FFFFFF">
                            <input type="hidden" name=method value="added">
                            表 名 ( 英 文 ): </font> 
                            <input type=TEXT name=TableName class="smallInput">
                          </div>
                        </td>
                      </tr>
                      <tr> 
                        <td> 
                          <div align="center"><font color="#FFFFFF">栏 目 名 称 : 
                            </font> 
                            <input type=text name=ItemName2 class="smallInput">
                          </div>
                        </td>
                      </tr>
                      <tr> 
                        <td> 
                          <div align="center"> 
                            <input type=submit value=增加 class="smallInput" name="submit">
                            <input type="reset" name="Reset" value="取消" class="smallInput">
                          </div>
                        </td>
                      </tr>
                    </table>
                    
                  </div>
                </FORM>
              </td>
            </tr>
          </table>
          <table width="151" border="0" cellpadding="0" cellspacing="0">
            <tr bgcolor="#DFDFDF"> 
              <td width="131" class="unnamed2" height="2"> 
                <div align="center" class="unnamed1">&nbsp;修 改 栏 目</div>
              </td>
              <td width="20" valign="bottom" align="right" height="2"><img src="images/x9.gif" width="16" height="8"></td>
            </tr>
          </table>
          <table width="75%" border="0" cellpadding="0" cellspacing="0" align="center">
            <tr>
              <td><FORM METHOD=POST ACTION="changeEDIT.asp">
                  <div align="center">
                    <table width="75%" border="0" cellpadding="0" cellspacing="3">
                      <tr> 
                        <td> 
                          <div align="center"><font color="#FFFFFF">
                            <input type="hidden" name=method value="modified">
                            栏 目 的 ID 号: </font> 
                            <input type=text name=ID class="smallInput">
                          </div>
                        </td>
                      </tr>
                      <tr> 
                        <td> 
                          <div align="center"><font color="#FFFFFF">所要修改的栏目名称: 
                            </font> 
                            <input type=text name=ItemName class="smallInput">
                          </div>
                        </td>
                      </tr>
                      <tr> 
                        <td> 
                          <div align="center"> 
                            <input type=submit value=修改 name="changetype" class="smallInput">
                            <input type="reset" name="Reset2" value="取消" class="smallInput">
                          </div>
                        </td>
                      </tr>
                    </table>
                    
                  </div>
                </FORM></td>
            </tr>
          </table>
        </td>
        <td bgcolor="#C4C4C4" width="3" height="322"><img src="images/dot1.gif" width="1" height="1"></td>
        <td colspan="2" height="322" valign="top" align="right"> 
          <table width="98%" border="0" align="center" cellpadding="0" cellspacing="0">
            <tr>
              <td>
                <p><%
	rst.open "select * from type",conn,1
 if rst.EOF then
	response.write "没有栏目:("
	else
%> <br>
                  栏 目 列 表 </p>
                <table width="98%" border="0" cellpadding="0" cellspacing="1" bgcolor="#000000">
                  <tr> 
                    <td width="8%" bgcolor="#304D7C"> 
                      <div align="center"><font color="#FFFFFF">ID号</font></div>
                    </td>
                    <td width="21%" bgcolor="#304D7C"> 
                      <div align="center"><font color="#FFFFFF">栏目名</font></div>
                    </td>
                    <td width="18%" bgcolor="#304D7C"> 
                      <div align="center"><font color="#FFFFFF">数据表名</font></div>
                    </td>
                    <td width="30%" bgcolor="#304D7C"> 
                      <div align="center"><font color="#FFFFFF">创建时间</font></div>
                    </td>
                    <td width="23%" bgcolor="#304D7C"> 
                      <div align="center"><font color="#FFFFFF">删除</font></div>
                    </td>
                  </tr>
                  <%do while NOT rst.EOF%> 
                  <tr bgcolor="#FFFFFF"> 
                    <td width="8%" align="center"><%=rst("typeid")%></td>
                    <td width="21%" align="center"><%=rst("type")%></td>
                    <td width="18%" align="center"><%=rst("typename")%></td>
                    <td width="30%" align="center"><%=rst("typetime")%></td>
                    <td width="23%" align="center"><font color="#FFFFFF"><a href="changedel.asp?typeid=<%=rst("typeid")%>&amp;name=del&amp;typename=<%=rst("typename")%>">删除</a></font></td>
                  </tr>
                  <%
	rst.MoveNext
	loop
	end if
rst.close
%> 
                </table>
                
                <p><font color=red>注意:对栏目的删除操作将使该栏目以及栏目下所有已存数据和文件丢失。</font><br>
                </p>
                </td>
            </tr>
          </table>
          <br>
        </td>
      </tr>
    </table>
    <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
      <tr bgcolor="#304D7C"> 
        <td width="777" bgcolor="#304D7C" class="unnamed1" height="2"> 
          <div align="center">可直接发E-Mail至<a href="mailto:arkbbs@163.com">arkbbs@163.com</a>收 
             QQ:2820202</div>
        </td>
        <td width="10" valign="top" align="right" height="2"><img src="images/x4.gif" width="14" height="12"></td>
      </tr>
    </table>
  </center></div>
</body>
</html>

⌨️ 快捷键说明

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