Hi Evreybody! I'm just wonderin' why this code is not working the way I'd like.

Code:
Grid.Col = 0
        For i = 0 To rs.RecordCount - 1
            Grid.Row = i
            Grid.Text = EfectiveDate(Grid.Text)
        Next i



In Grid.Text I have a date and time in this format: "23/05/00 07:00:00 p.m.", and the function EfectiveDate would change it to "23/05/2000 19:00". However, I don't know why, but it actually reads all the records, but writes the "edited" date/time in the first row. Does anybody knows how to force the writing in each "new row"??