简单的试验程序如下：
<%
Dim i
for i=1 to 9
if i=5 then
response.write(Cstr(i))
response.write "<script language=JavaScript>"
response.write "if(confirm(有"+Cstr(i)+"))"
Response.Write(Cstr(i))
end if
next
%>
第一句response.write(Cstr(i))能执行，但下面希望它出现的对话框就没有出现，
即没有执行第二句response.write(Cstr(i))，是我写错了还是另外什么原因？