BNLS Problems >>CUPHEAD I NEED UR HELP!!<<

[R.a.B.B.i.T]

im startin 2 get annoyed with my bot.
i made it in vb6 and it works in everyway.
im using VB6 btw
i load all the config info from the config file in Public Sub Form_Load(), and when the 'Connect' button on the menu is pushed, it does the CleanSlateBot1.Connect, and nothing happens. i followed the .txt and .htm documentations on connecting to BNLS using CleanSlateBot.OCX, and i cant figure out why my bot wont *@&#ing connect
><
any help is greaaaaaaaaaaaaaaaaaaaaaaaaaaatly appreciated in every way shape and/or form.

plz help...im desperate!

ps: it debug into, debug over, runs, runs with full compile, and makes with >>NO<< errors whatsoever

[______]

1.)  
2.) You using a Valid BNLS ID / Pass?
3.) Do u have the Correct Accept Value?  (579728)
4.) Does any Error's happen?

[hismajesty]

did you try this when bnet was down for maintence?

[R.a.B.B.i.T]

1)  
2) yes, either skywing or yoni gave it 2 my co-botmaker
3) maybe... ill check
4) no

i been tryin since it came online
its odd....

[R.a.B.B.i.T]

3) yes its correct
the problem is that once i hit connect, nothing happens, and i cant figure it out...its not like the bot freezes though...

[drivehappy]

Place a debug.print or msgbox under the CSB events.

[______]

Your account might not be active on bnls yet or you might of placed cleanslatebot1.connect under the wrong button/command. Did you add the addtext function to the procedures like  

Code Select Expand


addtext vbwhite, "connecting to battle.net."


[R.a.B.B.i.T]

Code Select Expand


Private Sub BnetConnected()
   AddChat vbGreen, "Connected to Battle.Net!" & vbNewLine
End Sub

Private Sub BnetConnecting()
   AddChat vbYellow, "Connecting to Battle.Net..." & vbNewLine
   rtbChat.Text = "Connecting, the damned bot don't even work!" 'i added this in to see if it would display, but ALAS!
End Sub

Private Sub BnetDisconnected()
   AddChat vbRed, "Disconnected from Battle.Net!" & vbNewLine
   Form1.lvChannel.ListItems.Clear
End Sub

Private Sub BnetError(ErrorNumber As Integer, Description As String)
   AddChat vbRed, "Battle.Net Error " & ErrorNumber & ":" & vbNewLine, _
           vbBlue, Description & vbNewLine
End Sub

and so on and so forth.....
Debug.Print isnt doing anything...is ther any special way i should set it up?
i dont think it has anything to do with BNLS itself though....i mean...my bot doesnt do the AddChat commands associated with BNLS...im really confused

[drivehappy]

Try adding them into BNLSConnect, Connecting, any error handling events, disconnects. What this will do is narrow it down to one problem and then you can find the solution.

[Camel]

Code Select Expand


Private Sub BnetConnected()
   AddChat vbGreen, "Connected to Battle.Net!" & vbNewLine
End Sub

Private Sub BnetConnecting()
   AddChat vbYellow, "Connecting to Battle.Net..." & vbNewLine
   rtbChat.Text = "Connecting, the damned bot don't even work!" 'i added this in to see if it would display, but ALAS!
End Sub

Private Sub BnetDisconnected()
   AddChat vbRed, "Disconnected from Battle.Net!" & vbNewLine
   Form1.lvChannel.ListItems.Clear
End Sub

Private Sub BnetError(ErrorNumber As Integer, Description As String)
   AddChat vbRed, "Battle.Net Error " & ErrorNumber & ":" & vbNewLine, _
           vbBlue, Description & vbNewLine
End Sub

and so on and so forth.....
Debug.Print isnt doing anything...is ther any special way i should set it up?
i dont think it has anything to do with BNLS itself though....i mean...my bot doesnt do the AddChat commands associated with BNLS...im really confused

Why are those plain private subs? Shouldn't they be events of CSB?

[______]

You should put the addchat in the cleanslate bot events

[R.a.B.B.i.T]

i dont follow...

[______]

like

Code Select Expand


Private Sub CleanSlateBot1_BnetConnected()
   
Addtext vbGreen, "Connected to Battle.net"
End Sub

if you dont know how to go under events on an object , go away

[Eternal]

+1 for the directness of that comment.

[R.a.B.B.i.T]

ahhh a stupid oversight of me...i didnt read some of the posts...or maybe it was the lack of sleep...
:O ill try the CleanSlateBot1_event thing now...

oooo thers an error:
Procedure declaration does not match description of event or procedure having the same name

:O
it highlights:

Code Select Expand

Private Sub CleanSlateBot1_FlagsUpdate(Username, Flags, Message, Ping, SimulatedEvent)
imma try workin on it but plz feel free to lend me some advice