Visual Basic - String Split -> Array -> Datatable

09/03/2012 09:28 Ravenstorm#1
Hallo Leute,

ich benötige Hilfe mein Array in eine Datatable zu schreiben

Mein Code

PHP Code:
 For Each oFile In oFiles


            aryTextFile 
oFile.Name.Split("_")
            
'oFile.ToString()


            For i = 0 To aryTextFile.Length - 1
                dr = datatable.NewRow
                For j = 0 To datatable.Columns.Count - 1
                    dr(j) = aryTextFile(i)
                Next j
            datatable.Rows.Add(dr)
            Next i



            DataGridView1.DataSource = datatable
            DataGridView1.Refresh()

        Next 
Also ich splitte erst einmal einen String der dieses Format hat:

04.06.12_Armin Seidling_Status_Betreff_Inhalt

Das Problem ist, er zeigt mir die Tabelle dann im Endeffekt nicht so an:

04.06.12Armin SeidlingStatusBetreffInhalt

sonder so:

04.06.1204.06.12
Armin Seidling Armin Seidling
Status Status
Betreff Betreff
Inhalt Inhalt

Ich bitte um Hilfe.
09/03/2012 12:43 Kunde666#2
Du hast ne for-schleife zuviel...
versuchs mal damit
Code:
 For Each oFile In oFiles

            aryTextFile = oFile.Name.Split("_")
            oFile.ToString()
	    dr = datatable.NewRow
            
	For i = 0 To aryTextFile.Length - 1                
                    dr(i) = aryTextFile(i)
        Next i

    	    datatable.Rows.Add(dr)
            DataGridView1.DataSource = datatable
            DataGridView1.Refresh()

        Next
09/03/2012 13:04 Ravenstorm#3
Quote:
Originally Posted by Kunde666 View Post
Du hast ne for-schleife zuviel...
versuchs mal damit
Code:
 For Each oFile In oFiles

            aryTextFile = oFile.Name.Split("_")
            oFile.ToString()
	    dr = datatable.NewRow
            
	For i = 0 To aryTextFile.Length - 1                
                    dr(i) = aryTextFile(i)
        Next i

    	    datatable.Rows.Add(dr)
            DataGridView1.DataSource = datatable
            DataGridView1.Refresh()

        Next
Danke, damit gehts auch (Habs dann im Endeffekt genau so wie du geschrieben gehabt.), habe den Fehler dann ja auch schon gefunden.

Für alle die dann noch eine andere Lösung sehen wollen.

Code:
            For i = 1 To oFile.Name.Length - 1

                currentLine = goo.Replace(".txt", "").Split("_")
            Next

            datatable.Rows.Add(currentLine)
            DataGridView1.DataSource = datatable
            DataGridView1.Refresh()