我需要在CSV文件中添加标题。问题是,我在程序中使用的CSV文件每天都在变化。这就是我的CSV文件的样子:
1/29/2014 12:01AM 1834.854167
1/29/2014 12:02AM 1818.488333
1/29/2014 12:03AM 1802.1225
1/29/2014 12:04AM 1785.756667
1/29/2014 12:05AM 1769.390833
这是我正在使用的代码:
Dim dt As DataTable = GetDataTabletFromCSVFile(CSVdirectory)
Dim connString As String
Dim conn As OleDbConnection
Dim da As OleDbDataAdapter
Dim cmd As OleDbCommand
connString = (Convert.ToString("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=") & BackUpDirectory) + ";Extended Properties='text;HDR=No;FMT=Delimited'"
conn = New OleDbConnection(connString)
conn.Open()
cmd = New OleDbCommand("SELECT * FROM [" + Q12014file + "]", conn)
da = New OleDbDataAdapter(cmd)
dt = New DataTable()
da.Fill(dt)
'Return
conn.Close()
您可能会注意到,由于列名每天都在变化,因此我在查询时没有太多自由。我想在代码正在读取的CSV文件的列中添加标题。请帮忙。