Foros del Web » Programando para Internet » ASP Clásico »

Sub no funciona al identificar numero

Estas en el tema de Sub no funciona al identificar numero en el foro de ASP Clásico en Foros del Web. Holas, tengo el siguiente Sub Código: <% Function filtrarNumero(ip, texto) Dim aIPS, i aIPS = array(62,77,78,79,80,81,82,83,84,85,86,87,88,89,90,91,92,93,94,95,109,178,188,193,194,195,199,212,213,217,190) For i = 0 to UBound(aIPS) If ip = ...
  #1 (permalink)  
Antiguo 13/11/2010, 00:34
Avatar de Julcar  
Fecha de Ingreso: noviembre-2007
Ubicación: C:\inetpub\wwwroot\Guayaquil
Mensajes: 1.507
Antigüedad: 17 años
Puntos: 54
Sub no funciona al identificar numero

Holas, tengo el siguiente Sub

Código:
<%
Function filtrarNumero(ip, texto)
  Dim aIPS, i
  aIPS = array(62,77,78,79,80,81,82,83,84,85,86,87,88,89,90,91,92,93,94,95,109,178,188,193,194,195,199,212,213,217,190)
  For i = 0 to UBound(aIPS)
    If ip = aIPS(i) Then
      Response.Write texto
    End If
  Next
End Function

Dim visitante
visitante = Split(Request.ServerVariables("REMOTE_ADDR"),".",2)
filtrarNumero visitante(0), "hola mundo"
%>
Al subirlo al servidor y ejecutarlo no envia la cadena "hola mundo" a pesar de que he realizado esto:

Código:
Response.Write visitante(0)
Y bota el numero 190, es decir el ultimo item del array.

Y ya me tiene de cabeza ese procedimiento y no lo puedo hacer funcionar

Alguna idea?
__________________
Linux no es el único S.O. libre, conoce a ReactOS el Windows Libre!
"Si mis respuestas te dan la calma, espárceme un poco de karma"
  #2 (permalink)  
Antiguo 13/11/2010, 09:24
Avatar de u_goldman
Moderador
 
Fecha de Ingreso: enero-2002
Mensajes: 8.031
Antigüedad: 22 años, 11 meses
Puntos: 98
Respuesta: Sub no funciona al identificar numero

Asegurate que la variable ip reciba un entero:

Código:
    If cint(ip) = aIPS(i) Then
      Response.Write texto
      'Adicionalmente me imagino que debes salir del for si esta condicion se cumple
      Exit For
    End If

Saludos
__________________
"El hombre que ha empezado a vivir seriamente por dentro, empieza a vivir más sencillamente por fuera."
-- Ernest Hemingway
  #3 (permalink)  
Antiguo 13/11/2010, 11:15
Avatar de Julcar  
Fecha de Ingreso: noviembre-2007
Ubicación: C:\inetpub\wwwroot\Guayaquil
Mensajes: 1.507
Antigüedad: 17 años
Puntos: 54
Respuesta: Sub no funciona al identificar numero

U_G gracias!!!!

nunca me iba a imaginar que Split() envia los punteros del array como un string pero ya está solucionado y trabaja a las mil maravillas

por cierto, a quien le sirva, es una funcion para bloquear rangos de ips enteros asi que ya saben, si lo usan denme los creditos
__________________
Linux no es el único S.O. libre, conoce a ReactOS el Windows Libre!
"Si mis respuestas te dan la calma, espárceme un poco de karma"

Etiquetas: numero, identificador
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 03:51.