UPDATE 加入公式,目的是不用循环批量更新

<%
Function add
add_date=Request.Form("Add_Date") '取表单参数
Set Command1 = Server.CreateObject ("ADODB.Command")
Command1.ActiveConnection = MM_conn_STRING
Command1.CommandText = "UPDATE yzzd SET at_term=at_term+" & "'"&add_date&"'" & "
Command1.CommandType = 1
Command1.CommandTimeout = 0
Command1.Prepared = true
Command1.Execute()
end Function

%>

如上函数 是给列里一个日期（at_term）加天数，比如表单参数是3，就加了三天

我的要求是在这里是想加入公式计算，at_term-data()/2 伪代码 UPDATE yzzd SET at_term=at_term+((at_term-data())/2)

伪代码解释： 就是列日期(at_term)=列日期+(列日期-当前系统日期)除以2

try:
SQL code

set at_term=dateadd(d,datediff(d,date(),at_term)/2,a_term)