UC知道ASP VB 的do..lop语句..
来源：百度知道 编辑：UC知道 时间：2024/05/24 09:06:04
程序如下:
<html>
<head><title>演示Do...lop语句的使用</title></head>
<body>
<%
Dim i
i=1
Do while i<10
arr(i)=i
i=i+1
Loop
Response.Write("<BR><BR>")
Response.Write("使用Do Until语句输出arr()中的数据〈BR>")
i=1 : sum=0
Do While i<>10
Response.Write(Csr(arr(i))&"<BR>")
i=i+1
Loop
%>
</body>
</html>
----------------------------------------------------------------
查看有无错误..在IE中不显示
本人初学ASP编程有没哪位给个好的指导,一个方向..
-.- 打错了 是CSTR不过 改正还是不显示．．
<html>
<head><title>演示Do...lop语句的使用</title></head>
<body>
<%
Dim i
i=1
Do while i<10
arr(i)=i
i=i+1
Loop
Response.Write("<BR><BR>")
Response.Write("使用Do Until语句输出arr()中的数据〈BR>")
i=1 : sum=0
Do While i<>10
Response.Write(Csr(arr(i))&"<BR>")
i=i+1
Loop
%>
</body>
</html>
----------------------------------------------------------------
查看有无错误..在IE中不显示
本人初学ASP编程有没哪位给个好的指导,一个方向..
-.- 打错了 是CSTR不过 改正还是不显示．．
改成这样就可以了，不过你的Csr(arr(i))是个什么函数就不知道了
<html>
<head><title>演示Do...lop语句的使用</title></head>
<body>
<%
Dim i
dim arr()
i=1
Do while i<10
redim preserve arr(i)
arr(i)=i
i=i+1
Loop
Response.Write("<BR><BR>")
Response.Write("使用Do Until语句输出arr()中的数据〈BR>")
i=1 : sum=0
Do While i<>10
Response.Write(Csr(arr(i))&"<BR>")
i=i+1
Loop
%>
</body>
</html>
在前面先声明定义数组
没指定语言.
在<HTML>前面加上语言限定.
<%@ LANGUAGE="VBSCRIPT" %>