Parsing *.csv with ADO?

  • Thread starter Thread starter Joe Duchtel
  • Start date Start date
J

Joe Duchtel

Hello -

I need to parse a *.csv file without much effort so I wanted to use an
ADO. I have done that successfully to read from an Excel file
(Extended Properties="Excel 8.0;HDR=NO") but somehow I cannot figure
out *.csv files.

Here is what I have ...

Dim lFileName As String = "C:\"

Dim lConnection As New ADODB.Connection

lConnection.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;"
"Data Source=" & lFileName & ";" & "Extended Properties=Text;"

lExcelConnection.Open()

The problem is that I cannot specify a file name ABC.csv without
getting an exception of 'C:\ABC.csv is not a valid path.'.

How do I access the data in the *.csv file?

I used the following for Excel but since I use Extended
Properties=Text, I assume I need to do something differently?

Dim lRBTQuery As String = "SELECT * FROM [Sheet1$A1:C1]"
Dim lADORecordSet As New ADODB.Recordset
lADORecordSet.Open(Source:=lRBTQuery, ActiveConnection:=lConnection)

How can I read all lines of the *.csv file?

Any suggestions?

Thanks,
Joe
 
Joe,

I am not sure if this is what you mean, however this is a quiet standard
method to use a csv file as a table in Net.

http://www.vb-tips.com/CSVDataSet.aspx

Your equivalent of the recordset is in this case ds.Tables(0)

I hope this is what you need

Cor




Hello -
Click to expand...
I need to parse a *.csv file without much effort so I wanted to use an
ADO.  I have done that successfully to read from an Excel file
(Extended Properties="Excel 8.0;HDR=NO") but somehow I cannot figure
out *.csv files.
Click to expand...
Here is what I have ...
Click to expand...
Dim lFileName As String = "C:\"
Click to expand...
Dim lConnection As New ADODB.Connection
Click to expand...
lConnection.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;"
"Data Source=" & lFileName & ";" & "Extended Properties=Text;"

The problem is that I cannot specify a file name ABC.csv without
getting an exception of 'C:\ABC.csv is not a valid path.'.
Click to expand...
How do I access the data in the *.csv file?
Click to expand...
I used the following for Excel but since I use Extended
Properties=Text, I assume I need to do something differently?
Click to expand...
Dim lRBTQuery As String = "SELECT * FROM [Sheet1$A1:C1]"
Dim lADORecordSet As New ADODB.Recordset
lADORecordSet.Open(Source:=lRBTQuery, ActiveConnection:=lConnection)
Click to expand...
How can I read all lines of the *.csv file?
Click to expand...
Any suggestions?
Click to expand...
Thanks,
Joe- Hide quoted text -
Click to expand...

- Show quoted text -
Click to expand...

Hello -

This is great ... works beautifully!

Thanks a lot,
Joe
 
Back
Top