asp:限制重复的次数

<script language="vbscript">
dim intnum
intnum=1
do while (intnum<=10)
   document.write "现在的值为:"&intnum&"<br>"
    intnum = intnum+1
    if intnum=5 then
      document.write "退出while"
    exit do
end if
loop
</script>