Date update

[Debbie]

Hell all.

I am very new to visual basic and am trying to build a module in MS Access.
I am importing a .txt file that is a report and on the top of the report (and
on every page) the date is reflected. If I pull more than one day of
reports, only the most current date is reflected for all rows.

The .txt file is correct. Here is a piece of my code. I want the report
date to be reflected for any data associated with that date. Any ideas where
I am going astray? Tahnk you.

'Get report date
If StrComp(Mid(strFileData, 2, 4), "DATE", vbBinaryCompare) = 0 Then
datReport = Mid(strFileData, 8, 10)
strDate = datReport
Line Input #intInFile, strFileData
End If