自动提交代码

WScript.echo "begin commit daily codes"
rem WScript.sleep(3000)

set WshShell = CreateObject("WScript.shell")

WshShell.run "C:UsersAdministratorDesktopgit-bash.exe.lnk"
WScript.sleep(5000)

rem enter code folder
WshShell.AppActivate "MINGW64"
WshShell.SendKeys "cd" + " "+ "C:"
WshShell.SendKeys "{Enter}"
WScript.sleep(2000)

WshShell.AppActivate "MINGW64"
WshShell.SendKeys "cd" + " "+ "Users/Administrator/Desktop/"
WshShell.SendKeys "{Enter}"
WScript.sleep(5000)

rem enter git commands
WshShell.AppActivate "MINGW64"
WshShell.SendKeys "git" + " "+ "pull"
WshShell.SendKeys "{Enter}"
WScript.sleep(5000)

WshShell.AppActivate "MINGW64"
WshShell.SendKeys "git" + " "+ "status"
WshShell.SendKeys "{Enter}"
WScript.sleep(5000)

WshShell.AppActivate "MINGW64"
WshShell.SendKeys "git" + " "+ "add" + " " +"--all"
WshShell.SendKeys "{Enter}"
WScript.sleep(5000)

WshShell.AppActivate "MINGW64"
WshShell.SendKeys "cd" + " "+ "Users/Administrator/Desktop/"
WshShell.SendKeys "{Enter}"
WScript.sleep(5000)

rem exit git GUI
WshShell.AppActivate "MINGW64"
WshShell.SendKeys "will"+ " "+ "exit" + " "+"after" + " "+"5" + " "+"seconds"
WshShell.SendKeys "{Enter}"
WScript.sleep(5000)
WshShell.AppActivate "MINGW64"
WshShell.SendKeys "exit"
WshShell.SendKeys "{Enter}"

rem end this VBScript
set WshShell = nothing
WScript.echo "End commit daily codes"