如何在带有硒的 vba 中使用 chrome 选项？答案

【问题标题】：How can I use chrome options in vba with selenium?如何在带有硒的 vba 中使用 chrome 选项？
【发布时间】：2017-12-20 16:12:58
【问题描述】：

有什么方法可以在我的 vba 代码中使用那些被注释掉的四行，这样我就可以在进入一些容易收到通知的网页时摆脱障碍。我找不到任何想法，以便我能够利用它们，因为它们现在的状态正在引发错误。这里是。提前致谢。

Sub Test_stth()
Dim driver As New WebDriver

'chrome_options = WebDriver.ChromeOptions()
'prefs = {"profile.default_content_setting_values.notifications" : 2}
'chrome_options.add_experimental_option("prefs",prefs)
'driver = WebDriver.Chrome(chrome_options = chrome_options)

With driver
    .Start "chrome", "https://stackoverflow.com/documentation"
    .get "/documentation"
End With
End Sub

【问题讨论】：

嗨 SMth80！您是否收到运行时错误 0：WebRequestError？
感谢 Tehscript，您的评论。在循环中找到您总是很高兴。实际上，我根本无法运行它们，因为四个注释掉的行中的两行用红色标记。第一个用于花括号，第二个用于点运算符。
忽略这4行会出现什么错误？
完全没有错误。我已经在 vba 中随机使用了 selenium。基本上，我想在我的脚本中使用这四行。有可能吗？
你能解释一下你想如何通过障碍，你究竟需要什么来绕过通知？

标签： vba selenium selenium-webdriver selenium-chromedriver

【解决方案1】：

这是你要找的吗？

With driver
    .SetPreference "profile.default_content_setting_values.notifications", 2 '1 for allow 2 for block
    .Start "chrome", "https://www.facebook.com"
.
.
.

【讨论】：

你是 vba 的精灵，Tehscript。在过去的几个月里，我一直在寻找这种解决方法，但您使用的是单行代码。前几天你给了我另一个关于使用 SendKeys "{end}" 延迟加载网页的解决方案，这仍然是首屈一指的。再次感谢..
最后一件事，关于我在 Dropbox 链接中的脚本中使用的循环，我遇到了另一个问题。那是 x= o 到 50。我随机使用这个数字来获取该延迟加载页面的所有结果，它可以工作，但我想使用该循环而不对任何数字进行硬编码。如果您有时间，我可以创建另一个线程来描述该问题并在此处提供链接。
当然，去吧，等你做完我去看看。谢谢你的好话。
仅供参考：请参阅计算机上 selenium 安装文件夹中的示例。在我这里是 C:\Users\js\AppData\Local\SeleniumBasic\Examples
@jsotola 感谢分享这个。老实说，我从来没有想过我可以在示例中找到我需要的一切。他们应该将其文件夹名称更改为“Usage”之类的名称，以便在我们卡住时引起我们的注意。