¿como puedo reducir este if?

f_murciano · #1 (**permalink**) 31/01/2006, 02:39

Hay alguna manera de reducir este IF?

if CInt(rsContactos("idProvincia"))<>4 and CInt(rsContactos("idProvincia"))<>11 and CInt(rsContactos("idProvincia"))<>14 and CInt(rsContactos("idProvincia"))<>18 and CInt(rsContactos("idProvincia"))<>21 and CInt(rsContactos("idProvincia"))<>23 and CInt(rsContactos("idProvincia"))<>29 and CInt(rsContactos("idProvincia"))<>41 and then

Gracias!

3pies · #2 (**permalink**) 31/01/2006, 02:48

Pues creo que no vas a poder reducirlo. Lo que puedes hacer, si no te gusta ese condicional tan largo, es utilizar Select case:

Código:

idprovincia = CInt(rsContactos("idProvincia"))
Select Case idprovincia
Case 4, 11, 14, 18, 21, 23, 29, 41
    Response.write "Mec, meeeeeec!"
Case Else
    Response.write "Pi, piiiiiiii!"
End Select

f_murciano · #3 (**permalink**) 31/01/2006, 02:52

Gracias, pero creo que haré una funcioncilla... ¡utilizando tu código! jejeje