addcomjzh.asp

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

<!--#include file="cn.asp"-->
<%
if  session("user")="" then 
response.Write "<script language='javascript'>alert('非法用户！');window.location.replace('login.asp');</script>"
response.End
end if
set rs=server.CreateObject("adodb.recordset")
sql="select * from jzh"
rs.open sql,cn,1,3

rs.addnew
'信息
rs("xname")=trim(request.Form("xname"))
rs("hx")=trim(request.Form("hx"))
rs("jiage")=trim(request.Form("jiage"))
rs("are")=trim(request.Form("are"))
rs("fengge")=trim(request.Form("fengge"))
'信息
rs("ontime")=trim(request.Form("ontime"))
rs("pic")=trim(request.Form("pic"))
rs("leixing")=trim(request.Form("leibie"))
'联系信息
rs("inf")=trim(request.Form("inf"))
rs("user")=session("user")
rs("cid")=session("id")
rs.update
response.Write "<script language=javascript>alert('发布成功！');history.go(-1);</script>"
response.End()
rs.close
set rs=nothing
cn.close
set cn=nothing
%>