注册 登录
编程论坛 ASP技术论坛

我也不知道这个问题如何描述...................

chenlnpg 发布于 2009-12-30 16:16, 1100 次点击
我有A,B,C,D四个数,要把它输入到数据库
假设
A对应时间2009-12-1
B对应时间2009-12-2
C对应时间2009-12-3
D对应时间2009-12-4
接下去就是自动循环
A 2009-12-5
B 2009-12-6
C 2009-12-7
D 2009-12-8
一直循环到本月结束

可以在数据库里添加字段,也可以直接addnew往下加,只要能实现都可以
6 回复
#2
tang6882009-12-31 12:22
给你一个思路吧:
第一,把每个月的天数先搞清楚.
1月31天
2月28或29天(把年除 mod 4,是零的为29天,否则为28)
3月31天
4月30天
......
12月31天
先判断是那个月,然后找到这个月的天数.比如是4月,那就是30天
ts=30

接下来是一个循环:
for n=1 to ts
    if n mod 4=1 then
       A数据
    elseif n mod 4=2 then
       B数据
    ......
    elseif n mod 4=0 then
       D数据
    end if
next
#3
tang6882009-12-31 12:28
2月28或29天(把年 mod 4,是零的为29天,否则为28)
如果再要准确一点:如果年的尾数为00的,为28天
哈哈.不过估计你这辈子再也碰不到这样的一个年了,前一个刚过了不久——2000年.
#4
chenlnpg2009-12-31 13:56
回复 3楼 tang688
你这方法可能不适用我这例子
因有有可能A是2009-12-2
那这样不就全乱了
所以代码里不应该限死
不过还是谢谢你!
#5
icecool2009-12-31 17:43
为什么不用A,B,C,D去填日期呢,先将你的第一个日期填入,如

<%
    a=formatdatetime("2009-12-2",2)
    b=formatdatetime("2009-12-30",2)
    c=Datediff("d",a,b)
    m=0
 for i=0 to c
    m=m+1

   select case m
          case 1
           response.write "A:" & DateAdd("d",i,a) & "<br>"
          case 2
           response.write "B:" & DateAdd("d",i,a) & "<br>"
          case 3
           response.write "C:" & DateAdd("d",i,a) & "<br>"
          case 4
           response.write "D:" & DateAdd("d",i,a) & "<br>"
    end select
      if m>=4 then
          m=0
      end if
  next
%>
#6
虾B写2009-12-31 20:10
直接日期+1天后再判断月份是否相等,不相等就不ADD了,一个偱环就OK了
#7
zhongx2010-01-01 18:25
学习了。
1