Reveal Teamviewer Quicksupport credentials and save them to disk

revealTV-QS.au3

#include <Constants.au3>
#include <FileConstants.au3>

; Run("TeamViewerQS.exe")
WinWait("TeamViewer QuickSupport")
WinActivate("TeamViewer QuickSupport")
Sleep(5000)

Local $i = 0
While $i <= 10
        Local $tText=WinGetText("TeamViewer QuickSupport")
	If StringInStr($tText, "Bereit zum Verbinden") Then
		ExitLoop
	EndIf
        $i = $i + 1
	Sleep(1000)
WEnd

If StringInStr($tText, "Bereit zum Verbinden") Then
	Local Const $sFilePath = @TempDir & "\tv.txt"
	Local $hFileOpen = FileOpen($sFilePath, $FO_OVERWRITE)
	FileWrite($hFileOpen, $tText)
	FileClose($hFileOpen)	
EndIf

; ShellExecute("notepad.exe", $sFilePath)
Exit