Saving Data and Getting First and Last Records?


Author
Message
Terry Bottorff
Terry Bottorff
StrataFrame VIP (1.1K reputation)StrataFrame VIP (1.1K reputation)StrataFrame VIP (1.1K reputation)StrataFrame VIP (1.1K reputation)StrataFrame VIP (1.1K reputation)StrataFrame VIP (1.1K reputation)StrataFrame VIP (1.1K reputation)StrataFrame VIP (1.1K reputation)StrataFrame VIP (1.1K reputation)
Group: Forum Members
Posts: 448, Visits: 12K
I was just trying this simple code and notice in attachment that the only check numbers that got saved are the first and last ones???

I know that the code may not be the best but I could not get getenumerabe to work so I was trying this way.





' Now Add the Check Numbers

If RbStockChecksBO1.MoveFirst Then

For i = 1 To RbStockChecksBO1.Count

Me.RbStockChecksBO1.checknum = nchk

nchk += 1

Me.RbStockChecksBO1.MoveNext()

Next

Me.RbStockChecksBO1.Save()

End If





What am I overlooking? TIA.

Attachments
checknums.png (116 views, 2.00 KB)
GO

Merge Selected

Merge into selected topic...



Merge into merge target...



Merge into a specific topic ID...




Similar Topics

Reading This Topic

Login

Explore
Messages
Mentions
Search