用ASP写这样一个功能，在发布帖子的时候，选择固顶时间（天），选择的时间将写入数据库表（info）里的TIAN（数字型），加入在9月1号发布，选择固顶的天数是3天，那么在9月4号，它就自动不固顶了，这个功能怎么写？

该如何写!我怎么实现不了?

'日期时间
Function FoxCdate(str)
IF len(month(str))<2 THEN
m="0" & month(str)
Else
m=month(str)
End IF
IF len(day(str))<2 THEN
d="0" & day(str)
Else
d=day(str)
End IF
str=year(str) & "-" & m & "-" & d
FoxCdate=str
End Function
Function FoxDay(str)
IF len(month(str))<2 THEN
m="0" & month(str)
Else
m=month(str)
End IF
IF len(day(str))<2 THEN
d="0" & day(str)
Else
d=day(str)
End IF
str= m & "/" & d
FoxDay=str
End Function
Conn.Execute("Update info Set b=b-1 where DateDiff('D',fbsj,now())=1 and yz=1 and b>0")
Conn.Execute("Update info Set fbsj=now() where DateDiff('D',fbsj,now())>=1 and yz=1 and b>0")