What am I doing wrong?

[AmmerBow]

Everytime i test this code I get this message.
"object variable or with block variable not set"
data1 has been setup with all the right access db settings.
but it is still not working.


Private Sub listviewUpdate()
Dim itmRecord As ListItem

With Data1.Recordset
Do Until .EOF
Set itmRecord = ListView1.ListItems.Add(, , .Fields("ProjName"))
itmRecord.SubItems(1) = .Fields("FirstName")
.MoveNext
Loop
End With
End Sub

[bar]

AmmerBow,

If you are calling your listviewUpdate procedure from the Form_Load event that is the problem, because the data control only initializes after the Form_Load has executed.

What I normally do is to set a boolean variable in the Form_Load event to true, and then run the listviewUpdate in Form_Activate if that variable is true, as well as set the variable back to false, so that the listviewUpdate only runs once.

This should solve your problem.

[AmmerBow]

Doh!
Thank you!