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]

 

[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