边境牧羊犬
   

关于我们┈联系我们┈帮助中心┈广告服务┈┈客户留言┈友情链接┈

Copyright © 2006-2007 All rights reserved 边境牧羊犬

   
<% 'Conn.Execute("Update xinxi Set b=0 where DateDiff('D',fbsj,now())>="&b_y&" and yz=1") 'Conn.Execute("Update xinxi Set tuijian=0 where DateDiff('D',fbsj,now())>="&tui_y&" and yz=1") 'closedb 'function cnmaisj(sj_1) 'dim sj 'sj=DateDiff("D",sj_1,now()) 'if sj<=1 then 'response.write "今天" 'elseif sj<=2 and sj>1 then 'response.write "昨天"&timevalue(sj_1)&"" 'elseif sj>2 and sj<=3 then 'response.write "前天"&timevalue(sj_1)&"" 'elseif sj>3 then 'response.write ""&datevalue(sj_1)&"" 'end if 'end function %>