ファイル（画像）をサーバへアップロードしたいのですが (ID:85961)

名前

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

本文 > なかなかご回答がいただけないので、 <form enctype="multipart/form-data"> <p><input type="file"></p> </form> での転送をプログラム的に行うのは、手順が少々面倒なので、 回答を控えていました…。(^^; とりあえず、変換手順については RFC 2388 を参照してみてください。 http://www.ietf.org/rfc/rfc2388.txt http://www.studyinghttp.net/rfc_ja/rfc2388.ja 実際に流れるデータについては、フリーソフトのInetSpy等にて 確認する事ができます。 > 表題の件ですが、ファイル（JPG）をＷＥＢ上のサーバへＶＢでアップしたい > とがんばっています。 アップロード先のサーバー側の設定はどうなっているのでしょうか? 確かに、<input type="file">というHTML要素は用意されていますが、 サーバー側がそれに対応しているかどうかは、別の問題ですよね。 # FTPのみの対応をうたっているサーバーもあるでしょうし。 > HTTP & POST でバイナリファイルを送信することができるのでしょうか？ POST に拘らないのであれば、PUT を使うことはできませんか? たとえば最近の環境ならば、サーバ側がWebDAVに対応している場合、 FileCopy "C:\TEST.JPG", "\\127.0.0.1\folder\test.jpg" のように、普通のネットワーク共有のようにして扱うだけで、 自動的に HTTP PUT にてファイルが送られますよ。 > HTTP & POST でバイナリファイルを送信することができるのでしょうか？ httpでのやり取りを行うのは、XMLHttpRequest (XMLHTTP) を使うのが 簡単です。Microsoft XML Parser を参照設定して、こんな感じですね。 Dim B() As Byte Dim oHttp As XMLHTTP B = 送信データ Set oHTTP = New XMLHTTP40 'MSXML4の場合 XMLHTTP.Open "POST", URL, False XMLHTTP.Send CVar(B) この場合はファイルのバイナリをそのまま送っているだけですが、 必要に応じて、適切なエンコードを施せば、WebDAV も扱えますし、 <input type="file"> 相当の処理にも利用できます。 # 以前、某所に書いたサンプル。 # http://www.users.gr.jp/ml/archive/viewer.aspx?name=vb&no=9563 # WebDAV の例。 # http://support.microsoft.com/kb/296713/ja