www.gusucode.com > 漂亮的地方旅游景点景观介绍网站源代码 > lxsave.asp
<!--#include file="config.asp" --> <!--#include file="admin/inc/md5.asp" --> <% call zwtj() dim gname,stel,renshu,cfrq,cfdd,content,lx lx=getform("lxid",2,0) gname=getform("gname",1,1) stel=getform("tel",1,1) renshu=getform("renshu",2,0) cfrq=getform("cfrq",1,1) cfdd=getform("cfdd",1,1) content=getform("content",1,1) if renshu="" or gname="" or stel="" or cfrq="" or cfdd="" then call errs("请将信息填写完整") end if if isnumeric(renshu)=false then call errs("游客人数只能为数字") end if '插入记录//////////////////////////////////////////////////////////////////////////////////// call record(rs,"select top 1 * from Jw_lxyd where 1=1",3) rs.addnew() rs("lx")=lx rs("gname")=gname rs("tel")=stel rs("renshu")=renshu rs("cfrq")=cfrq rs("cfdd")=cfdd rs("content")=content rs("ctim")=now() rs("ck")=0 rs("ip")=userip() rs("ctim")=now() rs.update() call recordend(rs) if err.number>0 then call errs("有错误发生") end if call errs(0) %>