|
#2
linyesu2007-09-20 09:40
|
大家好,请看下面这个程序:
<%
Response.buffer=false
Server.ScriptTimeOut=150
%>
<Html>
<Head>
<Tile>满天星</Title>
</Head>
<Body bgcolor=#000000>
<%
dim startx
dim k,i
dim nexsecond
for k=1 to 60
nextsecond=dateadd("s",2,time)
do while time<nextsecond
loop
Randomize
star=int(50*rnd())
for=i=1 to star
Response.Write"<font color=000000> </font>"
Next
Response.Write"<font color=#00ffff>*</font>"
if k mod 3=2 then response.write"<br>"
next
%>
</body
<html>
这程序没错吧!为什么总说:
Microsoft VBScript 编译器错误 错误 '800a03f6'
缺少 'End'
/iisHelp/common/500-100.asp，行242
Microsoft VBScript 编译器错误 错误 '800a03f2'
缺少标识符
/star.asp，行20
for=i=1 to star
---^
我试着打开以前做过的,有的可以运行,有的也担示像上面那样:Microsoft VBScript 编译器错误 错误 '800a03f6'
缺少 'End'
/iisHelp/common/500-100.asp，行242
Microsoft VBScript 编译器错误 错误 '800a03f2'
缺少标识符
这是怎么回事?请朋友们帮帮我,谢谢!
