Datagridview naar csv

Status
Niet open voor verdere reacties.

old Hippy

Gebruiker
Lid geworden
24 mei 2008
Berichten
911
Hallo allemaal

Met de onderstaande code schrijf ik mijn datagrid naar een csv file.
dit werkt prima.
wat ik wil is dat er eerst de colomteksten worden geschreven.
Deze zijn altijd het zelfde Woonplaats, postcode, straat, HuisNo,
iemand die mij hier mee kan helpen?


Code:
 Private Sub SaveGridDataInFile(ByRef fName As String)
        Dim I As Integer = 0
        Dim j As Integer = 0
        Dim cellvalue$
        Dim rowLine As String = ""
        Try
            Dim objWriter As New System.IO.StreamWriter(fName, True)

            For j = 0 To (PostcodeDataGridView.Rows.Count - 2)
                For I = 0 To (PostcodeDataGridView.Columns.Count - 1)
                    If Not TypeOf PostcodeDataGridView.CurrentRow.Cells.Item(I).Value Is DBNull Then
                        cellvalue = PostcodeDataGridView.Item(I, j).Value
                    Else
                        cellvalue = ""
                    End If

                    rowLine = rowLine + cellvalue + ","
                Next
                objWriter.WriteLine(rowLine)
                rowLine = ""
            Next

            objWriter.Close()

            MsgBox("Text written to file")

        Catch e As Exception

            MessageBox.Show("Error occured while writing to the file." + e.ToString())

        Finally
            FileClose(1)
        End Try
    End Sub
 
je kunt die toch via een string meegeven voor je "for" lus?

rowline = "Woonplaats,postcode,straat,HuisNo"
objWriter.WriteLine(rowLine)
rowLine = ""
for j= .....
 
Hi Bedankt wampier

HET WERKT

Je moet er maar opkomen.
Hartelijkdank Old Hippy
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan