Foros del Web » Programación para mayores de 30 ;) » Programación General »

Leer archivo de texto con direcciones IP en VBS

Estas en el tema de Leer archivo de texto con direcciones IP en VBS en el foro de Programación General en Foros del Web. Saludos a todos, estoy realizando un script para monitorear los procesos ejecutados en diferentes máquinas mediante WMI, lo tengo hecho con paso de parámetros (IP) ...
  #1 (permalink)  
Antiguo 18/06/2008, 09:36
 
Fecha de Ingreso: junio-2008
Mensajes: 9
Antigüedad: 15 años, 10 meses
Puntos: 0
Leer archivo de texto con direcciones IP en VBS

Saludos a todos, estoy realizando un script para monitorear los procesos ejecutados en diferentes máquinas mediante WMI, lo tengo hecho con paso de parámetros (IP) al vbs pero necesito modificarlo para que lea las ip donde quiero que se conecte desde un archivo de texto plano.. alguien me podria ayudar al respecto??? no tengo idea de como hacerlo...


Muchas gracias...
  #2 (permalink)  
Antiguo 18/06/2008, 15:34
Avatar de David
Moderador
 
Fecha de Ingreso: abril-2005
Ubicación: In this planet
Mensajes: 15.720
Antigüedad: 19 años
Puntos: 839
Pregunta Respuesta: Leer archivo de texto con direcciones IP en VBS

Cita:
Iniciado por edimambro Ver Mensaje
Saludos a todos, estoy realizando un script para monitorear los procesos ejecutados en diferentes máquinas mediante WMI, lo tengo hecho con paso de parámetros (IP) al vbs pero necesito modificarlo para que lea las ip donde quiero que se conecte desde un archivo de texto plano.. alguien me podria ayudar al respecto??? no tengo idea de como hacerlo...


Muchas gracias...
¿Has intentado utilizar Open?
Código:
Dim GetData As String
Open NombreArchivo For Input As #1
Line Input #1, GetData
Close
__________________
Por favor, antes de preguntar, revisa la Guía para realizar preguntas.
  #3 (permalink)  
Antiguo 19/06/2008, 07:30
 
Fecha de Ingreso: junio-2008
Mensajes: 9
Antigüedad: 15 años, 10 meses
Puntos: 0
Respuesta: Leer archivo de texto con direcciones IP en VBS

Gracias David ya resolvi de esta forma:

Código:
While Not (ts.AtEndOfStream)
	s = ts.ReadLine
	tam = len(s)
	ip = left(s,tam-2)
	ipVector(i)=ip
	i=i+1
Wend  
   ts.Close
End Sub
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 22:49.