Problem in Reading CSV file

[tumtoo10]

I have a csv file and wish to to load the data into sql server table selectively. I don't want to use the Data transformation service of SQL Server.
Iam using the following code to open the csv file

Dim db As Database
Set db = OpenDatabase("C:\PartUpdate.csv&quot
but it says unrecognised database format. how can i overcome it.
Any other solutions for the above problem.

 

[dinu79]

As CSV format is a Excel file
try to export it in access or use
stream objects to read it from file and pass the data into desired position

 

[BobWman]

Let db define you SQL Server database.

Dim db As Database
Dim strInput As String
Dim varInput As Variant

Open "C:\PartUpdate.csv" For Input As #1
Do While Not EOF(1)
Line Input #1, strInput
varInput = Split(strInput, ",&quot
' varInput(0) contains the first field - save to DB
' varInput(1) contains the second field - save to DB
' Save/Add all fields to DB
Loop
Close #1

 

[petermeachem]

using ado you can open it directly. I would advise you to go and read up on data access techniques first. Try the help file and microsoft site. Peter Meachem
peter@accuflight.com

 

[jbradley]

See article Q262537 in the Microsoft Knowledgebase