Run-time error '91' Object variable or With block variable not set

[machitar]

anyone can help me? Im new to Vb.

----------------------------------
Private Sub LoadTransaction()
Dim lv As ListItem
Me.lsttransaction.ListItems.clear
With Me.adoTransaction.Recordset
.MoveFirst
While Not .EOF
Set lv = Me.lsttransaction.ListItems.add(, , !invoicenumber, , "px")
lv.SubItems(1) = !TotalAmount
lv.SubItems(2) = !AmountTendered
lv.SubItems(3) = !Date
.MoveNext
Wend
End With
Me.adoTransaction.Refresh
end sub
----------------------------------

thanks in advance

[Jx_Man]

Make sure that you've been declared adoTransaction :

Set adoTransaction = New ADODB.Recordset

[faroukmuhammad]

Try http://http://support.microsoft.com/kb/266730