savepro.asp

实现让客户上网就可以挑选自己所想要的装饰物

<!--#include file="cn.asp"-->
<%if session("admin")=""  or request.cookies("timesshop")("admin")="" then 
response.Write "<script language='javascript'>alert('请先登录！');window.location.replace('login.asp');</script>"
response.End

cn.close
set cn=nothing
end if

set rs=server.CreateObject("adodb.recordset")
sql="select * from product "
rs.open sql,cn,1,3
pic=trim(request.Form("pic"))
rs.addnew
rs("pname")=trim(request.Form("pname"))
rs("leibie")=trim(request.Form("leibie"))
rs("price")=trim(request.Form("price"))
rs("danwei")=trim(request.Form("danwei"))
rs("guige")=trim(request.Form("guige"))
rs("produce")=trim(request.Form("produce"))
rs("company")=trim(request.Form("company"))
rs("gongshang")=trim(request.Form("gongshang"))
rs("address")=trim(request.Form("address"))
rs("man")=trim(request.Form("man"))
rs("email")=trim(request.Form("email"))
rs("tel")=trim(request.Form("tel"))
rs("fax")=trim(request.Form("fax"))
rs("zhttp")=trim(request.Form("zhttp"))
rs("fhttp")=trim(request.Form("fhttp"))
rs("inf")=trim(request.Form("inf"))
'rs("pic")=replace(pic,"../../tool/pro_pic/","")
rs.update
response.Write "<script language=javascript>alert('添加成功！');history.go(-1);</script>"
response.End()
rs.close
set rs=nothing
cn.close
set cn=nothing
%>