Read putty output

[Cotino]

Hi,
Here's an apparently simple problem to which i havent found a solution ...
I have an already opened putty session and i want to read its output.
StdOutRead() doesn't work as you need to run() with special parameters first.
WinGetText() doesn't work either.

Any idea ?

[FrancescoDiMuro]

@Cotino
So you would like to get the output from a generic console or from Command Prompt?
If this is an external application, could you please tell us which one?
 

[Cotino]

Yup, i'd like to read the output from PuTTY (extremely popular terminal emulator)

[Nine]

Hard to say just like that, I would suggest you fully read PuTTY documentation.

Like :

3.1.3.5 COPY ALL TO CLIPBOARD
This system menu option provides a convenient way to copy the whole contents of the terminal screen (up to the last nonempty line) and scrollback to the clipboard in one go.

or

3.2 CREATING A LOG FILE OF YOUR SESSION
For some purposes you may find you want to log everything that appears on your screen. You can do this using the ‘Logging’ panel in the configuration box.

Leave code you have here so we can start helping you...

[Viszna]

Hi
I automated putty (application UNIX).
Each screen change is copying to the clipboard and further operations on the string

You need to find out how to configure PuTTs, and then it's easy to function below:
- takes the entire screen to the clipboard
- get from clipboard to the string
- completes each line up to 80 characters
- returns the string
My configuring PuTTY (80 columns x 24 rows)

;REMEMBER ! before calling the function
; WinActivate ( "title" [, "text"] ) PuTTY window!!!
; how do you do a lot of screen
; it works faster SendKeepActive ( "title" [, "text"] )

Func _Screen()
    Send("!{SPACE}o")
    Sleep(300)
    $PobranyEkran = ""
    $PobranyEkran = ClipGet()
    If StringLen($PobranyEkran) < 5 Then ; If it is shorter than 5 characters, copy again
        Send("!{SPACE}o")
        Sleep(300)
        $PobranyEkran = ClipGet()
    EndIf
;For easy operations on the string
;each line is completed with the same length of 80 characters
    Dim $a_PobranyEkran [0] 
    $a_PobranyEkran = StringSplit($PobranyEkran,@CRLF,3)
    ReDim $a_PobranyEkran[24]
    $PobranyEkran = ""
    For $i=0 to 23
        $a_PobranyEkran[$i] = $a_PobranyEkran[$i] & "                                                                                   "
        $a_PobranyEkran[$i] = StringLeft($a_PobranyEkran[$i],80) & @CRLF
        $PobranyEkran = $PobranyEkran & $a_PobranyEkran[$i]
    Next
    Return $PobranyEkran
EndFunc   ;==>_Screen

 

Edited November 29, 2018 by Viszna

[Zedna]

Try to search this forum for keyword "putty", as far as I can remember there was discussion (with solution) about that many years ago here...

[mLipok]

eventually
serach for   plink.exe  no the forum.eventually
 Download SSH ActiveX Free version

Quote

djHD Software grants Licensee a non-exclusive and non-transferable license to reproduce and use for personal or internal business purposes the executable code version of the Product, provided any copy must contain all of the original proprietary notices. 

eventually:
https://www.weonlydo.com/SSH/ssh-activex-component.asp

eventually:
chilkat:
https://www.example-code.com/vbscript/ssh_parallel_multiple_servers.asp

 

eventually
I use http://www.jtsoft.com.pl/ which exposes ActiveX component (I have ready to use UDF for this component to use with "mainframe"  feature )

 

btw.

@Viszna cześć, tym ostatnim szczególnie ty możesz być zainteresowany.
hi, the latter you especially may be interested in.