VBAでIEを起動し、キャッシュを読み込んでしまい、正常な動作がしない為、
キャッシュを削除したい時があります。
IEのキャッシュをクリアするサンプルコード
'■Internet Explorerのクッキー情報をクリアするサンプルコード Public Function Call_sample_Delete_Cookie() Dim objIE As Object '■IEを起動→表示 Set objIE = CreateObject("InternetExplorer.Application") objIE.Visible = True '■インターネット一時ファイルおよびWebサイトのファイルを削除 Shell "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 8" '■クッキーとWebサイトのデータを削除 Shell "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 2" '■履歴を削除 Shell "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 1" '■フォーム データを削除 Shell "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 16" '■パスワードを削除 Shell "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 32" '■上記までの全てのデータを削除 Shell "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 255" '■上記までの全てのデータ+アドオンによって設定された情報も含め全て削除 Shell "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 4351" End Function
その他
定数 | 意味 |
8 | インターネット一時ファイルおよびWebサイトのファイル |
2 | クッキーとWebサイトのデータ |
1 | 履歴 |
16 | フォーム データ |
32 | パスワード |
255 | 上記をまとめてクリア |
4351 | 上記をまとめてクリア+アドオンによって格納されたファイル |
その他
Internet Explorerを使用して、Webスクレイピングは敷居が高い風に捉えられますが、
上記のように、パーツ化して組み合わせ処理するだけです。
Web上のデータを触りたい要望は会社様でも個人様でも多いと思います。
VBA IE操作を覚えて効率化しませんか?
作成が大変であれば弊社で代行開発も可能です。お気軽にお問い合わせください。
コメント