求解答 关于APS循环显示的问题

Question

<table class="mytable">
<%
dim jiaofeiriqi(5)
jiaofeiriqi(1)=#2022/4/13#
jiaofeiriqi(2)=#2022/7/18#
jiaofeiriqi(3)=#2022/9/29#

dim xiageriqi
xiageriqi=#2021/12/28#

dim fuheriqi(20)
fuheriqi(0)=#2021/12/28#

dim zuihouriqi
zuihouriqi=#2022/11/22#

a=1
b=1
do while DateDiff("d",xiageriqi,zuihouriqi)>=0
if ((month(xiageriqi)=3 or month(xiageriqi)=6 or month(xiageriqi)=9 or month(xiageriqi)=12) and day(xiageriqi)=20) or DateDiff("d",xiageriqi,jiaofeiriqi(a))=0 then
fuheriqi(b)=xiageriqi'把季度日期和缴费日期按大小存入数组中
if DateDiff("d",xiageriqi,jiaofeiriqi(a))=0 then
a=a+1
end if

if b=1 then
qianriqi=fuheriqi(0)
else
qianriqi=DateAdd("d",1,fuheriqi(b-1))
end if
%>

<tr>
<td width="60"><%=qianriqi%></td>
<td width="60"><%=fuheriqi(b)%></td>
</tr>

<%
b=b+1
end if
xiageriqi=DateAdd("d",1,xiageriqi)
loop
%>
</table>

以上ASP中，怎么样才能达到图片的内容，感激不尽。

Answer 1

看起来应该是这样，你试试：

<table class="mytable">
<%
dim jiaofeiriqi(5)
jiaofeiriqi(1)=#2022/4/13#
jiaofeiriqi(2)=#2022/7/18#
jiaofeiriqi(3)=#2022/9/29#
dim xiageriqi
xiageriqi=#2021/12/28#
dim fuheriqi(20)
fuheriqi(0)=#2021/12/28#
dim zuihouriqi
zuihouriqi=#2022/11/22#
a=1
b=1
do while DateDiff("d",xiageriqi,zuihouriqi)>=0
if ((month(xiageriqi)=3 or month(xiageriqi)=6 or month(xiageriqi)=9 or month(xiageriqi)=12) and day(xiageriqi)=20) or DateDiff("d",xiageriqi,jiaofeiriqi(a))=0 then
fuheriqi(b)=xiageriqi'把季度日期和缴费日期按大小存入数组中
if DateDiff("d",xiageriqi,jiaofeiriqi(a))=0 then
a=a+1
end if
if b=1 then
qianriqi=fuheriqi(0)
else
    '如果逢季度就加一
    if month(fuheriqi(b-1))=3 or month(fuheriqi(b-1))=6 or month(fuheriqi(b-1))=9 or month(fuheriqi(b-1))=12
        qianriqi=DateAdd("d",1,fuheriqi(b-1))
    else
    '否则就不加一
        fuheriqi(b-1)
    end if


end if
%>
<tr>
<td width="60"><%=qianriqi%>td>
<td width="60"><%=fuheriqi(b)%>td>
tr>
<%
b=b+1
end if
xiageriqi=DateAdd("d",1,xiageriqi)
loop
%>
table>