Public Sub ReadWebLog()
Dim intFNum As Integer
Dim strRData As String
Dim lstItem As ListItem
Dim tdDate As Date
Dim tdTime As Date
Dim strWebsite As String
Dim blnBlocked As Boolean

intFNum = FreeFile

Open (App.Path & "\WebLog.dat") For Input As #intFNum

Do Until EOF(intFNum)

Input #intFNum, tdDate, tdTime, strWebsite, blnBlocked

Set lstitm = frmWebsiteLog.lstvWebLog.Add(, , tdDate)
lstitm.ListSubLists(1).Text = tdTime
lstitm.ListSubLists(2).Text = strWebsite
lstitm.ListSubLists(3).Text = blnBlocked
Loop


Close #intFNum
End Sub

This code does not read from a comma-delimited file. I want to read this data into a listview control. It tells me .Add is not a method or anything, I don't know how to add this data to a litview contro. Can anyone help?!