Leer archivo de texto con direcciones IP en VBS

[edimambro]

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