代碼: 選擇全部
id = Request("id")
Select Case True
Case id < 100 ' id < 100
str = "id < 100"
Case fid < 200 ' id >=100 and < 200
str = "id < 200"
Case fid < 300 ' id >=200 and < 300
str = "id < 300"
Case fid < 400 ' id >=300 and < 400
str = "id < 400"
Case Else
str = "id unknown"
End Select
Response.Write str