NEED SERIOUS HELP

Discussion in 'Code Snippets and Tutorials' started by the_skip, Mar 14, 2007.

  1. the_skip

    the_skip Level IV

    Joined:
    Dec 25, 2006
    Messages:
    2,354
    Likes Received:
    1
    Location:
    Indiana
    I SWEAR TO GOD MY USAB HATES ME
    I have a couple check codes and guess what
    THEY SKIP OVER IT
    here are my code
    Code (Text):
    1. If bolstop = true Then
    2. exit sub
    3. Dim strHTML As String
    4. intrefresh = intrefresh + 1
    5. lstResults.AddItem "Number of Refreshes" & intrefresh & " yup"
    6. If intrefresh > Val(txt20.Text) Then
    7. lstResults.AddItem "Wating 20 seconds to prevent banning)"
    8. SecondsToWait (20)
    9. Call Buy
    10. ElseIf intrefresh > Val(txtstop.Text) Then
    11. lstResults.AddItem "Ending program Reached max refreshes"
    12. Exit Sub
    13. End If
    14. If bolstop = True Then
    15. lstResults.AddItem "Program Stopped"
    16. Exit Sub
    17. End If
    I have a few calls to this procedure called buy which this is the code
    IF YOU HELP ME YOU WILL BE ABLE TO BETA THIS PROGRAM AKA JOKER USAB
    also ricky could you send over the better auth code
     
    #1 the_skip, Mar 14, 2007
  2. ricky92

    ricky92 Administrator
    Staff Member

    Joined:
    Nov 10, 2006
    Messages:
    1,866
    Likes Received:
    67
    Make bolstop public and in the Form_Load sub use the declaration:
    Code (Text):
    1. bolstop = False
    And for the Auth code, I'll PM you ;)
     
    #2 ricky92, Mar 14, 2007
  3. the_skip

    the_skip Level IV

    Joined:
    Dec 25, 2006
    Messages:
    2,354
    Likes Received:
    1
    Location:
    Indiana
    I will change it
    edit: when I change to pbulic I get this invalid atribute in sub or function
    edit2: Now it works seeing if it is affected
    edit3: Thank you so much
     
    #3 the_skip, Mar 14, 2007