Visual Basic Editor Newb

[Debbie]

Hello all.

Here's the scenario. I have a report that I export as a .txt file from an
archive. I built a module in MS Access to import the data that I need into a
table. The report is on average about 3,000 pages. Each page has the report
date at the top and several rows of data. Everything is working fine except
that if I export more than one date to .txt and then use the MS Access module
to import, the date column only reflects the current date for all rows in the
table. For example I pulled in reports for 11/02 and 11/03, although all of
the data imported correctly, the date reflects 11/03 for every row, even the
data from 11/02.

What am I doing incorrectly? Here is a snap shot of my VSE code

'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

thank you for your help.