源程序是:
< html>< head>
< title>DoLoop.asp< /title>< body bgcolor="#FFFFFF">< /head>< p>< /p>
< p> 请将今年到本月为止的每个月份的销售结算记录填写在本页之上。< P>
< %
counter = 1
thismonth = month(now())
Do while counter < thismonth + 1
response.write " " & counter & " 月份 : "
response.write "______________________________" & "< BR>< br>"
If counter >13 then
exit do
end if
counter = counter+1
Loop
%>
< hr>< /body>< /html>
运行后是:
< html>< head> < title>DoLoop.asp< /title>< body bgcolor="#FFFFFF">< /head>< p>< /p> < p> 请将今年到本月为止的每个月份的销售结算记录填写在本页之上。< P> < % counter = 1 thismonth = month(now()) Do while counter < thismonth + 1 response.write " " & counter & " 月份 : " response.write "______________________________" & "< BR>< br>" If counter >13 then exit do end if counter = counter+1 Loop %> < hr>< /body>< /html>
好像没有什么错误提示!