请问怎么样才能像下文这样读入文本框数字

time是日期字段，rs("time")=cdate(date-cint(tm))如果把括号里的cint(tm)改成数字是对的，可我的目的是根据tm文本框输入的数字随心的修改日期，我这样写结果是没效果，不知道是什么问题！希望懂的朋友帮助我


<%
set rs=server.createobject("adodb.recordset")
sql="select * from NEWS where id="&newsid
rs.open sql,conn,1,3

rs("time")=cdate(date-cint(tm))

rs.update
rs.close
set rs=nothing
%>

<tr>
      <td height="24" align="right" > 修改日期：</td>
      <td height="24" align="right" >
          <p align="left"> <input name="tm" type="text" class="input" value="" size="30">
      </td>
</tr>