I know this might be a silly question. I want to login to putty and read the lines in putty window. The following code gets stuck at the readline.
Dim UserName
Dim Passwrd
UserName = InputBox("Please Enter Your UserID:")
Passwrd = InputBox("Please Enter Your Password:")
Set shell = CreateObject("WScript.Shell")
pcmd = "C:\Putty\putty.exe -ssh"&" "&UserName & "@10.x.xx.x -pw" &" "&Passwrd
Set exec = shell.Exec(pcmd)
Set pout = exec.StdOut
Dim strFromPutty
Do
strFromPutty = pout.ReadLine
print strFromPutty
Loop While Not pout.AtEndOfStream