SoloCodigo

Tengo un a duda acerca de como realizar un TELNET desde visual. He intentado y no he tenido éxito. Logré realizar un FTP, pero lo que necesito es ejecutar un script en una terminal remota y la salida de datos visualizarla en pantalla, guardarla en mi máquina o donde sea..

Agradezco sus atenciones y espero que me apoyen u orienten en esta cuestión.

Esto es lo que hago con el FTP, pero ya tengo el archivo "sar". Con el Telnet me gustaria ejecutar el script y generar el archivo sar y guardarlo en mi máquina..

Private Sub UserForm_Initialize()

Dim ipaddress As String
Dim user As String
Dim password As String

Select Case a_Entrar.site
Case "Zona 1"
ipaddress = "X.X.X.X"
Case "Zona 2"
ipaddress = "X.X.X.X"
End Select

Dim nFic As Integer
Dim archivoFTP As String
Dim Path As String

Path = "C:\macros\"
archivoFTP = Path & "conectar.ftp"
nFic = FreeFile
Open archivoFTP For Output As #nFic
Print #nFic, "lcd /macros"
Print #nFic, "open "; ipaddress; ""
Print #nFic, "user "; user; " "; password; ""
Print #nFic, "cd /tmp"
Print #nFic, "get sar.log"
Print #nFic, "close"
Close #nFic

Shell "ftp -n -s:c:\macros\conectar.ftp"

End Sub

Saludos