save_newsclass.asp
来自「很好的网上书店源码 适合企业个人使用 很好的网络书城」· ASP 代码 · 共 66 行
ASP
66 行
<!--#include file="conn.asp"-->
<!--#include file="../inc/char.inc"-->
<%
action=request.form("action")
%>
<% if action="edit" then %>
<%
if request.form("text")="" then
response.write "<p align='center'>错误:类别不能为空,请输入类别名称!</p>"
response.write "<a href='javascript:history.back(1)'>返回重新输入</a>"
response.end
end if
dim text
dim classid
Classid=request.form("classid")
text=htmlencode(request.form("text"))
set rs=server.createobject("adodb.recordset")
sql="select * from shop_newsclass where ClassID="&Classid
rs.open sql,conn,1,3
rs("class")=text
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
<% else %>
<%
if request.form("text")="" then
response.write "<p align='center'>错误:类别不能为空,请输入类别名称!</p>"
response.write "<a href='javascript:history.back(1)'>返回重新输入</a>"
response.end
end if
%>
<%
text=htmlencode(request.form("text"))
set rs=server.createobject("adodb.recordset")
sql="select * from shop_newsclass where (classid is null)"
rs.open sql,conn,1,3
rs.addnew
rs("class")=text
rs.update
classid=rs("classid")
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
<% end if %>
<%
response.Write "<script language=javascript>alert('操作成功!');window.location.reload('javascript:history.back(1)')</script>"
response.end
%>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?