保存

<% id=request("id") tname=request("tname") huajiangdate=request("huajiangdate") xiangmumingcheng=request("xiangmumingcheng") huojiangdengji=request("huojiangdengji") jibie=request("jibie") bumen=request("bumen") set RsPlan=server.createobject("adodb.recordset") if id="" then RsPlansql="select * from EmployeeHuoJiang where (id is null)" RsPlan.open RsPlansql,conn,1,3 RsPlan.addnew else set RsPlan=server.createobject("adodb.recordset") RsPlansql="select * from EmployeeHuoJiang where id='"&ID&"'" RsPlan.open RsPlansql,conn,1,3 end if RsPlan("tname")=tname RsPlan("获奖时间")=huajiangdate RsPlan("项目名称")=xiangmumingcheng RsPlan("获奖等级")=huojiangdengji RsPlan("级别")=jibie RsPlan("颁奖部门")=bumen RsPlan.update RsPlan.close set RsPlan=nothing conn.close set conn=nothing response.redirect "huojiang.asp?tname="&tname %>