Seleniumを使って起動済みのMicrosoft Edgeを制御するPowerShellスクリプト 関連Tweet：https://twitter.com/kinuasa/status/1427151324328562689

Seleniumを使って起動済みのMicrosoft Edgeを制御するPowerShellスクリプト.ps1

# ※ [ --user-data-dir ]と[ --remote-debugging-port ]を付けて事前にEdgeを起動
#  "C:\Program Files (x86)\Microsoft\Edge\Application\msedge.exe" --user-data-dir="C:\Test\Edge\Profile" --remote-debugging-port=9222 "https://www.ka-net.org/blog/"
# ※ [ edge://version ] の「コマンドライン」でオプション確認可能
# 
# Microsoft Edge ドライバー：https://developer.microsoft.com/ja-jp/microsoft-edge/tools/webdriver/
# Selenium.WebDriver：https://www.nuget.org/packages/Selenium.WebDriver/
# 
# 動作確認：
#   Microsoft Edge バージョン 103.0.1264.49 (公式ビルド) (64 ビット)
#   Selenium.WebDriver 4.3.0
#

[void][Reflection.Assembly]::LoadFile("C:\System\Lib\WebDriver.dll") #DLL読み込み
$msedgedriverDir = "C:\System\Driver\Edge" #Edge Driverがあるフォルダのパス
$msedgedriverExe = "msedgedriver.exe" #Edge Driver名
$edgeOptions = New-Object OpenQA.Selenium.Edge.EdgeOptions
$edgeOptions.DebuggerAddress = "127.0.0.1:9222" #ポートを指定してアタッチ
$service =  [OpenQA.Selenium.Edge.EdgeDriverService]::CreateDefaultService($msedgedriverDir, $msedgedriverExe)
$driver = New-Object OpenQA.Selenium.Edge.EdgeDriver($service, $edgeOptions)

#以降ブラウザー操作
$driver.FindElement([OpenQA.Selenium.By]::Id("s")).SendKeys("Microsoft MVP")
$driver.FindElement([OpenQA.Selenium.By]::Id("searchsubmit")).Submit()