file operation

[sj1187534]

Hi...can anyone tell me what is wrong with this function to write data to a file from a datareader??

 

Function WriteCSV(ByRef reader As SqlDataReader)
       Dim strFile As String
       strFile = "D:\CSVData.csv"
       Dim writer As New StreamWriter(strFile, True)
       While reader.Read
           writer.WriteLine(reader(0))
           writer.WriteLine(reader(0))
       End While
       'fs.Close()
   End Function

I am calling this function from here:

 

Dim command As SqlCommand = New SqlCommand("Select * FROM Products", DBConnection)
Dim reader As SqlDataReader = command.ExecuteReader(CommandBehavior.CloseConnection)
WriteCSV(reader)
dgrOut.DataSource = reader
dgrOut.DataBind()

For some reason, the datagrid operations after the WriteCSV()function is called are not executing...

 

Thanks,

SJ

[edit]Please use

 tags [/ vb][/color] [/edit]

Edited June 20, 2003 by Robby

[Robby]

Does it work if you skip this line WriteCSV(reader)?

[sj1187534]

Yes....it works when I dont call the WriteCSV function ..

 

SJ

[Robby]

send it byVal instead of byRef, it should work