VBScript CreateObject 谷歌浏览器

Mow*_*gli 6 vbscript scripting google-chrome google-chrome-devtools

我有这个 VBScript 它工作正常,脚本没有问题,但我想在 Chrome 而不是 IE 中打开它。

我对 VB 脚本非常陌生。有人可以帮帮我吗。

WScript.Quit Main

Function Main
  Set IE = WScript.CreateObject("InternetExplorer.Application", "IE_")
  IE.Visible = True
  IE.Navigate "http://gmail.com"
  Wait IE
  With IE.Document
    .getElementByID("login_username").value = "myuser"
    .getElementByID("login_password").value = "mypass"
    .getElementByID("frmLogin").submit
  End With
End Function

Sub Wait(IE)
  Do
    WScript.Sleep 500
  Loop While IE.ReadyState < 4 And IE.Busy 
  Do
    WScript.Sleep 500
  Loop While IE.ReadyState < 4 And IE.Busy 
End Sub

Sub IE_OnQuit
  On Error Resume Next
  WScript.StdErr.WriteLine "IE closed before script finished."
  WScript.Quit
End Sub
Run Code Online (Sandbox Code Playgroud)

Ale*_*lov 2

这是因为 Chrome 不支持 VBScript。请参阅http://productforums.google.com/forum/#!category-topic/chrome/give-feature-feedback-and-suggestions/xHWNXByKdhM

  • 我认为OP想要做类似`WScript.CreateObject("Chrome.Application", "Chrome_")`而不是`WScript.CreateObject("InternetExplorer.Application","IE_")`的事情,而不是使用Chrome来运行这个VBScript (3认同)