VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [管理用]

投稿日: 2005/12/22(Thu) 12:56
投稿者kishitatsu
URL
タイトル記事4404参考にてエラーに

kishitatsuと申します。

web上の文字データを取得すべくこちらの過去ログより参考になるコーディング例を
探していますが、記事4404 花ちゃん さんのソースをそのまま実行したところ
以下のエラーとなります。対処方法をご教授お願い致します。

実行時エラー:424 オブジェクトが必要です。

実行環境:WindowsXP SP2
         VB6.0 SP6
--------------------------以下、4404の内容です。
記事No : 4404   [関連記事]
投稿日 : 2005/09/13(Tue) 19:52
投稿者 : 花ちゃん
E-Mail :  
題 名 : Re^4: WebBrowserで画像を表示させない

>  ソースを変更する等の代替案のヒントが載っていたので、その辺についても調べてみます。

ちょっと強引な方法ですが、ただ画像ファイルの種類が多いので!(ごみレスかも)

Private Sub Command1_Click()
    Dim myHtm As String
    WebBrowser1.Navigate "hhttp://www.bcap.co.jp/hanafusa/top.htm"
    
    Do While WebBrowser1.ReadyState <> READYSTATE_COMPLETE
        DoEvents
    Loop
    
    myHtm = WebBrowser1.Document.body.innerHTML
    myHtm = Replace(myHtm, ".gif", "")
    WebBrowser1.Document.write myHtm
End Sub
---------------------------------------


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- VBレスキュー(花ちゃん) - - Web Forum -