资讯   |   开发   |   选机中心   |   产品大全 | IBM | 惠普 | 联想 | 戴尔 | 苹果 | 神舟
更多: | 华硕 | 明基 | 方正 | 紫光 | TCL | 夏新 | 联宝 | 宏碁 | 七喜 | 长城 | 清华同方 | 海尔 | 三星 | 东芝 | 索尼 | 富士通 | LG | 技术 | ddnoon
当前位置:笔记本 > 软件开发 >
Advertisement
文章正文

100分求助!!~~~反倒计时问题

类型:转载   责任编辑:asp.net   日期:2007/05/23


热门软件下载:


   

我想做一个反倒计时效果,做了很长时间都做不出来  
  希望的效果是...  
  本站从开站以来到现在已经有X年X月X日X时X分X秒..  
  而且秒是在不停的动的...请问谁会做这个效果啊????

网友回答:

发表者:littleboys

<!DOCTYPE   HTML   PUBLIC   "-//W3C//DTD   HTML   4.0   Transitional//EN">  
  <HTML>  
  <HEAD>  
  <TITLE>   New   Document   </TITLE>  
  <META   NAME="Generator"   CONTENT="EditPlus">  
  <META   NAME="Author"   CONTENT="">  
  <META   NAME="Keywords"   CONTENT="">  
  <META   NAME="Description"   CONTENT="">  
  </HEAD>  
   
  <BODY>  
  <div   id="timer"   style="font-size:9pt;color:red"></div>  
  </BODY>  
  </HTML>  
  <script   language="Javascript">  
  <!--   Begin  
  var   pageOpen   =   new   Date();  
  var   startTime=pageOpen.getTime();  
   
  function   show_time()   {  
  var   pageClose=new   Date();  
  var   totalTime=((pageClose.getTime()-startTime)/1000);   //total   time   in   seconds  
  var   hTimerLast=Math.floor(totalTime/3600);             //check   hours  
  var   mTimerLast=Math.floor((totalTime%3600)/60);   //check   minutes  
  var   sTimerLast=Math.floor(totalTime%60);                 //check   seconds    
   
  var   time   =   hTimerLast+"   Hours   "+mTimerLast+"   Minutes   "+sTimerLast+"   Seconds   ";  
  timer.innerHTML=time;  
  setTimeout("show_time()",1000);  
   
  }  
  setTimeout("show_time()",1000);  
  //   End   -->  
  </script>  
 

发表者:meizz

若用javascript来解决这个问题的话,   还得考虑润年问题,   比较麻烦的,   还是VBS好:  
   
  <body>从2000/1/1   0:0:0开始到现在:   <font   id=mm   color=red></font>  
  <SCRIPT   LANGUAGE="VBScript">  
  function   meizz(datetime)  
      dim   d,   s  
      d   =   CDate(datetime)  
      s   =   DateDiff("yyyy",   d,   Now)   &"   年   "  
      d   =   DateAdd("yyyy",   DateDiff("yyyy",   d,   Now),   d)  
          s   =   s   &   DateDiff("m",   d,   Now)   &"   月   "  
      d   =   DateAdd("m",   DateDiff("m",   d,   Now),   d)  
          s   =   s   &   DateDiff("d",   d,   Now)   &"   日   "  
      d   =   DateAdd("d",   DateDiff("d",   d,   Now),   d)  
          s   =   s   &   DateDiff("h",   d,   Now)   &"   时   "  
      d   =   DateAdd("h",   DateDiff("h",   d,   Now),   d)  
          s   =   s   &   DateDiff("n",   d,   Now)   &"   分   "  
      d   =   DateAdd("n",   DateDiff("n",   d,   Now),   d)  
          s   =   s   &   DateDiff("s",   d,   Now)   &"   秒"  
      mm.innerText   =   s  
      s   =   setTimeout("meizz("&   datetime   &")",   1000,   "vbscript")  
  end   function  
  meizz("2000/1/1   0:0:0")  
  </SCRIPT>


 

 
热门推荐笔记本: 华硕笔记本
相关文章:
笔记本相关:
IT技术文章:
webmaster:popbb@126.com   最佳浏览:1024X768 MSIE
©2007 popbb.net All Rights Reserved