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

📄 smallclass_mod.asp

📁 用ASP开发环境写出来的新闻采集系统
💻 ASP
字号:
<!--#include file="inc/conn.asp"-->
<!--#include file="inc/function.asp"-->
<!--#include file="Admin_ChkPurview.asp"-->
<%
action =request("action")
id = request("id")
pid = request("pid")
if action="修改栏目" then
	ttt=""
	set Rs=server.createobject("adodb.recordset")         
	Sql="select * from PE_Class where ClassID=" & request("id")         
	Rs.open Sql,Conn,1,1
	ClassName= rs("ClassName")  
	Readme=rs("Readme")
	ClassDir=rs("ClassDir")
	rs.close
	set rs=nothing
elseif action="确认修改" then
	if request.form("ClassName")="" or request.form("Readme")="" or request.form("ClassDir")="" then
		ttt="<font color=red>请填写完整!</font>"
	else
		sql = "update Pe_Class set ClassName='" & request.form("ClassName") & "',Readme='" & request.form("Readme") &"',ClassDir='" & request.form("ClassDir") &"' where ClassID=" & id
		conn.execute(sql)
		Call CloseConn()
		Call CloseConnItem()
		response.redirect("smallclass_index.asp?id=" & pid)
		response.end
	end if	
else
	Call CloseConn()
	Call CloseConnItem()
	response.redirect("smallclass_index.asp?id=" & pid)
	response.end
end if
%>

<html>
<head>
<title>采集系统</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="Admin_Style.css">
<style type="text/css">
.ButtonList {
	BORDER-RIGHT: #000000 2px solid; BORDER-TOP: #ffffff 2px solid; BORDER-LEFT: #ffffff 2px solid; CURSOR: default; BORDER-BOTTOM: #999999 2px solid; BACKGROUND-COLOR: #e6e6e6
}
</style>
<SCRIPT language=javascript>
    function unselectall(thisform){
        if(thisform.chkAll.checked){
            thisform.chkAll.checked = thisform.chkAll.checked&0;
        }   
    }
    function CheckAll(thisform){
        for (var i=0;i<thisform.elements.length-6;i++){
            var e = thisform.elements[i];
            if (e.Name !="chkAll"&&e.disabled!=true)
                e.checked = thisform.chkAll.checked;
        }
    }
</script>
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="1" class="border">
  <tr class='topbg'> 
    <td height="22" colspan="2" align="center" ><strong>本 地 数 据 分 类 管 理</strong></td>
  </tr>
</table>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="1" class="border">
  <tr class="tdbg"> 
      <td width="65" height="30"><strong>管理导航:</strong></td>
    <td height="30"><a href=class_index.asp>频道管理</a> | <a href=smallclass_index.asp?id=<%=pid%>>栏目管理</a> | 修改栏目</td>
  </tr>
</table>
<br>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="1" class="border" >
    <tr> 
      <td height="22" colspan="2" class="title"> <div align="center"><b></b></div></td>
    </tr>
</table>
<table class="border" border="0" cellspacing="1" width="100%" cellpadding="0">
    <TR> 
      <TD height=22  align=center class=ButtonList>请修改以下项目</TD>
    </TR>
</TABLE>
  <form name="myform" method="POST" action="smallclass_mod.asp">
<div align="center"> <%=ttt%>
<!--频道ID-->
    <input name="pid" type="hidden" size="50" maxlength="50" value="<%=pid%>">
	<input name="id" type="hidden" size="50" maxlength="50" value="<%=id%>">
  <p>栏目名称: 
    <input name="ClassName" type="text" size="50" maxlength="50" value="<%=ClassName%>">
  </p>
  <p>栏目说明: 
    <input name="Readme" type="text" size="50" maxlength="250" value="<%=Readme%>">
  </p>
  <p>栏目目录: 
    <input name="ClassDir" type="text" size="50" maxlength="250" value="<%=ClassDir%>">
  </p>
  <p> 
    <input name="action" type="submit" id="action" value="确认修改">&nbsp;&nbsp;
    <input name="action" type="submit" id="action" value="返回">
  </p>
  <!--#include file="Admin_ItemFoot.asp"-->
</div>
  </form>
</body>
</html>
<%
Call CloseConn()
Call CloseConnItem()
%>

⌨️ 快捷键说明

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