Not really sure what you're asking!
Are you looking to select a single record from the 10000?
As long as you have a index on whatever is used as the criteria then select will be as fast as Seek.
Seek is used to find a record within an already opened recordset, which could take a long time to...
Changing sort order usually requires 2 passes:
1. Adjust one or more items to SortOrder +/- 1 between item being moved and item where it is moving to.
2. Adjust the sort order of the moved item to its new position
Something along the lines of:
Function MoveItem(ItemID As Long, CurrentPos As...
Sorry, typo, it should read:
(where one is a parameter)
IE, id you are just incrementing then you do not need the parameter as you can hardcode Sortorder + 1
But, using the parameter you can pass 1 or -1 to increment/decrement with the same statement.
Normally, when changing sort orders you need min and max between which to increment/decrement
Eg, if you have 10 items, and you move item 8 to position 4, then you need to only increment items 4 - 7 (each +1)
If you move item 5 to position 7, you then need to decrement items 6 and 7 by -1
Make...
Really you only need 2 parameters since the amount of increment is always [SortOrder] + 1; one for the ID of the record, and one to mark where to start the increment.
But you can have on for if you are incrementing or decrementing
You could have your query SQL like this:
UPDATE Tender-HeadersQ...
You just have to match to the input type to the return type:
Eg
Public Property Let PropName(NewValue As Long)
' ...
End Property
Public Property Get PropName() As Long
' ...
End Property
' OR:
Public Property Let PropName(NewValue) ' implicit Variant
' ...
End Property
Public...