保存

<% id=request("id") tname=request("tname") guanxi=request("guanxi") xingming=request("xingming") chushengdate=request("chushengdate") jiguan=request("jiguan") zhengzhi=request("zhengzhi") danwei=request("danwei") zhiwu=request("zhiwu") set RsPlan=server.createobject("adodb.recordset") if id="" then RsPlansql="select * from EmployeeJiaTing where (id is null)" RsPlan.open RsPlansql,conn,1,3 RsPlan.addnew else set RsPlan=server.createobject("adodb.recordset") RsPlansql="select * from EmployeeJiaTing where id='"&ID&"'" RsPlan.open RsPlansql,conn,1,3 end if RsPlan("tname")=tname RsPlan("关系")=guanxi RsPlan("姓名")=xingming RsPlan("出生日期")=chushengdate RsPlan("籍贯")=jiguan RsPlan("政治面貌")=zhengzhi RsPlan("工作单位")=danwei RsPlan("职务")=zhiwu RsPlan.update RsPlan.close set RsPlan=nothing conn.close set conn=nothing response.redirect "jiating.asp?tname="&tname %>