asp.net vb.net 上传csv文件 逐行处理

blong

CSVファイルをアップロードして１行ずつ処理

CSVファイルの取り扱いは、アイテムにカンマがあったり、ダブルクォーテーションがあったりするから、結構めんどくさい。
んが。VB.NETにはTextFieldParserというのがあり、これを使うと良いらしい。
Microsoft.VisualBasic.FileIOをインポートする必要あり。

--------------ASP.net+VB.net

Imports System.IO
Imports Microsoft.VisualBasic.FileIO

--------------

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click

If (FileUpload1.HasFile) Then

Dim strItems As String()
Dim st As Stream
Dim enc As Encoding
st = FileUpload1.FileContent
enc = Encoding.GetEncoding("shift_jis")
Dim myReader As New TextFieldParser(st, enc)

myReader.TextFieldType = FieldType.Delimited
myReader.SetDelimiters(",")

While Not myReader.EndOfData

strItems = myReader.ReadFields()
Response.Write(strItems(0) + "<br/>")

End While

End If

End Sub

--------------

<asp:FileUpload ID="FileUpload1" runat="server" />
<asp:Button ID="Button1" runat="server" Text="アップロード" />