SeleniumBasic TimeoutsClass　ドライバーのタイムアウト設定

2023年3月23日2023年8月6日

リファレンス

概要

ドライバーのタイムアウト設定用クラスの解説です。ブラウザのタイムアウト設定ではありません。基本的にドライバー配下で利用しますので、宣言で「New」は利用しません。

オブジェクト設定

・変数宣言

Dim Timeout As Timeouts

・親クラス：WebDriver

文法

Set Timeout = driver.Timeouts
Timeout.[プロパティ]

メソッド・プロパティ

プロパティ

スクロールできます

Name	解説	ShortExample
ImplicitWait	コマンド完了までドライバーが待機する時間を設定（デフォルト値：3000）Driver.Getの前に設定	Timeout.ImplicitWait = 8000
PageLoad	ページ読込みの待機時間（デフォルト値：60000）	Timeout.PageLoad = 50000
Script	ドライバーの非同期スクリプト待機時間（デフォルト値：15000）	Timeout.Script = 50000
Server	Webサーバーの応答をドライバーが待機する最大時間（デフォルト値：90000）	Timeout.Server = 150000

※Short Exampleは、動作確認ができたコードを記載しています。

Example

TimeoutsCls_Default

Sub TimeoutsCls_Default()
    Dim Driver As New ChromeDriver
    Dim Cap As Dictionary
    Driver.Get "https://ja.wikipedia.org/wiki/"
    Debug.Print "Default"
    Debug.Print " " & "implicit: " & Driver.Timeouts.ImplicitWait  '3000
    Debug.Print " " & "pageLoad: " & Driver.Timeouts.PageLoad '60000
    Debug.Print " " & "script: " & Driver.Timeouts.Script '15000
    Debug.Print " " & "Server: " & Driver.Timeouts.Server '90000    
    Driver.Quit
End Sub

Use_TimeoutsCls_Setting

Sub Use_TimeoutsCls_Setting()
    Dim Driver As New ChromeDriver
    Dim Cap As Dictionary
    Dim Timeout As Timeouts
    Set Timeout = Driver.Timeouts
    Timeout.ImplicitWait = 8000
    Timeout.PageLoad = 50000
    Timeout.Script = 50000
    Timeout.Server = 150000
    Driver.Get "https://the-internet.herokuapp.com/javascript_alerts"
    Debug.Print "Setting Timeout"
    Debug.Print " " & "implicit: " & Driver.Timeouts.ImplicitWait
    Debug.Print " " & "pageLoad: " & Driver.Timeouts.PageLoad
    Debug.Print " " & "script: " & Driver.Timeouts.Script
    Debug.Print " " & "Server: " & Driver.Timeouts.Server
    Driver.Quit
End Sub

SeleniumBasic Classリファレンス

よかったらシェアしてね！