主题:  动态数组的问题

wing-wing

职务:普通成员
等级:1
金币:0.0
发贴:25
#12004/7/11 3:50:24
'为什么Response.Write输出bDayCal()的值是正常的,
'但最终的结果是bDayCal()的值全都一样的?
'以下为部分代码

Do while not logRec.EOF
If bDayCal(whatDayHave) <> logRec("blog_day_no") Then
whatDayHave = whatDayHave +1
ReDim bDayCal(whatDayHave)
bDayCal(whatDayHave) = logRec("blog_day_no")
End if
Response.Write(bDayCal(whatDayHave) & "-" & whatDayHave & "|")
logRec.movenext
Loop

'怎样才能使bDayCal()的最终结果与Response.Write所显示的结果相同?
'请高手们指点



浮尘

职务:普通成员
等级:3
金币:7.0
发贴:1258
#22004/7/12 16:06:39
ReDim Preserve bDayCal(whatDayHave)