Guest User

Untitled

a guest
Apr 17th, 2018
122
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
AutoIt 0.45 KB | None | 0 0
  1. #include <Constants.au3>
  2.  
  3. $foo = Run("C:\Program Files (x86)\Cisco Systems\VPN Client\vpnclient.exe connect profil", @SystemDir, @SW_HIDE, $STDERR_CHILD + $STDOUT_CHILD)
  4.  
  5. While 1
  6.     $line = StdoutRead($foo)
  7.     If @error Then ExitLoop
  8.  
  9.     If $line <> "" Then
  10.         If StringInStr($line,"Your VPN connection is secure.") Then
  11.             MsgBox(0,"","VPN-Verbindung aufgebaut")
  12.         EndIf
  13.         ConsoleWrite("STDOUT gelesen:" & $line & @CRLF)
  14.     EndIf
  15. WEnd
Add Comment
Please, Sign In to add comment