设为首页收藏本站

新微赢技术网

 找回密码
 注册
搜索
热搜: 回贴
查看: 117|回复: 9
打印 上一主题 下一主题

最有价值的日期推算!(看看)

[复制链接]
跳转到指定楼层
1#
发表于 2010-1-9 00:25:27 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
请问各位大虾,实在是辛苦各位了,我想做这么个东西,比如今天日期是2007-10-25,我希望能通过选择3个月或半年或一年后,日期会变为2008-1-25,2008-4-25或2008-10-25,我希望自动获取当天的日期date(),然后通过选择后增加月份,这样能实现吗?

请高手们赐教!
2#
发表于 2010-1-9 00:25:31 | 只看该作者
强悍,学习了,希望以后好好学习
回复 支持 反对

使用道具 举报

3#
发表于 2010-1-9 00:25:34 | 只看该作者
以下是引用tianyu123在2007-10-26 19:25:48的发言:
[CODE]<script language=vbscript>
function check(id)
dim newdate

哦得神啊,真是个天才,谢谢了,连闰月都能跳过,就这么点代码。。。奇才!!!
回复 支持 反对

使用道具 举报

4#
发表于 2010-1-9 00:25:38 | 只看该作者
http://www.525jia.com/xinxi/sec/rili00.htm
这种效果吗?
回复 支持 反对

使用道具 举报

5#
发表于 2010-1-9 00:25:42 | 只看该作者
他调用本机时间,而本机时间是个万年历就可以计算出闰年闰月了
回复 支持 反对

使用道具 举报

6#
发表于 2010-1-9 00:25:46 | 只看该作者
再加上个输入数字判断
  1. <script language="vbscript">
  2. function changeb(id)
  3. if not IsNumeric(id) then
  4. document.getElementById("t2").innerHTML="请输入数字!"
  5. else
  6. document.getElementById("t2").innerHTML=dateadd("m",cint(id),date())
  7. end if
  8. end function
  9. </script>
  10. <input type="text" name="t1" size="3" onkeyup="changeb(t1.value)" /> <span id="t2"></span>
复制代码
回复 支持 反对

使用道具 举报

7#
发表于 2010-1-9 00:25:50 | 只看该作者
以下是引用永夜的极光在2007-10-25 22:12:39的发言:
http://www.525jia.com/xinxi/sec/rili00.htm
这种效果吗?
不是这样的,只是前面一个列表框(含3个月,6个月,12个月),选择3个月的时候,后边的文本框出现当前日期(2007-10-25)加3个月的日期,即2008-1-25,选择6个月的时候文本框显示为2008-4-25大概就是这么一个过程,没有上面你提供链接的那么复杂,希望能给个处理方案,谢谢!
回复 支持 反对

使用道具 举报

8#
发表于 2010-1-9 00:25:54 | 只看该作者
  1. <script language=vbscript>
  2. function check(id)
  3. dim newdate
  4. newdate=dateadd("m",cint(id),date())
  5. form1.t1.value=newdate
  6. end function
  7. </script>
  8. <form name=form1>
  9. <select name=s1 onchange="check(form1.s1.value)">
  10. <option value="">请选择</option>
  11. <option value="3">3个月</option>
  12. <option value="6">6个月</option>
  13. <option value="12">12个月</option>
  14. </select>
  15. <input type=text name=t1 value="">
  16. </form>
复制代码
回复 支持 反对

使用道具 举报

9#
发表于 2010-1-9 00:25:58 | 只看该作者
这样子可以手动填写的
  1. <script language="vbscript">
  2. function changeb(id)
  3. document.getElementById("t2").innerHTML=dateadd("m",cint(id),date())
  4. end function
  5. </script>
  6. <input type=text name="t1" size="3" onkeyup="changeb(t1.value)" /> <span id="t2"></span>
复制代码
回复 支持 反对

使用道具 举报

10#
发表于 2010-1-9 00:26:03 | 只看该作者
不错,学习了!!
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

申请友链|小黑屋|最新主题|手机版|新微赢技术网 ( 苏ICP备08020429号 )  

GMT+8, 2024-11-18 17:49 , Processed in 0.107733 second(s), 10 queries , Gzip On, Memcache On.

Powered by xuexi

© 2001-2013 HaiAn.Com.Cn Inc. 寰耽

快速回复 返回顶部 返回列表