total = 0
For Each varPosition In List15.ItemsSelected
rstPSN.Seek List15.ItemData(varPosition)
total = total + ListBox15.Column(2, varPosition)
Next varPosition
cnn.CommitTrans
My next question would be is there a way to achieve the same thing so my current provider understands??
I'm not sure, but I think there might be a way of getting a recordset from a SQL server table supporting index, but I don't know how. The general "rule", is that it's normally only achievable on native Access tables (and I think you'd need another cursor than forwardonly, to be able to search from start again - keyset?). I've used either the .Find method or the .Filter property in stead.
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.