📄 news_addcata.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 + -