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
