第三章 VBScript语法.pptVIP

你也可以对一个分支使用ELSE表达式。跟在ELSE表达式后的语句只有条件的真值为false时才被执行。请看这个例子： % if time #6:00:00pm# then Welc=”Good Evening!” else Welc=”Good some other time!” end if % 你可以进行分支嵌套，这通常是非常有用的。这里有一个例子： % if time #6:00:00pm# then if time 10:00:00pm# then Welc=”Good Evening!” else Welc =”Good Late Evening!” end if else Welc =”Good some other time!” end if % 在这个例子中，如果是在晚上十点之前，则问候语是“Good Evening!”，如果时间晚于十点，则问候语是”Good Late Evening!”。如果不是在六点之后，则使用问候语“Good some other time!”。 如果在一个分支中，你只想执行一个语句，那么你不需要使用END IF 表达式。这里有两个例子： % if time #6:00:00pm# then Welc =”Good Bye!” % % if time #6:00:00pm# then Welc =”Good Day!” else Welc =”Good Evening!” % 2. SELECT CASE  SELECT CASE语句与IF...THEN语句关系密切。IF...THEN语句只能允许你测试一个条件；SELECT CASE语句允许你一次测试多个条件，如下例所示： % SELECT CASE Name CASE “Amanda” Welc =”Welcome Amanda!” CASE “Lisa” Welc =”Welcome Lisa!” CASE ELSE Welc =”Welcome Someone!” END SELECT % 在这个例子中， 变量Name代表你站点访问者的名字。如果该名字匹配某个条件，则相应的问候语被分配给变量Welc。否则执行CASE ELSE表达式后面的语句。 CASE ELSE语句是可选的。如果你省去这个表达式，并且所有的CASE条件都没有匹配，则不执行任何语句。 3.4.2循环控制1. FOR…NEXT 当你需要重复执行一组语句一定次数时，你可以使用一个FOR...NEXT循环，如下例所示： % for i=1 to 300 % Hello Everyone! % next % 在这个例子中，句子“Hello Everyone!”被在浏览器中打印300次。FOR语句和NEXT语句之间的任何语句都将被重复执行。甚至，象这个例子一样，当循环体内是HTML代码时，它也将被重复执行。 通过使用关键字STEP，你可以构造反向的循环。考虑下面的例子： % For i=300 to 1 step –1 % Hello Everyone! % NEXT % 这个例子输出与上一个例子完全相同的结果。但是，在这个例子中，FOR..NEXT循环从数字300开始，反向循环到1。 你可以在循环中使用不同的步长。在下面的例子中，变量i每次被增加10： % For i=1 to 300 Step 10 % %=i%br % Next % 你可以用EXIT FOR语句从一个FOR...NEXT循环退出。假定你在遍历一个数组以找到某个字符串表达式的匹配值。当你已经找到了一个匹配时，你不需要继续执行循环： % Dim Myarray(10) Myarray(4)=”Rose” For i=0 to ubound(myarray) If myarray(i)=” Rose” then Exit For Next % 在这个例子中，如果数组中某个元素的值与表达式“Rose”相匹配，则立即退出FOR...NEXT循环。变量i的值等于被匹配的元素的索引值 2. DO…LOOP 当以指定的次数执行一组语句或显示HTML代码块时，FOR...NEXT循环是有用的。但是，在许多情况下，当一个循环执行之前，你并不知道它需要执行的次数。在这些情况下，你需要使用DO…LOOP循环。 用DO循环，你可以构造当某个条件保持为真时重复执行的循环，也可以构造重复执行直到某个条件为真的循环。这里有一个例子： % Do While Welc”Hello!” Welc=”Hello!” % %=Welc% % Loop % 在这个例子中，当变量Welc的值不等于字符串”Hello!”时，处在DO语句和LOOP语句之间的语句被重复执行。因为在循环体你变量Welc被赋了值”Hell