|
Post by webagent on Jan 5, 2003 10:32:11 GMT -5
Case "KICK" [i]'get the one who was kicked[/i] strNickWasKicked = Split(strData, " ")(3) If strNickWasKicked = LCase(TheBot.Prop_Nick) Then [i]'close all[/i] AllSocketsDisconnect [i]'get roomname[/i] strchannel = Right$(strData, Len(strData) - InStr(strData, "%#") + 2) strchannel = Left$(strchannel, InStrRev(strchannel, ":") - 2) [i]'get kicker[/i] strNick = Trim(Left(strHost, InStr(strHost, "!") - 1)) [i]'Server2.senddata "Join " & strchannel & vbCrLf 'fMain.WebBrowser1.Refresh[/i] End If
Question, I have browser working together with a second socket connection without getting any freezings.. but, how do I stop it to freeze after I've been kicked?
I tried refresh browser, tried closing all connections.. it's not even that I have to rejoin immediately but how do I stop it to freeze in the first place?
|
|
|
Post by Ñ€çrømåñç€r¹ on Jan 8, 2003 20:59:07 GMT -5
have to code the error handling stuff into server2 data arrival. found similar prob with kicks, bans, auth failed. browser goes batty on those kinds of errors.
|
|
|
Post by andrew on Feb 28, 2003 22:14:05 GMT -5
Case "KICK" [i]'get the one who was kicked[/i] strNickWasKicked = Split(strData, " ")(3) If strNickWasKicked = LCase(TheBot.Prop_Nick) Then [i]'close all[/i] AllSocketsDisconnect [i]'get roomname[/i] strchannel = Right$(strData, Len(strData) - InStr(strData, "%#") + 2) strchannel = Left$(strchannel, InStrRev(strchannel, ":") - 2) [i]'get kicker[/i] strNick = Trim(Left(strHost, InStr(strHost, "!") - 1)) [i]'Server2.senddata "Join " & strchannel & vbCrLf 'fMain.WebBrowser1.Refresh[/i] End If Question, I have browser working together with a second socket connection without getting any freezings.. but, how do I stop it to freeze after I've been kicked? I tried refresh browser, tried closing all connections.. it's not even that I have to rejoin immediately but how do I stop it to freeze in the first place? how do i get to msn chat
|
|
|
Post by Nucleus on Apr 25, 2003 6:25:16 GMT -5
|
|