Question

我有一个我的朋友与其他人分享它...现在我写了这个（下面）自动询问谁在那里...现在我想要脚本检查已经活跃的steamchat窗口“Exuskazera”或“Cierra”所以它将自动输出“登录为：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

您可以获得的唯一文字是标题栏中的文字。请参阅tasklist /v。

从Steam聊天中获取文字

1 个答案: