26/09/2005, 07:32
|
 | Colaborador | | Fecha de Ingreso: enero-2002 Ubicación: Centro de la república
Mensajes: 8.849
Antigüedad: 23 años, 3 meses Puntos: 146 | |
Algo rápido:
Código:
<%
secciones="1,4,5,6,7,8,12"
seleccionados=split(secciones,",")
for i=1 to 20
Encontrado = false
For j=0 to UBound(seleccionados)
If i = CInt(seleccionados(j)) Then
Encontrado = true
Exit for
End If
Next
If Encontrado Then
Response.Write "<br><b>" & i & "</b>"
Else
Response.Write "<br>" & i
End If
next
%>
Saludos
PD.
Dices que tienes: secciones="1,4,5,6,7,8,12"
seleccionados=split( revistas,",")
Lo cual es incorrecto. |