hi all,
Im using a integer inside a loop for adding a value via a access database table. bt when i run it i get a added value, if there is few records at the table..if more records it give a error named "overflow"
so i think my integer memory is not enough..pls help me for tht. gv me a idea. thanx..


Dim total As Integer
Dim nn3tmp As Integer
Dim nn3 As String

'opening database and get its values to recSLT3 record set
If recSLT3.RecordCount >= 1 Then
        recSLT3.MoveFirst
Do While Not recSLT3.EOF
        nn3tmp = 0

      If IsNull(recSLT3.Fields("InvNo").Value) = False Then
                nn3 = recSLT3.Fields("Amount").Value

            row_num = row_num + 1

            nn3tmp = CInt(nn3)
            total = total + nn3tmp

        End If
        recSLT3.MoveNext
        Loop
    MsgBox total

End If

Try changing the type of nn3tmp to Float, I believe that's where the overflow is occuring (as I doubt you have more than 2,147,483,648 (top bound of Int data type) rows in the table).

Actually I believe the limit of an Integer is 65535. Try changing to Long instead.

HTH RuralGuy (RG for short) acXP WinXP Pro

You're right, I took that number from an Access help page and not VBA like I should have. Thought it seemed kind of ridiculous for an int size.

Not too rediculous. 2,147,483,647 is actually the max value of a .NET Framework 32-bit integer (System.Int32).

Bob