'This method is called once for every row that passes through the component from Input0.
    '
    'Example of reading a value from a column in the the row:
    ' zipCode = Row.ZipCode
    '
    'Example of writing a value to a column in the row:
    ' Row.ZipCode = zipCode
    Public Overrides Sub Input0_ProcessInputRow(ByVal Row As Input0Buffer)
        Dim column As IDTSInputColumn100

        '  If Not Row.SERVER = previousValue Then
        If Not fileWriter Is Nothing Then
            fileWriter.Close()
        End If
        fileWriter = New StreamWriter(targetFolder + fileName + fileCount.ToString() + fileExt, False)
        'fileCount += 1
        'previousValue = Row.SERVER
        'End If

        With fileWriter
            .Write(Row.SERVER + delimiter)
            .Write(Row.STATUS.ToString() + delimiter)
            .Write(Row.OU.ToString() + delimiter)
            .Write(Row.OS.ToString + delimiter)
            .Write(Row.SP.ToString + delimiter)
            .Write(Row.VERSION.ToString() + delimiter)
            .Write(Row.INSERVEROU.ToString + delimiter)
            .Write(Row.DATEADDED.ToString + delimiter)
            .Write(Row.DATECHANGED.ToString() + delimiter)
            .WriteLine()
        End With

        If Not Row.SERVER = previousValue Then
            fileWriter.WriteLine()
            previousValue = Row.SERVER
        End If

    End Sub