VBS脚本-如何打开电子邮件应用程序并输入凭据

编程问答 2022-06-12

问题描述

我道歉；我是个初学者，以前我曾尝试问过类似的问题，但我仍然无法弄清楚。

我试图编写一个VBS脚本来打开我的电子邮件应用程序，输入我的凭据，然后登录。我正在使用WshShell和SendKeys命令。

该脚本旨在：

  1. 打开应用，
  2. 按四次TAB键进入用户名字段，
  3. 输入我的用户名，
  4. 再次按TAB键移至密码字段，
  5. 输入我的密码，然后
  6. 按Enter登录。

该脚本成功打开了Thunderbird，但没有执行其他任何操作。在上面的步骤1之后，它什么也没做。

Set WshShell = CreateObject("WScript.Shell")

WshShell.Run("C:\Program Files (x86)\Mozilla Thunderbird\thunderbird.exe")

WScript.Sleep 3000

WshShell.AppActivate("C:\Program Files (x86)\Mozilla Thunderbird\thunderbird.exe")

WScript.Sleep 1000

WshShell.SendKeys("{TAB}")
WshShell.SendKeys("{TAB}")
WshShell.SendKeys("{TAB}")
WshShell.SendKeys("{TAB}")

WScript.Sleep 1000 

WshShell.SendKeys("U")
WshShell.SendKeys("S")
WshShell.SendKeys("E")
WshShell.SendKeys("R")

WScript.Sleep 1000 

WshShell.SendKeys("P")
WshShell.SendKeys("A")
WshShell.SendKeys("S")
WshShell.SendKeys("S")
WshShell.SendKeys("w")
WshShell.SendKeys("O")
WshShell.SendKeys("R")
WshShell.SendKeys("D")

WshShell.SendKeys("{ENTER}")

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

autofillpasswordssendkeysusernamevbscriptvbscript