WebBrowserに読み込まれたオブジェクトの保存をするには (ID:121218)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 すみません、途中で送信してしまいました というか上のコードは関係ありません Dim Data() as Byte dim fp as integer Data = Inet1.OpenURL("http://?????.gif", icByteArray) fp = FreeFile() Open ファイル名 For Binary Access Write As #fp Put #fp, , Data() Close #fp Webドキュメントの解析ができてるならこれでダウンロードできます