ASPʱ¼äÅжÏÎÊÌâ - Web ¿ª·¢ / ASP

Dim dif,i,s,d,m,h,ss,r
dif = DateDiff("s",t,Now())
d = dif\(24*60*60)  
  h = (dif-d*(24*60*60))\(60*60)  
  m = (dif-d*(24*60*60) - h*(60*60))\60  
  ss = dif Mod 60  
   
If d>0 and d<5 then 
  r = d & "ÌìÇ°" 
   
elseif d>=5 then 
  r= t
elseif h>0 then 
  r= h & "Сʱǰ" 
   
elseif m>0 then 
  r= m & "·ÖÖÓÇ°" 
   
elseif ss>0 then 
  r= ss & "ÃëÇ°" 
End if 


ÉÏÃæÊÇÒª´ÓÊý¾Ý¿â¶Áȡʱ¼äÓ뵱ǰʱ¼ä¶Ô±È
Èç¹û´óÓÚ2Ìì¾ÍÖ±½ÓÏÔʾ¶ÁÈ¡µÄʱ¼ä
СÓÚ´óÓÚ0Ìì²¢ÇÒСÓÚ2Ìì ¾ÍÏÔʾ¶àÉÙÌì¡£

Èç¹ûСÓÚ0µÄ£¬¾ÍÓá°Ð¡Ê±Ç°¡±ÏÔʾ
ÀàËÆСʱСÓÚ0£¬¾ÍÓá°·ÖÖÓÇ°¡±ÏÔʾ
¡­¡­

¸ÃÔõô¸ÄÄØ£¬ÓеãÔÎÁË¡£¡£

---

½áÌûÂÊ£º0.00%

---

ÒýÓÃ

½áÌûÂÊ£º0.00%

ÔΡ£¡£²»¹ýÓ¦¸Ã¿ìÆÆÁË¡£¡£ÄãÄܻشðÏÂô

---

Ö±½