質問をすることでしか得られない、回答やアドバイスがある。

15分調べてもわからないことは、質問しよう!

ただいまの
回答率

87.33%

POST(multipart/form-data)でEXCELファイルをアップロードする【VB.NET】

受付中

回答 1

投稿

  • 評価
  • クリップ 0
  • VIEW 2,416

score 2

前提・実現したいこと

vb.netで、HTTPサーバーにPOST要求を行い、EXCELファイルを指定するURLアップロードしたいと考えています。
この際、ContentTypeは"multipart/form-data"を指定しています。

pdfのアップロードでは上手く行きますが、EXCELでは上手く行かず、躓いています。

発生している問題・エラーメッセージ

上手く行ったpdf用から、EXCEL用に変更するにあたり、以下のようにContent-Typeを変更しました。
"Content-Type: application/vnd.openxmlformats-officedocument.spreadsheetml.sheet"

これでEXCELにも対応できると考えたのですが、エラーとなります。(ソースコードの★ここで例外発生★の箇所)
他にも変更する必要がある箇所があるのでしょうか。
※アップロード先のサーバーからは、エラーコードnullで返ってきます。

該当のソースコード

'送信するファイルのパス
Dim filePath As String = "C:\sample1.xlsx"
Dim fileName As String = System.IO.Path.GetFileName(filePath)
'送信先のURL
Dim url As String = "[送信先のURL]"
'文字コード
Dim enc As System.Text.Encoding = _
    System.Text.Encoding.GetEncoding("UTF-8")
'区切り文字列
Dim boundary As String = System.Environment.TickCount.ToString()

'WebRequestの作成
Dim req As System.Net.HttpWebRequest = _
    CType(System.Net.WebRequest.Create(url), _
        System.Net.HttpWebRequest)
'メソッドにPOSTを指定
req.Method = "POST"
'ContentTypeを設定
req.ContentType = "multipart/form-data; boundary=" + boundary

'POST送信するデータを作成
Dim postData As String = ""
postData = "--" + boundary + vbCrLf +
        "Content-Disposition: form-data; name=""path""" + vbCrLf +
        vbCrLf +
        "[アップロード先のパス]" +
        vbCrLf +
        "--" + boundary + vbCrLf +
        "Content-Disposition: form-data; name=""name""" + vbCrLf +
        vbCrLf +
        "sample.xlsx" +
        vbCrLf +
        "--" + boundary + vbCrLf +
        "Content-Disposition: form-data; name=""file""; filename=""sample.xlsx""" + vbCrLf +
        "Content-Type: application/vnd.openxmlformats-officedocument.spreadsheetml.sheet" + vbCrLf +
        vbCrLf '★ここをEXCEL用のContent-Typeに変更★

'バイト型配列に変換
Dim startData As Byte() = enc.GetBytes(postData)
postData = vbCrLf + "--" + boundary + "--" + vbCrLf
Dim endData As Byte() = enc.GetBytes(postData)

'送信するファイルを開く
Dim fs As New System.IO.FileStream( _
    filePath, _
    System.IO.FileMode.Open, _
    System.IO.FileAccess.Read)

'POST送信するデータの長さを指定
req.ContentLength = startData.Length + endData.Length + fs.Length

'データをPOST送信するためのStreamを取得
Dim reqStream As System.IO.Stream = req.GetRequestStream()
'送信するデータを書き込む
reqStream.Write(startData, 0, startData.Length)
'ファイルの内容を送信
Dim readData(&H1000) As Byte
Dim readSize As Integer = 0
While True
    readSize = fs.Read(readData, 0, readData.Length)
    If readSize = 0 Then
        Exit While
    End If
    reqStream.Write(readData, 0, readSize)
End While
fs.Close()
reqStream.Write(endData, 0, endData.Length)
reqStream.Close()

'サーバーからの応答を受信するためのWebResponseを取得
Dim res As System.Net.HttpWebResponse = _ '★ここで例外発生★
    CType(req.GetResponse(), System.Net.HttpWebResponse)
応答データを受信するためのStreamを取得
Dim resStream As System.IO.Stream = res.GetResponseStream()
'受信して表示
Dim sr As New System.IO.StreamReader(resStream, enc)

試したこと

以下サイトを参考にしています。
POSTでデータを送信する

Content-Typeは、以下を参考にEXCELに対応するものを設定しました。
Content-Type

  • 気になる質問をクリップする

    クリップした質問は、後からいつでもマイページで確認できます。

    またクリップした質問に回答があった際、通知やメールを受け取ることができます。

    クリップを取り消します

  • 良い質問の評価を上げる

    以下のような質問は評価を上げましょう

    • 質問内容が明確
    • 自分も答えを知りたい
    • 質問者以外のユーザにも役立つ

    評価が高い質問は、TOPページの「注目」タブのフィードに表示されやすくなります。

    質問の評価を上げたことを取り消します

  • 評価を下げられる数の上限に達しました

    評価を下げることができません

    • 1日5回まで評価を下げられます
    • 1日に1ユーザに対して2回まで評価を下げられます

    質問の評価を下げる

    teratailでは下記のような質問を「具体的に困っていることがない質問」、「サイトポリシーに違反する質問」と定義し、推奨していません。

    • プログラミングに関係のない質問
    • やってほしいことだけを記載した丸投げの質問
    • 問題・課題が含まれていない質問
    • 意図的に内容が抹消された質問
    • 過去に投稿した質問と同じ内容の質問
    • 広告と受け取られるような投稿

    評価が下がると、TOPページの「アクティブ」「注目」タブのフィードに表示されにくくなります。

    質問の評価を下げたことを取り消します

    この機能は開放されていません

    評価を下げる条件を満たしてません

    評価を下げる理由を選択してください

    詳細な説明はこちら

    上記に当てはまらず、質問内容が明確になっていない質問には「情報の追加・修正依頼」機能からコメントをしてください。

    質問の評価を下げる機能の利用条件

    この機能を利用するためには、以下の事項を行う必要があります。

回答 1

+1

Microsoft のドキュメントによると "重要 新しい開発には HttpWebRequest を使用しないことをお勧めします。 代わりに、System.Net.Http.HttpClient クラスを使用します" とのことです。multipart/form-data 形式にするのも面倒ですし。

HttpClient の利用をお勧めします。具体例は C# ですが以下の記事を見てください。

HttpClient でファイルアップロード
http://surferonwww.info/BlogEngine/post/2019/08/11/file-upload-by-using-httpclient.aspx

【追記】

下のコメント欄で「自分はコードのデバッグはできませんのでピンポイントでの問題点の指摘や解決策の提示はできませんが、ひょっとしたら役に立つかもしれない情報を回答欄に追記しておきます」と書いた件です。

pdfのアップロードでは上手く行きますが、EXCELでは上手く行かず、躓いています。

pdf ファイルは送信できているということですので、excel ファイルも送信はできているのではないかと思います。とすると、問題はサーバー側にあって、サイズの制限に引っかかっているとか、ヘッダー情報(Content-Type とか?)を見て制限をかけているということが怪しそうです。

送信できているかを確認するため Fiddler などのキャプチャツールを使って送信ヘッダとコンテンツを確認してください。

下の画像は、上に紹介した記事のアプリで「アンケート.xlsx」という excel ファイルを HttpWebRequest を利用して送信したときの送信ヘッダとコンテンツを Fiddler でキャプチャしたものです。記事ではコードは省略していますが、内容は質問者さんのものとほとんど同じ dobon.net のサンプルコードを使ってます。

イメージ説明

multipart 内のヘッダーの Content-Disposition, name, filename, Content-Type はコードに書いた通りのものに設定されていて、その下に .xlsx ファイルのバイト列が続いています。

サンプルコードは書き換えてないので Content-Type は image/jpeg のままで .xlsx ファイルの中身と違いますが、送信側の HttpWebRequest はそんなことは関知せず、指定した通りの内容で送信しているのが分かりますか?

質問者さんは Content-Type の設定をファイルの中身に合わせる必要があると考えているようですが、少なくとも送信するための条件にはならず、違っていても送信はされます。

サーバー側では送信されてきたバイト列を見てファイルの種類を判断することはできませんので、ファイルの種類を判断するなら filename の拡張子または Content-Type で判断することになります。

なので、それを見て特定の種類以外は拒否するということはできます。その前に、サイズ制限があってそこで引っかかっていれば拒否されるということがあるかもしれません。

ただ、そういう制限は一切してなくて、アップロードされてきたファイルをそのままサーバー側で保存するということももちろん可能です。以下の画像がその例で、ヘッダの filename に指定された名前「アンケート.xlsx」で保存されています。

イメージ説明

質問者さんがサーバー側も管理しているのであれば、そのあたりも調べてみてはいかがですか。

投稿

編集

  • 回答の評価を上げる

    以下のような回答は評価を上げましょう

    • 正しい回答
    • わかりやすい回答
    • ためになる回答

    評価が高い回答ほどページの上位に表示されます。

  • 回答の評価を下げる

    下記のような回答は推奨されていません。

    • 間違っている回答
    • 質問の回答になっていない投稿
    • スパムや攻撃的な表現を用いた投稿

    評価を下げる際はその理由を明確に伝え、適切な回答に修正してもらいましょう。

  • 2021/02/26 09:30

    SurferOnWwwさん

    詳細に追記いただきありがとうございます。
    送受信についての基本的な理解が足りていない部分がありました。

    >送信できているかを確認するため Fiddler などのキャプチャツールを使って送信ヘッダとコンテンツを確認してください。
    fiddlerで確認したところ、やはり送信自体は出来ており、受信でエラーとなっているようです。

    ご指摘いただきましたように、サーバー側を調べられる範囲で調べたところ、サイズやContent-Typeで制限をかけている箇所はわからなかったため、管理者に問い合わせようと思います。

    キャンセル

  • 2021/02/26 15:49

    > 管理者に問い合わせようと思います。

    何か分かったら情報提供いただけると幸いです。

    キャンセル

  • 2021/03/03 19:47

    問い合わせ結果を書いてください。

    キャンセル

15分調べてもわからないことは、teratailで質問しよう!

  • ただいまの回答率 87.33%
  • 質問をまとめることで、思考を整理して素早く解決
  • テンプレート機能で、簡単に質問をまとめられる

関連した質問

同じタグがついた質問を見る