📄 save_edit.asp
字号:
<!--#include file="../../conn/conn.asp"-->
<!--#include file="../../inc/safe.asp"-->
<!--#include FILE="../../inc/upload_5xsoft.inc"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href="../css/style.css" rel=stylesheet type=text/css>
<title>修改会员产品信息</title>
<%
Response.Buffer = true
Response.ExpiresAbsolute=now()-1
Response.Expires=0
Response.CacheControl="no-cache"
%>
<%
if Request.Cookies("globalec")("globalecmaster")="" or Request.Cookies("globalec")("masterflag")="" then
response.write "<script language='javascript'>"
response.write"this.location.href='../login.asp';</SCRIPT>"
response.end
end if
if instr(Request.Cookies("globalec")("masterflag"),"61")=0 then
response.redirect "../err.asp"
response.end
end if
if Not ChkPost then
response.redirect ("../../login/chklogin.asp?login=4")
response.end
end if
%>
<%
set upload=new upload_5xSoft
if Chkrequest(upload.form("id")) then
id=upload.form("id")
else
Response.Redirect ("../../login/chklogin.asp?login=4")
end if
cpmc=Replace_Text(upload.form("cpmc"))
cpgg=Replace_Text(upload.form("cpgg"))
cpcd=Replace_Text(upload.form("cpcd"))
sortid=Replace_Text(upload.form("p_z_Z_RootCategory"))
CategoryId=split(Replace_Text(upload.form("p_z_Z_CategoryId1")),",")
typeid=CategoryId(0)
typeid_2=CategoryId(1)
p_z_Z_Keywords=Replace_Text(upload.form("p_z_Z_Keywords"))
xxsm=Replace_Text(upload.form("xxsm"))
more_info=Replace_Text(upload.form("more_info"))
cpsb=Replace_Text(upload.form("cpsb"))
Quantity=Replace_Text(upload.form("Quantity"))
Packaging=Replace_Text(upload.form("Packaging"))
cpjg=Replace_Text(upload.form("cpjg"))
'classid=Replace_Text(upload.form("classid"))
FeedbackFlag=Replace_Text(upload.form("FeedbackFlag"))
if FeedbackFlag="" then
FeedbackFlag=0
else
FeedbackFlag=1
end if
if upload.form("cimg")=2 then
filepath=newspic&upload.form("img")
set fs=server.CreateObject("scripting.filesystemobject")
filepath=server.MapPath(filepath)
formPath=newspic
if right(formPath,1)<>"/" then formPath=formPath&"/"
'iCount=0
for each formName in upload.objFile
set file=upload.file(formName)
if file.FileSize>0 then
if file.filesize>200000 then
response.write"<SCRIPT language=JavaScript>alert('您上传的图片大于规定大小(200K),请改变文件大小后再进行上传。');"
response.write"javascript:history.go(-1)</SCRIPT>"
response.end
end if
if trim(right(file.FileName,3))<>"jpg" and trim(right(file.FileName,3))<>"gif" then
response.write"<SCRIPT language=JavaScript>alert('您上传的文件必须是GIF或JPG图象文件,请将你上传的文件转换此格式后再进行上传。');"
response.write"javascript:history.go(-1)</SCRIPT>"
response.end
end if
sql="select picture from productshow where id="&id&""
Set rs= Server.CreateObject("ADODB.Recordset")
rs.open sql,conn,1,1
if fs.FileExists(filepath) and rs("picture")<>"nopicture.gif" then
fs.DeleteFile filepath,true
end if
FileName=MakedownName()&"."&mid(file.FileName,InStrRev(file.FileName, ".")+1)
file.SaveAs Server.mappath(formPath&FileName)
picture=FileName
'iCount=iCount+1
end if
next
set file=nothing
end if
set rs=server.createobject("adodb.recordset")
sql="select * from productshow where id="&id&""
'response.write sql
rs.open sql,conn,1,3
rs("cpmc")=cpmc
rs("cpgg")=cpgg
rs("cpcd")=cpcd
rs("sortid")=sortid
rs("typeid")=typeid
rs("typeid_2")=typeid_2
rs("keywords")=p_z_Z_Keywords
rs("xxsm")=xxsm
if upload.form("cimg")=2 then
if trim(right(picture,3))="jpg" or trim(right(picture,3))="gif" then
rs("picture")=picture
end if
end if
rs("cpsb")=cpsb
rs("Quantity")=Quantity
rs("Packaging")=Packaging
rs("cpjg")=cpjg
rs("FeedbackFlag")=FeedbackFlag
rs("dateandtime")=now()
'rs("classid")=classid
rs.update
rs.close
set rs=noting
conn.close
set conn=nothing
set upload=nothing
response.write"<table cellpadding=2 cellspacing=1 border=0 width=100% class=tableBorder align=center>"
response.write"<TR>"
response.write"<TH class=tableHeaderText colSpan=2 height=25>修改会员产品信息</TH>"
response.write"<TR><tr><td height=85 valign=top class=forumRow><div align=center><br><br>修改会员产品信息成功!</div></td></tr>"
response.write"<tr align=center><td height=30 class=forumRowHighlight><a href='javascript:history.back(-1)'><< 返回上一页</a></td>"
response.write"</tr>"
response.write"</table>"
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -