select case

Desværre ikke.

Men hvis det er meget kode du skulle gentage for hver case, så kan du putte det ud i en procedure:

Sub MeeeeegetKode()
    Response.Write "123"
End Sub

select case ABC
    case "123"
        Call MeeeeegetKode()
    case "456"
        Call MeeeeegetKode()
    case else
        response.write "890"
end select

select case ABC
  case "123", "456"
    response.write "123"
  case else
    response.write "890"
end select

Hmmmm, ja måske :^)

ksoren: Super! Tak for hjælpen - vil du lave et svar...

nielle: Du skal også have tak for dit forslag.

ok :)