Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations SkipVought on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  1. sfrope1

    Code for spacing between same numbers

    They can enter up to as many times in each event as I specify on my form. I just don't want them to end up say number 1,2,3,4,5. I want to specify on my form how far apart to put them, like 1,5,10,15,20.
  2. sfrope1

    Code for spacing between same numbers

    Public Function GenerateRopingOrder(ByVal EventID As Long, ByVal MinSpacing As Long) As Boolean On Error GoTo Err_GenerateRopingOrder Dim UserResponse As Long Dim conn As ADODB.Connection Dim rstRegistration As ADODB.Recordset Dim rstRopingOrder As New ADODB.Recordset Dim SlotCount As Long Dim...
  3. sfrope1

    Code for spacing between same numbers

    I have a code that assigns records in the order the entry to the event comes in. My problem is that if the same person enters 3 times in a row they end up back to back in the event, I would like to have it make them no closer than a number I enter on my Main form. I thought about using random...
  4. sfrope1

    Help with code

    Thank you, that made it work great
  5. sfrope1

    Need help with code

    I have the following code and it works and generates my order, but does not number my roping order correctly. Generally does not begin with one and then I have a duplicate number, say like 2 4's. Is there any way to make this come back starting with 1. Any help would be appreciated: Private...
  6. sfrope1

    Help with code

    I have a code that contains For X = intNumberOfSlots To 1 Step -1 rsExists.Open "SELECT * FROM Registration WHERE EventID = " & Me!EventID & " and RopingOrder = " & X, CurrentProject.Connection, adOpenStatic, adLockReadOnly If...

Part and Inventory Search

Back
Top