runtime error '91'

I need someone's help, I continue to keep the same runtime error '91', when I try to read from a database table into a flexgrid with a data control, can anyone help?

if I'm not mistaken, that error message is usually "object variable or block variable not set" is that what you're getting? try trapping the error using errortrapping and displaying the error message.

also, paste the code that is blowing up on you

Here is the Sub routine where I am getting that error

Private Sub FillArray()

Dim R As Integer

datSum.BOFAction = 1
Do Until datSum.EOFAction = 1
**CustID = datSum.Recordset("CustomerID")
Last = datSum.Recordset("LastName")
First = datSum.Recordset("FirstName")
Discount = datSum.Recordset("((Order_OLD.UnitsSold * Order_OLD.Price) - (Order_OLD.DiscountRate - (Order_OLD.UnitsSold * Order_OLD.Price)))")

Customer(R, 0) = CustID
Customer(R, 1) = Last
Customer(R, 2) = First
Customer(R, 3) = Discount
R = R + 1

datSum.Recordset.MoveNext
Loop

End Sub

At the * is where the error is posted

datSum probably isn't created, or it's not a global object your sub can reference.