Trying to use DateDIff and or ISDate

[Cien]

I am using Vb.net. I need to look a records in a random access file that are as old(or past due) as the number I input in my textbox and then display the records in a listbox.

Here is the code I have so far:

Dim intNum as integer
Dim strDate as date
Dim intDays as integer

intDays = Val(me.textbox.text)

FileOpen

Do until EOF
FileGet(1, udtData.Date, 1)
strDate = udtData.Date
intNum = DateDiff(Interval , strDate, today)
If intNum = intDays then
    me.listbox.items.add(udtData.Name, udtData.Date)
End if
Loop

FileClose

 

[Machaira]

So whats the problem?

 

[Cien]

Getting on error on line:

strDate = udtData.Date


I dont have it in front of me now but I think its a "type of string" error message.