vb.net - 在 VB.Net 中使用 OleDBAdapter 读取 CSV 文件时出错

Question

需要将包含超过 300 万条记录的 csv 文件读入 DataSet。使用 OleDBAdapter 读取 CSV 文件并将整个内容移动到数据集中。

Dim FolderPath As String = Path.GetDirectoryName(FileDetails)
Dim tblCSV As New DataSet

Dim OleDBConnString As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
                                FolderPath & _
                                ";Extended Properties=""text;HDR=Yes;FMT=Delimited"";"

Dim OleDBConn As OleDbConnection

OleDBConn = New OleDbConnection(Trim(OleDBConnString))
OleDBConn.Open()

Dim OleDBAdapater As New OleDbDataAdapter("SELECT * FROM [" & Import_File_Name & "]", OleDBConn)

OleDBAdapater.Fill(tblCSV)

MessageBox.Show(tblCSV.Tables.Item(0).Rows.Count)

标签： vb.netoledbread.csv