Skip to content

Instantly share code, notes, and snippets.

@jskripsky
Created July 28, 2014 05:54
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save jskripsky/82894fd0a6b46f26d9fd to your computer and use it in GitHub Desktop.
Save jskripsky/82894fd0a6b46f26d9fd to your computer and use it in GitHub Desktop.
#r "WebDriver.dll"
open OpenQA.Selenium
open OpenQA.Selenium.Firefox
open OpenQA.Selenium.Chrome
use driver = new FirefoxDriver ()
let nav = driver.Navigate ()
nav.GoToUrl "http://www.hsr.ch/"
let el = driver.FindElement (By.Name "q")
el.SendKeys "Hochschule Rapperswil"
element.Submit ()
printfn "Page title is: %s" (driver.Title)
driver.Quit ()
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment