Selenium Basic VBA ダウンロード先が変更できない
未読分:1件
昨日以降(0) 2日前以降(0) 3日前以降(0) 4日前以降(0) 5日前以降(0)
近田 伸矢, 植木 悠二, 上田 寛
IEのデータ収集&自動操作のプログラミング本はこの1冊だけ!IEの起動やポップアップウィンドウ、表示を制御する基本的なコードはもちろん、テキストボックスやラジオボタン、表、ハイパーリンクなどのHTML部品を制御する方法など、自動操作に欠かせないノウハウを丁寧に解説。
Message#1 2024年4月2日(火)14時03分 From: fujifuji | 返事 削除 変更 |
Selenium Basic VBAの初心者です。 chromeのプロファイルを指定したら ファイルのダウンロード先が変更できないのですが なにかいい方法はございますか? Dim driver As New Selenium.WebDriver Dim myBy As New By Dim siteURL As String Dim elm As Selenium.WebElement Dim sKey As New Selenium.Keys 'プロファイルパスを指定 Dim str As String: str = "C:\Users\" & Environ("USERNAME") & "\AppData\Local\Google\Chrome\test" driver.AddArgument ("--user-data-dir=" & str) driver.AddArgument ("--profile-directory=Profile1") driver.AddArgument "disable-gpu" driver.AddArgument "start-maximized" Dim DL_Path As String: DL_Path = "C:********************************************" 'ファイルのダウンロード先の変更 With driver .SetPreference "download.default_directory", DL_Path 'ダウンロード先の指定 .SetPreference "download.directory_upgrade", True 'ダウロードフォルダアップデート .SetPreference "download.prompt_for_download", False '自動ダウンロード .SetPreference "plugins.always_open_pdf_externally", True End With '指定のURLに移動する siteURL = "http://****************************" Call driver.Start("chrome") driver.Get siteURL 'ファイルのダウンロード Set elm = driver.FindElementByXPath("/html/body/table/*************************************") Call elm.Click driver.Close Set driver = Nothing |
昨日以降 2日前以降 3日前以降 4日前以降 5日前以降