【解決方法】.xlsx と .xls を .csv に変換する VB.NET

プログラミングQA


以下の解決策を参照して、コードを C# から VB に変換しましたが、オブジェクト参照エラーが発生しました。Excel を CSV に変換できるように助けてください。

私が試したこと:

.xlsx と .xls を .csv に変換[^]

Dim Upath As String = "~/Uploads/" + CDate(Today.Date).ToString("yyyyMMdd")
Dim excelPath As String = Server.MapPath(Upath + "/BKP/") + Path.GetFileName(FileUpload1.PostedFile.FileName)
FileUpload1.SaveAs(excelPath)
Dim csvPath As String = Server.MapPath(Upath) + "/" + Path.GetFileNameWithoutExtension(FileUpload1.PostedFile.FileName) + ".csv"
Dim stream As FileStream = File.Open(excelPath, FileMode.Open, FileAccess.Read)
Dim excelReader As IExcelDataReader = ExcelReaderFactory.CreateBinaryReader(stream)
'Dim excelReader As IExcelDataReader = ExcelReaderFactory.CreateOpenXmlReader(stream)
excelReader.IsFirstRowAsColumnNames = True
Dim result As DataSet = excelReader.AsDataSet()
Dim csvdata As String = ""
Dim row_no As Integer = 0
Dim DT As DataTable
DT = result.Tables(0) ''HERE I AM OBJECT REFERENCE ERROR
GridView1.DataSource = DT
excelReader.Close()

解決策 1

著者がサポートできるよう、記事の最後にあるフォーラムに質問を投稿してください。

解決策 2

Dim DT As New DataTable

これを試してみてください。おそらく役立つでしょう。

コメント

タイトルとURLをコピーしました