y=request.form("年")
m=request.form("月")
d=request.form("日")
set systemrs=server.createobject("adodb.recordset")
sql="select * from 表"
systemrs.open sql,conn,3,3
systemrs.addnew
systemrs("字段名称")=y&m&d
或者
systemrs("字段名称1")=y
systemrs("字段名称2")=m
systemrs("字段名称3")=d
然后
systemrs.update
systemrs.close