新微赢技术网

标题: 最有价值的日期推算！（看看） [打印本页]

作者: (のkisδ≒雪 时间: 2010-1-9 00:25
标题: 最有价值的日期推算！（看看）
请问各位大虾，实在是辛苦各位了，我想做这么个东西，比如今天日期是2007-10-25，我希望能通过选择3个月或半年或一年后，日期会变为2008-1-25，2008-4-25或2008-10-25，我希望自动获取当天的日期date（），然后通过选择后增加月份，这样能实现吗？

请高手们赐教！

作者: _睡覺覺c◆s 时间: 2010-1-9 00:25
强悍，学习了，希望以后好好学习

作者: 紫恋 时间: 2010-1-9 00:25
以下是引用tianyu123在2007-10-26 19:25:48的发言：
[CODE]<script language=vbscript>
function check(id)
dim newdate

哦得神啊，真是个天才，谢谢了，连闰月都能跳过，就这么点代码。。。奇才！！！

作者: 依ing梦 时间: 2010-1-9 00:25
http://www.525jia.com/xinxi/sec/rili00.htm
这种效果吗？

作者: 忧郁侠客 时间: 2010-1-9 00:25
他调用本机时间，而本机时间是个万年历就可以计算出闰年闰月了

作者: 最ヅ后愛上你 时间: 2010-1-9 00:25
再加上个输入数字判断

<script language="vbscript">
function changeb(id)
if not IsNumeric(id) then
document.getElementById("t2").innerHTML="请输入数字！"
else
document.getElementById("t2").innerHTML=dateadd("m",cint(id),date())
end if
end function
</script>
<input type="text" name="t1" size="3" onkeyup="changeb(t1.value)" /> <span id="t2"></span>

复制代码

作者: 飞你默属 时间: 2010-1-9 00:25
以下是引用永夜的极光在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大概就是这么一个过程，没有上面你提供链接的那么复杂，希望能给个处理方案，谢谢！

作者: `|楛纞♂ぺ﹖ 时间: 2010-1-9 00:25

<script language=vbscript>
function check(id)
dim newdate
newdate=dateadd("m",cint(id),date())
form1.t1.value=newdate
end function
</script>
<form name=form1>
<select name=s1 onchange="check(form1.s1.value)">
<option value="">请选择</option>
<option value="3">3个月</option>
<option value="6">6个月</option>
<option value="12">12个月</option>
</select>
<input type=text name=t1 value="">
</form>

复制代码

作者: 晒月亮的蜻蜓 时间: 2010-1-9 00:25
这样子可以手动填写的

<script language="vbscript">
function changeb(id)
document.getElementById("t2").innerHTML=dateadd("m",cint(id),date())
end function
</script>
<input type=text name="t1" size="3" onkeyup="changeb(t1.value)" /> <span id="t2"></span>

复制代码

作者: ═━灆涩━═ 时间: 2010-1-9 00:26
不错，学习了！！

欢迎光临新微赢技术网 (http://bbs.weiying.cn/)