InetコントロールでHTTPファイル転送するには？

解決

IRY 2002-07-23 00:36:48 No: 75874

はじめましてＩＲＹと申します。
インターネットトランスファコントロールを使ってＨＴＴＰ接続でファイル転送しようと思っています。
ファイル受信についはわかったのですが
ファイル送信についての方法がわかりません。
どなたかご教授願います。

ファイル受信のソース
            Dim s As String
            Dim strURL As String

            ' この URL は有効な URL であると仮定します。
            strURL = "http://testServer/test.txt"

           s = Inet1.OpenURL(strURL, 0)

           Open "d:\temp\test.txt" For Binary Access Write As #1
           Put #1, , s
           Close #1

とらきち 2002-07-23 04:14:57 No: 75875

受信はそんな面倒な事しなくても
Inet1.Execute "FTP://ftp.microsoft.com", _
"GET Disclaimer.txt C:\Temp\Disclaimer.txt"
の様にすればいいです。（msdnからの引用です）

送信はGETをPUTすればいいです。
詳しくはMSDN LIBRARYのINETコントロールの項目を
読んで下さい。キーワードでINETと打てば引っかかります。

とらきち 2002-07-23 04:17:24 No: 75876

訂正

誤：送信はGETをPUTすればいいです。

正：送信はGETをPUTにすればいいです。

IRY 2002-07-23 17:57:38 No: 75877

とらきちさん、ありがとうございます。
Inet1.Execute "FTP://ftp.microsoft.com", _
"GET Disclaimer.txt C:\Temp\Disclaimer.txt"
でも、これ↑ってＦＴＰ接続なんでしょ？
ＨＴＴＰで実現させたいのですが．．．

IRY 2002-07-23 23:13:34 No: 75878

結局、URLに引数を書いて、ブラウザを起動させることで解決しました。