<% function times(t) if not isdate(t) then exit function dim thour, tminute, tday, nowday, dnt, dayshow, pshow thour=hour(t) tminute=minute(t) tday=datevalue(t) nowday=datevalue(dateadd("h",timeDiff,now)) if thour<10 then thour="0"&thour end if if tminute<10 then tminute="0"&tminute end if dnt=datediff("d",tday,nowday) if dnt>2 then dayshow=year(t) if (month(t)<10) then dayshow=dayshow&"-0"&month(t) else dayshow=dayshow&"-"&month(t) end if if (day(t)<10) then dayshow=dayshow&"-0"&day(t) else dayshow=dayshow&"-"&day(t) end if times=dayshow exit function elseif dnt=0 then dayshow="今天 " elseif dnt=1 then dayshow="昨天 " elseif dnt=2 then dayshow="前天 " end if 'if thour>=7 and thour<11 then ' pshow="上午" 'elseif thour>=11 and thour<14 then ' pshow="中午" 'elseif thour>=14 and thour<18 then ' pshow="下午" 'elseif thour>=18 then ' pshow="晚上" 'elseif thour>=0 and thour<7 then ' pshow="清晨" 'else ' pshow="难说" 'end if times=dayshow&pshow&thour&":"&tminute end function %>