cp_save.asp

购物网站源码有需要的赶快下载机不可失

<!--#include file="top.asp"-->
<%if userflag1=0 then
response.redirect"ok.asp?action=flag"
end if

cpname = Request("cpname")
sortid = Request("sortid")
cpjg = Request("cpjg")
jgdw = request("jgdw")
cpjl = Request("cpjl")
cpbh = Request("cpbh")
if cpbh="" then cpbh=null
cpcd=Request("cpcd")
if cpcd="" then cpcd=null
cpgg=Request("cpgg")
if cpgg="" then cpgg=null
if Request("ypxxtwo_id")="" then
ypxxone_id=Request("aaa")
ypxxtwo_id=Request("bbb")
else
ypxxone_id=Request("ypxxone_id")
ypxxtwo_id=Request("ypxxtwo_id")
end if
cpjm=Request("cpjm")
cpsm=Request("cpsm")
if cpsm="" then cpsm="暂无"
pic=Request("magicfacepic(1)")
if pic="" then pic="img/null.bmp"

set rs=Server.CreateObject("Adodb.Recordset")
sql="select * from SMT_cp where SMT_yp_id="& session("id")
rs.open sql,conn,1,3

if userflag1<>0 then
if rs.recordcount >= cint(userflag1) then
errstyle="·您是"&vipshow&"，只能上传最多 "&userflag1&" 个产品！"
scripterr
end if
else
errstyle="·对不起，此功能已对"&vipshow&"关闭！"
scripterr
end if

rs.addnew
rs("SMT_pic")=pic
rs("SMT_cpname")=cpname
rs("SMT_sortid")=cint(sortid)
rs("SMT_cpjg")=cpjg
rs("SMT_cpjgdw")=jgdw
rs("SMT_cpjl")=cpjl
rs("SMT_cpbh")=cpbh
rs("SMT_cpcd")=cpcd
rs("SMT_cpgg")=cpgg
rs("SMT_ypxxtwo_id")=ypxxtwo_id
rs("SMT_ypxxone_id")=ypxxone_id
rs("SMT_cpjm")=cpjm
rs("SMT_cpsm")=cpsm
rs("SMT_key1")=application("citycpkey")
rs("SMT_yp_id")=session("id")
rs.update
rs.close
set rs=nothing
conn.close
set conn = nothing

if application("citycpkey")=1 then
response.redirect"ok.asp?url=cp_add.asp"
else
response.redirect"ok.asp?url=cp_add.asp&key=yes"
end if

%>