tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
[ツリー表示へ]  [ワード検索]  [Home]

タイトル Re^6: ホームページの保存をしたい
投稿日: 2008/02/10(Sun) 18:37
投稿者Do_Shirouto
> > Learning Editionです。
>
> No.169 の方を使って見て下さい。
>
> 又は、VB のProfessional Edition 以上を使うとか。
花ちゃんさん色々有難う御座いました。
MSINET.Ocxなどダウンロードしても上手くいかず。
(Inet1.がフォームに張り付かない)
そのかわりサンプルソフトが見つかり、
コードの内容は私には理解できませんが、
下記でやってみます。
'-----------------------------------
Private Sub Command1_Click()
Dim FilePath As String
FilePath = "E:\Sample6.mht"

With CreateObject("InternetExplorer.Application")
    .Visible = False
    .Navigate "URL"
End With
      
    Dim O As Object
    Set O = CreateObject("CDO.Message")
    O.CreateMHTMLBody "URL"
    O.GetStream().SaveToFile FilePath
    End
    
End Sub
'------------------------------------------------
ただ上書き保存が出来ないようです。
本当に有難う御座いました。

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

古いスレッドにレスはつけられません。