📄 admin_newsedit_chk.asp
字号:
<!--#include file=inc/conn.asp-->
<!--#include file=../../inc/checkadmin.asp-->
<%
id=replacebadchar(request.Form("id"))
title=request.Form("title")
newsClass=request.Form("newsClass")
adder=request.Form("adder")
connect=request.Form("connect")
if title="" or connect="" or newsClass="" then
Response.Write("<script>alert(""请添写完整信息"");history.go(-1);</script>")
else
if right(newsClass,1)="a" then
di1class=mid(newsClass,1,len(newsClass)-1)
di2class="no"
di3class="no"
end if
if right(newsClass,1)="b" then
di2class=mid(newsClass,1,len(newsClass)-1)
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from sys_data_xxprod_di2cen_class where id="&di2class,conn,1,3
di1class=rs("di1_parent_id")
di3class="no"
end if
if right(newsClass,1)="c" then
di3class=mid(newsClass,1,len(newsClass)-1)
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from sys_data_xxprod_di3cen_class where id="&di3class,conn,1,3
di2class=rs("parent_id_of_di2")
di1class=rs("parent_id_of_di1")
end if
if request("simagePath")="" then
Response.Write("<script>alert(""请上传产品缩略图"");history.go(-1);</script>")
else
openconn()
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from sys_data_xxprod where id="&id&"",conn,1,3
rs("title")=title
rs("smallpic")=request("simagePath")
rs("class")=di1class
rs("di2_class")=di2class
rs("di3_class")=di3class
rs("adder")=adder
rs("connect")=connect
rs.update
rs.close
set rs=nothing
call closeconn()
Response.Write("<script>alert(""修改成功"");location.href=""admin_news.asp"";</script>")
end if
end if
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -