一个URL访问后获得一个9位返回值，若其中前7位都为9的话，自动提交至http://xxxx.com/1.asp前7位不为9的话自动刷新，直到出现。
有能力写出来者请与我联系。（HTML也行、VB等编程出来也行）
QQ：96445
參考答案:楼上的程序有一些问题
在Response.Redirect之前最好不要再有Response.Write()，因为Redirect本身是要使浏览器转向，你再输出客户端是看不到的。
并且Int((*********** * Rnd) + 1) 生成的非常可能不是9位的数字。
看一下我的
希望对你有所帮助
同样保存为test.asp
<%
dim intN,returnNumber
for intN=1 to 9
returnNumber=rreturnNumber & Int((9* Rnd) + 1)
next
If Left(returnNumber,7)="9999999" Then
Response.redirect ""
Else
Response.write "<meta http-equiv='refresh' content='1;URL=test.asp'>"
End If
%>
