goods_edit_save.asp

校园二手交易系统,具有完备的后台操作以及应用功能!

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="mdb.asp"-->
<%
'****************************************************
' 多多校园电子商务工作室        Power by ddtaobao.com
' Email:[e-mail]    OICQ:6334278     站长:小羽
' Web: http://www.ddtaobao.com    淘宝旺旺:qq63334278
' Copyright (C) 2006 ddtaobao.com All Rights Reserved
'****************************************************
if request.form("temp")="" then
response.write "<script language='javascript'>" & VbCRlf
response.write "alert('非法操作!');" & VbCrlf
response.write "history.go(-1);" & vbCrlf
response.write "</script>" & VbCRLF
else

if request.form("goodsname")="" then
response.write "<script language='javascript'>" & VbCRlf
response.write "alert('商品名称不能为空!');" & VbCrlf
response.write "history.go(-1);" & vbCrlf
response.write "</script>" & VbCRLF
end if
if request.form("goodscontent")="" then
response.write "<script language='javascript'>" & VbCRlf
response.write "alert('商品描述不能为空!');" & VbCrlf
response.write "history.go(-1);" & vbCrlf
response.write "</script>" & VbCRLF
end if
if request.form("goodsprice")="" then
response.write "<script language='javascript'>" & VbCRlf
response.write "alert('商品价格不能为空!');" & VbCrlf
response.write "history.go(-1);" & vbCrlf
response.write "</script>" & VbCRLF
end if
if request.form("goodsamount")="" then
response.write "<script language='javascript'>" & VbCRlf
response.write "alert('商品数量不能为空!');" & VbCrlf
response.write "history.go(-1);" & vbCrlf
response.write "</script>" & VbCRLF
end if
if request.form("goods_id")="" then
response.write "<script language='javascript'>" & VbCRlf
response.write "alert('GoodsID不能为空!');" & VbCrlf
response.write "history.go(-1);" & vbCrlf
response.write "</script>" & VbCRLF
end if

goodsname=request.form("goodsname")
goodscontent=request.form("goodscontent")
goodsprice=request.form("goodsprice")
goodsamount=request.form("goodsamount")
goodspic=request.form("goodspic")
goods_id=request.form("goods_id")
alipaystatus=request.form("alipaystatus")

set rs=server.createobject("adodb.recordset")
sql="select * from goods_info where goods_id="&goods_id
rs.open sql,conn,1,3

if request.form("goodspic")<>"" then
if rs("goods_pic")<>"" then
tempfpath=rs("goods_pic")
FiLePaTh = Server.MapPath(tempfpath)
Set fso = CreateObject("Scripting.FileSystemObject")
fso.DeleteFile(FiLePaTh)
Set fso = nothing
end if
end if

rs("goods_price")=goodsprice
rs("goods_name")=goodsname
rs("goods_content")=goodscontent
rs("goods_price")=goodsprice
rs("goods_amount")=goodsamount
rs("alipaystatus")=alipaystatus
rs("goods_pic")=goodspic

rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
session("antry")="" '提交成功，清空session("antry")，以防重复提交！！
%><%end if%><!--#include file="Inc/MsgBox.asp"--><%
Call MsgBox("发布成功","GoUrl","goods.asp")
    response.End()
%>