If now_time >=strat_time and now_time<=end_time Then Response.Write "数据库中有此记录"
Else now_time=DateAdd("d",7,now_time)
End if你试试看吧!