Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
5755 / 13655 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【49147】WebBrowserコントロールで・・・ さとる 07/5/25(金) 9:53 質問[未読]
【49149】Re:WebBrowserコントロールで・・・ ichinose 07/5/25(金) 10:35 発言[未読]
【49147】WebBrowserコントロールで・・・
質問  さとる  - 07/5/25(金) 9:53 -
引用なし
パスワード
   URLを指定して表示する際に
404NotFoundが帰ってきているかどうかを調べるのには
どのようにしたらいいのでしょうか？
【49149】Re:WebBrowserコントロールで・・・
発言  ichinose  - 07/5/25(金) 10:35 -
引用なし
パスワード
   ▼さとる さん：
おはようございます。

>URLを指定して表示する際に
>404NotFoundが帰ってきているかどうかを調べるのには
>どのようにしたらいいのでしょうか？
いざとなると404NotFoundが再現できないので
確認はしていませんが、NavigateErrorイベントで拾ってもらったらいかがですか？

Private Sub WebBrowser1_NavigateError(ByVal pDisp As Object, URL As Variant, Frame As Variant, StatusCode As Variant, Cancel As Boolean)
　　MsgBox StatusCode & "===" & URL
End Sub
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
5755 / 13655 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free