Sample scripts

SecureCrt

Download securecrt.tlb type library


# $language = "VBScript"
# $interface = "1.0"

'library:c:\mytypelib\securecrt.tlb
'Dim crt As SecureCrt.crt

' A VBScript login script that waits for a login prompt then sends
' a 'setenv DISPLAY <ipaddress>:0.0' command to direct X-clients to a
' locally run Xserver.

Sub Main

  crt.Screen.WaitForString("myhost$ ")

  Dim display
  display = "setenv DISPLAY " & crt.Session.LocalAddress & ":0.0" & vbCr
  crt.Screen.Send(display)

EndSub


VbsEdit provides Intellisense for SecureCRT!


This package includes VbsEdit 32-bit, VbsEdit 64-bit, HtaEdit 32-bit and HtaEdit 64-bit.
The evaluation version never expires.




Home  

Copyright © 2001-2017 Adersoft