select case expression 
  case label_1
   statements_1
  case label_2
   statements_2
  ...
  case else
   statements_n
end select

<%@ language="vbscript">
<%
Dim Flower
Flower = "rose"
select case flower
 case "rose" 
   response.write(flower & " costs $2.50")
 case "daisy"
   response.write(flower & " costs $1.25")
 case "orchild" 
   response.write(flower & " costs $1.50")
 case else 
   response.write("There is no such flower in our shop")
end select
%>

<%
'/*ASP中用select case代替其他語言中的switch case, default用case else*/
dim today
today = 5
select case today
 case 0 
 str = "星期天"
 case 1
 str = "星期一"
 case 2
 str = "星期二"
 case 3
 str = "星期三"
 case 4
 str = "星期四" 
 case 5
 str = "星期五"
 case 6
 str = "星期六"
 case 7, 8, 9
 str = "today的值是7，8，或9"
 case else
 	str = "未知"
end select

response.write str
response.End()
%>

/*------------輸出結(jié)果--------
星期五
------------*/

board=request("board")
 select case board   
     case "1"
     boardName = "技術(shù)版"
     case "2"
     boardName = "信息版"    
     case "3"
     boardName = "客服星空"
     case "4"
     boardName = "灌水區(qū)"
     case "5"
     boardName = "市場(chǎng)營(yíng)銷"
     case "6"
     boardName = "經(jīng)理論壇"
     case "7"
     boardName = "影音論壇"
     case "8"
     boardName = "延伸服務(wù)"
     case "9"
     boardName = "東北片區(qū)"
     case "10"
     boardName = "市場(chǎng)動(dòng)態(tài)"
     case "11"
     boardName = "群發(fā)交流"
     case "12"
     boardName = "hombre"
     case "14"
     boardName = "論壇"
     case "15"
     boardName = "在線答疑"
		 case else
		boardName = "我們"
end select