 |
|
|
 首页 |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
遇到了关于日期计算的问题，解决了，发现好多朋友也有相同的问题 不知道大家解决了没有，我把我的方式贴出来，希望能给大家带来帮助 假如哪里写的不好，或者错误，不要笑话！！ 我可是第一次发表自己的想法，，，心里斗争异常激烈。。。 =============================== 为了大家好理解，用vbscript编写= 理解了，用什么都好写 :)_______= =============================== <script language=vbscript> function CountDate(That,NowDate) \\\'\\\'采用掐头去尾的方式计算两个日期的时间间隔 \\\'\\\'日期计算 日期差 时间差 日期间隔 计算日期 \\\'\\\'nowdate是目前的日期，that是某特定的日期 \\\'\\\'nowdate月的总天数减去that月的总天数（有可能是负数） \\\'\\\'再加上中间每年的总天数，就是日期的间隔了 \\\'\\\'通过对润年润月的计算，就更加精确了。 days=0\\\'初始化天数 for i=1 to month(nowdate)-1\\\'随月份增加天数 select case i case 1,3,5,7,8,10,12\\\'还记得小学一年级的数学吗？我就是背着写出来的，哈哈~~ days=days+31\\\'1，2，5，7，8，10，腊，有31天 case 4,6,9,11 days=days+30 case 2 if year(that)/4=int(year(that)/4) then days = days+29 else days=days+28 end select next for i=year(that) to year(nowdate)-1\\\'随年份增加天数 if year(that)/4=int(year(that)/4) then days = days + 366 else days = days + 365 end if next for i=1 to month(that)-1\\\'减去原来的 select case i case 1,3,5,7,8,10,12 days=days-31 case 4,6,9,11 days=days-30 case 2\\\'润月处理 if year(that)/4=int(year(that)/4) then days = days-29 else days=days-28 end select next days=days+day(nowdate)-day(that)\\\'该加的加，该减的减！ CountDate = days end function msgbox countdate("10/2/00 11:33:25 PM",now) </script> 返回类别: 教程 上一教程: 聊天室实现私聊(一) 下一教程: ASP数组冒泡排序函数 您可以阅读与"关于日期计算的问题"相关的教程: · 关于如何利用COM+，来提高ASP执行权限的问题! · 关于ASP程序中日期型数据的格式问题 · 关于组合查询并排序的问题 · 关于如何利用COM+，来提高ASP执行权限的问题 · 提高ASP执行权限的问题 |
  |
| 快精灵印艺坊 版权所有 |
首页 会员中心在线印刷在线编辑付款方式索取样品设计指南连锁门店
|
||
