clojure - 如何在clj-webdriver中为phantomjs驱动程序设置useragent？

Question

我正在使用clojre和clj-webdriver像这样:

(set-driver! {:browser :phantomjs} "url")

如何设置用户代理？

Answer 1

对于具有PhantomJS支持的clj-webdriver 0.6.1，您可以通过设置功能来实现

(ns site-test
  (:require [clj-webdriver.taxi :refer :all]
            [clj-webdriver.driver :refer [init-driver]])
  (:import (org.openqa.selenium.phantomjs PhantomJSDriver)
           (org.openqa.selenium.remote DesiredCapabilities)))

(System/setProperty "phantomjs.binary.path" "D:/Drivers/phantomjs-1.9.7-windows/phantomjs.exe")

(set-driver!
  (init-driver
      {:webdriver
        (PhantomJSDriver. (doto (DesiredCapabilities.)
                            (.setCapability "phantomjs.page.settings.userAgent", "Mozilla/5.0 (Windows NT 6.1; WOW64; rv:27.0) Gecko/20100101 Firefox/27.0")
                            (.setCapability "phantomjs.page.customHeaders.Accept-Language" "en-US")
                            (.setCapability "phantomjs.page.customHeaders.Connection" "keep-alive")
                            (.setCapability "phantomjs.cli.args" (into-array String ["--ignore-ssl-errors=true"
                                                                                     "--webdriver-loglevel=WARN"]))))}))