<% Select Case Request.QueryString("Id") Case 42 Response.Write "
" Case 43 Response.Write "
" Case Else Response.Write " " End Select %>