Holen Sie sich Text aus Steam Chat

Question

Ich habe einen Freund von mir, der seinen acc mit jemand anderem teilt ... jetzt habe ich das geschrieben (unten), um autmatisch zu fragen, wer dort ist ... jetzt will ich, dass das Skript das prüft bereits aktiv steamchat Fenster für eine „Exuskazera“ oder ein „Cierra“ so es gibt autmatically wird unter „Anmelden als: USER“

Set WshShell = WScript.CreateObject("WScript.Shell") 
WshShell.AppActivate "Exuskazera & Mashiro - Chat" 
WScript.Sleep 3000 
WshShell.SendKeys "Chatbot Login System Version 3.2.3 Codename Ikarus" 
WshShell.SendKeys "{ENTER}" 
WshShell.SendKeys "Please choose an account from below:" 
WshShell.SendKeys "{ENTER}" 
WshShell.SendKeys "Exuskazera :potplant:" 
WshShell.SendKeys "{ENTER}" 
WshShell.SendKeys "Cierra :potplant:" 
WshShell.SendKeys "{ENTER}" 
WshShell.SendKeys "Please choose an account by writing its name to the Chat" 
WshShell.SendKeys "{ENTER}" 
WshShell.SendKeys "You have 20seconds to choose,if you do not,you will be logged in as Guest!" 
WshShell.SendKeys "{ENTER}" 
WScript.Sleep 1000 
WshShell.SendKeys "20" 
WshShell.SendKeys "{ENTER}" 
WScript.Sleep 1000 
WshShell.SendKeys "19" 
WshShell.SendKeys "{ENTER}" 
WScript.Sleep 1000 
WshShell.SendKeys "18" 
WshShell.SendKeys "{ENTER}" 
WScript.Sleep 1000 
WshShell.SendKeys "17" 
WshShell.SendKeys "{ENTER}" 
WScript.Sleep 1000 
WshShell.SendKeys "16" 
WshShell.SendKeys "{ENTER}" 
WScript.Sleep 1000 
WshShell.SendKeys "15" 
WshShell.SendKeys "{ENTER}" 
WScript.Sleep 1000 
WshShell.SendKeys "14" 
WshShell.SendKeys "{ENTER}" 
WScript.Sleep 1000 
WshShell.SendKeys "13" 
WshShell.SendKeys "{ENTER}" 
WScript.Sleep 1000 
WshShell.SendKeys "12" 
WshShell.SendKeys "{ENTER}" 
WScript.Sleep 1000 
WshShell.SendKeys "11" 
WshShell.SendKeys "{ENTER}" 
WScript.Sleep 1000 
WshShell.SendKeys "10" 
WshShell.SendKeys "{ENTER}" 
WScript.Sleep 1000 
WshShell.SendKeys "9" 
WshShell.SendKeys "{ENTER}" 
WScript.Sleep 1000 
WshShell.SendKeys "8" 
WshShell.SendKeys "{ENTER}" 
WScript.Sleep 1000 
WshShell.SendKeys "7" 
WshShell.SendKeys "{ENTER}" 
WScript.Sleep 1000 
WshShell.SendKeys "6" 
WshShell.SendKeys "{ENTER}" 
WScript.Sleep 1000 
WshShell.SendKeys "5" 
WshShell.SendKeys "{ENTER}" 
WScript.Sleep 1000 
WshShell.SendKeys "4" 
WshShell.SendKeys "{ENTER}" 
WScript.Sleep 1000 
WshShell.SendKeys "3" 
WshShell.SendKeys "{ENTER}" 
WScript.Sleep 1000 
WshShell.SendKeys "2" 
WshShell.SendKeys "{ENTER}" 
WScript.Sleep 1000 
WshShell.SendKeys "1" 
WshShell.SendKeys "{ENTER}" 
WScript.Sleep 1000 
WshShell.SendKeys "Logging in as:<USER>" 
WshShell.SendKeys "{ENTER}" 

Answer 1

der einzige Text erhalten Sie können, ist der Text in der Titelleiste. Siehe tasklist /v.