enkel de kolum van het jaartal en niet alles.

[Pilchaar]

hallo,
Nog een klein probleempje heb ik en hoop dat jullie me hiermee kunnen helpen;

Mijn programma leest mijn databank (zonder problemen), hij herkent ook het jaartal (zonder problemen) maar als ik deze wil laten schrijven leest hij enkel de kolum van het jaartal en niet alles.

Dit is de code :

Dim ambulance As DataTable = New DataTable("ambulance")
        Dim i As Integer 'rij
        Dim j As Integer 'kolom
        'Eerste lus: overloop alle rijen
        For i = 0 To DSinventaris448011.Tables(0).Rows.Count - 1
            ambulance.Rows.Add(ambulance.NewRow())
                       'Tweede lus: overloop alle kolommen op deze rij
            For j = 0 To DSinventaris448011.Tables(0).Columns.Count - 1
                'Bij eerste rij de kolomnamen toevoegen
                If (i = 0) Then
                    ambulance.Columns.Add(DSinventaris448011.Tables(0).Columns(j).ColumnName)
                End If
                Dim huidigJaar As Integer = Date.Now.Year
                If ((DSinventaris448011.Tables(0).Columns(j).ColumnName = "HoudsbaarheidsJaar")) Then
                    If (DSinventaris448011.Tables(0).Rows(i)(j) < huidigJaar) Then
                        ambulance.Rows(i)(j) = "Over tijd"
                        ' ambulance.Rows(i)(j) = DSinventaris448011.Tables(0).Rows(i)(j)
                        ' Console.WriteLine(DSinventaris448011.Tables(0).Rows(i)(j))
                    End If
                End If
            Next
        Next
        dgoverzicht.DataSource = ambulance

Als hij dit wilt doen dan geeft hij op de kolom housbaarheidsjaar (indien overtijd) "overtijd aan" maar over heel de rest geeft hij aan (NULL).

IS dit een instelling of een code

 

[huijb]

Topictitel aangepast. "Laatste probleem" zegt niets inhoudelijks over je werkelijke vraag.