<% '---if statement--- distance = 850 if distance <= 500 then response.write ("Easy in one day.
") else if distance <= 800 then response.write ("Feasible in one day.
") else response.write ("I should reserve a hotel room.
") end if end if %> <% '---case with numbers --- number = 3 select case number case 2 Response.Write("number is Two
") case 3 Response.Write("number is Three
") case else Response.Write("number is " & number & "
") end select %> <% '---case with strings--- pet = "cat" select case pet case "dog" Response.Write("I own a dog") case "cat" Response.Write("I own a cat") case Else Response.Write("I do not have a pet") end select %>