Comparar intervalos y array

[Adler]

Hola

El problema es quiero comparar los intervalos del ciclo con los elementos del array. En caso que coincidan, acción A, sino acción B. Esto es lo que tengo hasta ahora

Código asp:

<&#37;
arr = Array(2,4)
 
For i = 1 to 5
cad = " i = " & Join(arr, " or  i  = ")
 
'If i = 2 or i = 4 Then
If i = Join(arr, " or " & i  & "= ") Then
Response.Write "X"
else
Response.Write "x"
End If
Next 'i
Response.Write "<br/>" & cad
%>
 

En este caso que expongo, debería imprimirse
xXxXx
pero se imprime
xxxxx

En teoría estas dos lineas son iguales, ¿no?
If i = 2 or i = 4 Then
If i = Join(arr, " or " & i & "= ") Then

Gracias