每天可以自动签到的一些代码

daily.vbs

Set WshShell=WScript.CreateObject("WScript.Shell")

WshShell.Run """C:\Program Files (x86)\Google\Chrome\Application\chrome.exe"""

WScript.Sleep 1000

WshShell.SendKeys "http://bt.neu6.edu.cn/forum.php"

WshShell.SendKeys "{ENTER}"
WshShell.SendKeys "{ENTER}"
WScript.Sleep 1000
WshShell.SendKeys "^t"

WshShell.SendKeys "https://leetcode-cn.com"

WshShell.SendKeys "{ENTER}"
WshShell.SendKeys "{ENTER}"

WScript.Quit