1

我有一个 R 脚本，它利用彭博数据生成报告。我可以使用 Rblp 包提取彭博数据。但是，该脚本最好在凌晨 4 点运行。我正在尝试安排它，但彭博在某些空闲时间后被注销。所以，我需要先自动化彭博登录。

我在网上找到了以下 wsf 脚本来自动登录彭博

<package> 
 <job id="vbs"> 
  <script language="VBScript"> 
     set WshShell = WScript.CreateObject("WScript.Shell") 
     WshShell.AppActivate "1-BLOOMBERG" 
     WScript.Sleep 1000 
     WshShell.SendKeys "{esc}" 
     WScript.Sleep 1000 
     WshShell.SendKeys "login~" 
     WScript.Sleep 2000 
     WshShell.SendKeys "YOURUSERNAME{tab}YOURPASSWORD~" 
     WScript.Sleep 1000 
    </script> 
   </job> 
</package>

但是，当我运行它时，它会在密码字段中生成一个额外的字符（不可见）。但是，如果我对 Skype 等其他应用程序使用相同的脚本，它就可以正常工作。

无论如何我可以自动化彭博登录吗？

4

1 回答 1

0

试试这个……它对我有用。**请注意，如果计算机被锁定，Sendkeys 将不起作用，因为它违背了 Windows 具有锁定功能的全部原因。所以...如果您希望在计算机唤醒/登录之前凌晨 4 点运行某些东西，Sendkeys 可能不是解决方案。

Sub bbg_login()
AppActivate ("1-BLOOMBERG")
Application.SendKeys "~", False
Application.Wait Now + TimeValue("00:00:01")
Application.SendKeys "username", False
Application.SendKeys "{TAB}", False
Application.SendKeys "password{BREAK}", False
Application.SendKeys "~", False
End Sub
于 2019-01-10T13:03:25.967 回答