<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%><!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=gb2312" /><title><%="頁面標題"%></title></head><body><%="多條件判斷"%><%response.Write("<br />")response.Write("利用response對象的Write方法輸出地內容！")%><br /><%dim a,ba=200b=300response.Write("兩數之和為：")response.Write(a+b)response.Write("<br />")if a=100 thenresponse.Write("a=100,第一個條件滿足。")elseif a=200 thenresponse.Write("a=200,第二個條件滿足。")elseif a=300 thenresponse.Write("a=300,第三個條件滿足。")elseresponse.Write("三個條件都不滿足。")end if%><%response.Write("<br />")dim textnumbertextnumber=200select case textnumber case 100 response.Write("數值為100， 條件滿足！") case 200 response.Write("數值為200，條件滿足 ！") case 300 response.Write("數值為300 ，條件滿足！") case else response.Write("以上條件，條件都不滿足！") end select%><%response.Write("<br />")dim i,sumi=0sum=0 while i<=100 sum=sum+i i=i+1wendresponse.Write("100以內所有整數的和為：")response.Write(sum)%><%response.Write("<br />")dim w,sw=0s=0do s=s+ww=w+1loop while w<=100response.Write("100之內的所有整數之和為：")response.Write(s)response.Write("<br/>")response.Write("w的值是：")response.Write(w)%></body></html> 具體的介紹就不多說了，大家看下實例就可以了
