VB.NetでHttpを用いて、ログイン認証後、ファイル取得を行う

Question

###前提・実現したいこと
VB.NetでWebシステムとのhttpによるデータ連携を考えております。
データ自体は単純なCSVファイルで、特定のフォルダにあるCSVを取得します。
調査段階なので、Webシステム側のサーバー設定等は全く行っておりません。
サーバー側の設定は問題ないという前提で、教えて頂ければ幸いです。

###発生している問題・エラーメッセージ
エラー自体は発生していないのですが、レスポンスで返ってくるデータが
CSVファイルではなく、htmlが返ってきてしまいます。
おそらく、CSVファイルに到達する前のログイン画面のhtmlが取得されているのだと思います。
サーバーへログイン認証後、特定のフォルダからデータを取得するという流れはどのようにすればよいのでしょうか？

###該当のソースコード

Dim destPath As String = "出力ファイル名"
Dim url As String = "取得したいCSVデータのファイルパス"

'リクエストの作成
Dim webReq As HttpWebRequest = DirectCast(WebRequest.Create(url),HttpWebRequest)

'レスポンスの取得
Dim webRes As HttpWebResponse = DirectCast(webReq.GetResponse(),HttpWebResponse)


'ファイル出力
 Dim st As System.IO.Stream = webRes.GetResponseStream()
 Dim sr As New System.IO.StreamReader(st, System.Text.Encoding.UTF8)
 Dim sw As New IO.StreamWriter(destPath, False, System.Text.Encoding.UTF8)
 sw.Write(sr.ReadToEnd)
 sw.Close()

###試したこと
上記を実行すると、ログイン認証画面のhtmlが取得されてしまうので、上記ソースコードの
「リクエストの作成」「レスポンスの取得」の間に下記のような認証を追加し、
urlも「"取得したいCSVデータのファイルパス"」ではなく「"ログイン画面のパス"」に変更しました。
ですが、仮にこれで認証が成功したとして、この後、実際にファイルを取得する処理は
どのようにコーディングすればよいのでしょうか？

webReq.Credentials = New NetworkCredential("ユーザー名", "パスワード")

###補足情報(言語/FW/ツール等のバージョンなど)
言語：VB.Net

Comments

[KoichiSugiyama]

連携したいWebシステムを全く変更せずに、VB.NETでクライアントアプリを作りたい、という質問でしょうか？それともWebシステム側の開発も含めるという話でしょうか？

[ippe368]

ご返信ありがとうございます。
Webシステム側は全く変更せずに、という前提になります。

Answer 1

こちらにVB.NETからCSV取得のサンプルコードがありますね。

(WebResponse から Stream を取得してテキストファイルに書込みされています)

Webでのファイルのダウンロードについて

ここまではすでに実装されていたため、続きの認証フォームがダウンロード
されてしまう問題については、認証済セッションを継続してダウンロードを
行う必要がありそうです。

C#のWebRequestとWebClientでCookie認証をする方法

上のページに関連する情報がありますが、認証機能を持たない WebRequest 等で
実現するのは、なかなか難しそうです。

方法が大きく変わりますが、認証機能をすでに持っている IEオブジェクト を
VB.NETからコントロールする方がシンプルで簡単かもしれません。

Comments

[ippe368]

御回答ありがとうございます。
紹介頂いたサイトと同じように試しましたが、CSVファイルではなく、手前のログイン画面のhtmlファイルが取得されてしまいます。

[Tipo]

すみません、掲載頂いているコードの続きを見ていませんでした。

ダウンロードには認証済セッションを継続する必要がありそうなので
追記しておきます。

[ippe368]

度々の御回答ありがとうございます。
「認証済みセッションを引き継ぐ」ですね。試してみます。
あくまで、調査段階なので、Tipoさんの御助言を参考に調査を続けてみます。
ありがとうございました。