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

📄 news_addcata.asp

📁 商店程序 商店程序 商店程序 商店程序 商店程序 商店程序
💻 ASP
字号:
<%
if request.cookies("adminok")="" then
  response.redirect "shop_login.htm"
end if
%>
<!--#include file="setup.asp" -->
<%
	dim rs,sql,action
	set rs=server.createobject("adodb.recordset")

action=request("action")


select case action
	case "add"
			if request("title")="" then
				response.write "<center>没有填写完必须的内容!没有保存...</center>"
			else
				sql="select * from category where id is null"
				rs.open sql,conn,1,3
				rs.addnew
				rs("title")=request("title")
				rs.update
				rs.close
				response.write "<center>已经成功保存了...</center>"
			end if
	case "modify"
			if request("title")="" then
				response.write "<center>没有填写完必须的内容!没有保存...</center>"
			else
				sql="select * from category where id="&cstr(request("id"))
				rs.open sql,conn,1,3
				oldtitle=rs("title")
				rs("title")=request("title")
				rs.update
				rs.close
				sql="update news set cataid='"&request("title")&"' where cataid='"&oldtitle&"'"
				conn.execute sql
				response.write "<center>已经成功保存了...</center>"
			end if
	case "del"
		sql="select * from category where id="&cstr(request("id"))
		rs.open sql,conn,1,1
		cata=rs("title")
		rs.close
		sql="delete from category where id="&cstr(request("id"))
		conn.execute sql
		sql="delete from news where cataid='"&cata&"'"
		conn.execute sql
		response.write "<center>已经成功删除了...</center>"
	case "error"
		response.write "<center>用户名/密码错!没有保存...</center>"
end select
%>
<html>
<head>
<title>新闻类别管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../news/style.css" type="text/css">
</head>
<body bgcolor="#FFFFFF">
      
<form name="form1" method="post" action="news_addcata.asp">
  <div align="center"><%=news_title%> - 新闻类别管理</div>
  <table width="38%" border="1" align="center" cellspacing="0" cellpadding="0" bordercolor="#FFFFCC">
    <tr> 
      <td> 
       
      </td>
    </tr>
  </table>
  <table width="54%" border="0" align="center">
    <tr> 
      <td width="45%" valign="top"> 
        <table width="100%" border="1" bordercolor="#000000">
          <tr> 
            <td bgcolor="#8CAAE7">已有类别</td>
          </tr>
          <%
sql="select * from category"
rs.open sql,conn,1,1
if rs.bof and rs.eof then
	response.write "<tr><td>没有类别</td></tr>"
else
	do while not rs.eof
%>
          <tr> 
            <td>
              <div align="right"><%=rs("title")%> - <a href="javascript:setvalue('<%=rs("title")%>',<%=rs("id")%>)">修改</a> 
                <a href="javascript:cdel('<%=rs("id")%>')">删除</a></div>
            </td>
          </tr>
          <%
rs.movenext
loop
end if
rs.close
set rs=Nothing
endconnection
%>
          <tr> 
            <td> 
              
                <script language="JavaScript">
function setvalue(v,id){
var v;
var id;
form1.title.value=v;
form1.action.value='modify';
form1.id.value=id;
}
</script>
                <script language="JavaScript">
function newc(){
form1.title.value="";
form1.action.value="add";
form1.id.value="0";

}
</script>
                <script language="JavaScript">
function cdel(id){
var id;
if (confirm("你真的要删除这个类别和这个类别下的所有新闻吗?")){
	document.location.href="news_addcata.asp?action=del&id="+id+""
	}
}
</script>
            </td>
          </tr>
        </table>
      </td>
      <td width="55%" valign="top"> 
        <div align="center"> 
          <p>新增/修改类别: <br>
            <input type="text" name="title" size="12">
            <br>
            动作: 
            <input type="text" name="action" readonly value="add" size="6" style="border:none">
            <input type="hidden" name="id">
            <br>
            <input type="submit" name="Submit" value="确定">
            <input type="reset" name="Submit2" value="取消">
          </p>
        </div>
      </td>
    </tr>
  </table>
 
</form>
<script language="JavaScript">
document.write("<hr width='80%' size='1'>");
document.write("<div align='center' style=fontsize:9pt;><font face='Verdana, Arial, Helvetica, sans-serif'>");
document.write("<a href=<%=homepage_link%> target=_blank><font color=red><%=homepage_title%></font></a> - <a href=<%=news_location%>\default.asp><font color=black><%=news_title%></font></a><br>");
document.write("<br>");
</script>
</body>
</html>

⌨️ 快捷键说明

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