28,391
社区成员
发帖
与我相关
我的任务
分享
CASE "add"
name=request("name")
khkh=request("khkh")
sex=request("sex")
yddh=request("yddh")
fwjs=request("fwjs")
fwxm=request("fwxm")
fwsc=request("fwsc")
fwfy=request("fwfy")
yhbl=request("yhbl")
ssje=request("ssje")
bz=request("bz")
set rs=server.createobject("adodb.recordset")
if name="" then
response.Write("<script>alert('客户姓名必填!');history.go(-1)</script>")
response.end
else
set rs=server.createobject("adodb.recordset")
sql="select * from xfmxb where (id is null)"
rs.open sql,conn,1,3
rs.addnew
rs("ID")=ID
rs("name")=name
rs("khkh")=khkh
rs("sex")=sex
rs("yddh")=yddh
rs("fwjs")=fwjs
rs("fwxm")=fwxm
rs("fwsc")=fwsc
rs("fwfy")=fwfy
rs("yhbl")=yhbl
rs("ssje")=ssje
rs("bz")=bz
rs("jzsj")=now
rs.update
rs.close