请教一个十分难的问题,希望大家能帮忙想想！(在线等待)
请教一个十分难的问题,希望大家能帮忙想想！
比如说2004-1-6是小寒,到2004-1-21是大寒，我现在输入2004-1-8，用代码怎样
可以算出他是小寒呢？(24节气的间隔是每隔15天)
我只能做到显示了：
<%
tf="小寒/大寒/立春/雨水/惊蛰/春分/清明/谷雨/立夏/小满/芒种/夏至/小暑/大
暑/立秋/处暑/白露/秋分/寒露/霜降/立冬/小雪/大雪/冬至"
xxutf=split(tf,"/")
y=1
startdate="2004-1-6"
for i=15 to 500 Step 15
xx=DateAdd("d",i,startdate)
response.write xx&" "&xxutf(y)&"<br>"
y=y+1
if y>23 then y=0
next
%>
问题点数：20、回复次数：9Top
1 楼chzxq（毛毛鼠）回复于 2004-08-04 08:56:41 得分 0
把24节气的数据保存在数据库中，这样不就好算出了吗？
或你用datadiff函数也可以Top
2 楼19az（相信我，没错的！）回复于 2004-08-04 09:00:41 得分 0
我觉着最起码要有一个字典与之对照,或者自己建一个字典表,没有一个标准不行的Top
3 楼guolucky2003（风云）回复于 2004-08-04 09:49:38 得分 0
我只是想显示当前日期对应是哪一个节气,比如说2004-1-6至20日，都显示小寒到21日就显示大寒
我看了看原来不是全部都是按--24节气的间隔是每隔15天--好像没什么规律的？
从网上找了一个javascript的代码，但看不懂，请大家帮帮忙吧，先谢谢了！！Top
4 楼guolucky2003（风云）回复于 2004-08-04 09:59:05 得分 0
http://netroom.hbu.edu.cn/personal/zgtl/java/sjrq/20.htm
Top
5 楼MagicYangCN（魔术师·杨）回复于 2004-08-04 10:43:46 得分 20
根据楼主的数据，写出以下函数。仅供参考
<%
Function GetJQ(D)
Str="小寒/大寒/立春/雨水/惊蛰/春分/清明/谷雨/立夏/小满/芒种/夏至/小暑/大暑/立秋/处暑/白露/秋分/寒露/霜降/立冬/小雪/大雪/冬至"
Ar = Split(Str,"/")
StartDate="2004-1-6"
Spacing=DateDiff("d",D,startDate) '计算相差天数
Flag=false
If Spacing>0 then
Flag=True
End If
Spacing=Abs(Spacing)
LSub = Spacing\15 '获得时间间隔
TSub=(LSub MOD 24) '获得下标
If Flag Then '如果时间小于2004-1-6日。则反向求下标
TSub=24-TSub
End If
GetJQ=AR(TSub)
End Function
Response.Write GetJQ("2004-1-8")
%>Top
6 楼MagicYangCN（魔术师·杨）回复于 2004-08-04 10:54:05 得分 0
24节气的间隔是每隔15天--好像没什么规律的？
我倒。不是按照15天啊Top
7 楼MagicYangCN（魔术师·杨）回复于 2004-08-04 10:56:13 得分 0
还有5天的修正怎么算…………Top
8 楼guolucky2003（风云）回复于 2004-08-04 11:48:34 得分 0
对呀，大家帮手顶顶呀，高手应该出现了吧！！Top
9 楼wgb219（wgb）回复于 2004-08-04 14:35:53 得分 0
我顶~~~~~~~~~~~~~~~~~`Top
