У вас есть пара других проблем с вашим кодом.Во-первых, вам нужно установить профиль каталога пользователя prior для запуска Chrome.Таким образом, это должно быть установлено перед использованием метода .Get()
.
Кроме того, если вы используете Dim .. As New
в своем объявлении, вам не нужно Set .. = New
позже.
Наконец, вместо использования .SetPreference()
для захвата вашего профиля пользователя, просто используйте .SetProfile()
с persistent:=True
.
И я должен также упомянуть, что вам не нужно включать \Default
в профильэто включается автоматически;и я бы предпочел использовать %USERPROFILE%
вместо жесткого кодирования имени пользователя в пути к файлу.
Dim driver As New ChromeDriver
driver.SetProfile "%USERPROFILE%\AppData\Local\Google\Chrome\User Data", True
driver.AddArgument "--no-sandbox"
driver.Get "https://www.gmail.com/"
Для вашей конкретной проблемы этот код ошибки подразумевает, что вы пропустили необходимыйаргумент..SetPreference
требуется два аргумента:
- Ключ
- Значение
Но вы предоставили только один.