VB Fundamental to Build Nimbuzz Flood Application
To ease understanding how to build nimbuzz flood application based on VB programming languages, you may download a compressed file that containing VB-Form1 here immediately .
You need to know that the script code Form1 is still empty. But do not worry, here I will explain it one by one, row by row. Not only you can copy it to your Form1 script code, but you should try to understand the meaning of that script.
Now, lets check it out !
1. Declaration of the function below is useful for creating random characters.
Public Function RandomString(ByVal length As Long) As String
Dim charset As String
charset = "1234567890abcd"
Dim chars() As Byte, value() As Byte, chrUprBnd As Long, i As Long
If length > 0& Then
Randomize
chars = charset
chrUprBnd = Len(charset) - 1&
length = (length * 2&) - 1&
ReDim value(length) As Byte
For i = 0& To length Step 2&
value(i) = chars(CLng(chrUprBnd * Rnd) * 2&)
Next
End If
RandomString = value
End Function
To obtain a variable that contains random characters based on functions above, we simply write the following script:
Dim tag_id as string
tag_id=RandomString(7)
It means, we’ll get a string variable names “tag_id” that contains 7 random char. The string may contain one of “1”,”2”,”3”,”4”,”5”,”6”,”7”,”8”,”9”,”0”, “a”, “b”, “c”, or “d“ . In this case, it can be useful to generate xml tags id like :
"<message type='groupchat' id='" & "bawor" & RandomString(7) & "' to='" & txtsubject & "'><body> Your_Message_Here </body></message>”
2. To customize speed of your flood, by changing Combo1 value, it will change Timer1 interval as well.
Private Sub Combo1_Click()
Timer1.Interval = Combo1
End Sub
3. Click event on Label6 will display a PopUp Menu names jnsKlikKanan
Private Sub Label6_Click()
PopupMenu jnsKiriman
End Sub
This PopUp Menu contains sub menus, such as : mnLogin, mnLogout, cmdOneTime, cmdkontinyu, mnStop, mnStartPing, mnStopPing, and mnClosed
4. If mnClosed have been clicked, Form1 will be unloading
Private Sub mnClose_Click()
Unload Me
End Sub
5. When Form1 unloaded, Timer1, Timer2 will stop, and Winsock1 connection will close.
Private Sub Form_Unload(Cancel As Integer)
Timer1.Enabled = False
Timer2.Enabled = False
Winsock1.Close
End
End Sub
6. Click on sub menu named mnLogin, if all columns that we need have been already filled data, it will open Winsock1 connection with a server, and locks all Nimbuzz ID fields as well. And sovereign, when one of columns has not been filled, it will appear a message containing a warning.
Private Sub MnLogin_Click()
If MnLogin.Caption = "Login" Then
If txt_User1 = "" Or txt_Password1 = "" Or txt_Resources1 = "" Then
Dim pesan1 As String
pesan1 = MsgBox("Fill your Nimbuzz ID (without @nimbuzz.com), password, and your resources first", vbOKOnly + vbInformation, " Warning..")
Else
MnLogin.Caption = "Cancel"
txt_User1.Locked = True
txt_Password1.Locked = True
txt_Resources1.Locked = True
Winsock1.Connect
End If
Else
Winsock1.Close
Timer1.Enabled = False
MnLogin.Caption = "Login"
Text2.Locked = True
End If
End Sub
7. If the submenu mnLogout is clicked, Winsock1’s connection will be disconnected, and it will unlock all Nimbuzz ID fields
Private Sub mnLogout_Click()
Timer1.Enabled = False
Timer2.Enabled = False
Winsock1.Close
mnSend.Enabled = False
mnPingServer.Enabled = False
MnLogin.Enabled = True
mnLogout.Enabled = False
Text2.Locked = True
txt_User1.Locked = False
txt_Password1.Locked = False
txt_Resources1.Locked = False
Label5 = 0
mnStopPing.Enabled = False
mnStartPing.Enabled = True
End Sub
READ MORE <<
Like this:
This entry was posted on 8 March 2011 at 11:41 am and is filed under Go Blog ! with tags Error Flood, Flood, Flood Baru, Flood DC, Free Download, Freeware, Make Flood With VB, New Nimbuzz Flood, Nimbuzz, Nimbuzz Flood, Nimbuzz Flooding, Pemrograman, Source Code, Source Code of Nimbuzz Flood, Tips and Trick Nimbuzz, VB Sample Code, VB Script, Visual Basic, XML Script. You can follow any responses to this entry through the RSS 2.0 feed You can leave a response, or trackback from your own site.
8 March 2011 at 3:38 pm
Hwaduh, kang! Pening pala gw ngartiinnya nih. Ha.. Ha.. Ha
13 March 2011 at 8:25 am
Siipp
13 March 2011 at 8:14 pm
Wong edann… Plud komentar ki jenenge..
:D:D:D:D
19 March 2011 at 6:41 am
kirim vidio nya dong gang cara buat nya ni email ku siwowasis@yahoo.com
kepinging belajar ni,,,,,,,,,,,,,,,,,,
24 March 2011 at 6:47 pm
Nyimak dulu ah…..otak gw blum nyampe……..:lol:
24 March 2011 at 9:45 pm
Mangkanya otak taruhnya di atas (pala) jangan di bawah (mo bilang dengkul gak tega). Wkwkwk..
25 March 2011 at 7:11 am
vidio nya mn,,,,
25 March 2011 at 10:53 pm
Kangdarmo: asem sampean…:lol:
sebtlnya smua tu gampan dan bisa.tp satu yaitu MALAS.
ini lho kang melawan cr malas yg sulit
.he.he.he.he
siwo: *ermm* dr tngal 19 minta video.pv gw dul wa kasih film ehek ehek.:Dwkwkwkwk kiding
26 March 2011 at 9:15 am
@siwo, belum sempat bikinnya, bro. sementara pv adit aja dulu, minta video ehek – ehek bwat gantiin belajar vb-nya. wkwkwkwk
26 March 2011 at 8:38 pm
Kang darmo:
wkwkwkwkwk ..huum siwo mari:D Ni video ku bnyk
boh kang TOPIK ini aku angkt tangan:-D
4 April 2011 at 12:26 am
ndelok wae….
heheheh,ngerti dadi
13 April 2011 at 12:17 am
Kang,siwo minta bikinin video flood ehek-ehek dr VB tuh.. Wkwkwk
18 April 2011 at 6:08 pm
waduh, kok jurusane malah maring babagan pakenthon ?@#$@#%$!$^%!@!
31 May 2011 at 11:19 pm
tell in english and also tell wt ti draw
10 June 2011 at 11:53 pm
nice kang..
..mw tanya donk..
kalo d vb6 kan itu proses koneknya ada d winsock data arrival.. karna pke winsock
nah kalo d .NET itu pke apa kang??
bisa d kasih contoh projectnya ga kang
thanks
23 June 2011 at 2:24 pm
http://hotfile.com/dl/121523374/2c68891/Banned1_Generator_BY-SHOLEH.rar.html
http://hotfile.com/dl/121523494/8770b7e/Banned2_Generator_BY-SHOLEH_FULL_VERSION.rar.html
http://hotfile.com/dl/121523572/7e31538/Banned3_Generator_BY-SHOLEH_TRIAL_VERSION.rar.html
aplikasi ini buat banned jid dgn no berurut di rum, aplikasi ini buat PC, dkhususkan buat owner/admin rum..
1 July 2011 at 12:42 pm
kang dharmo…sing anyar opo kang????…sing lawas ws ura ganas……
1 July 2011 at 12:43 pm
kang dharmo…sing anyar opo kang????…sing lawas ws ura ganas……
3 July 2011 at 1:07 pm
Wis pensiun tenan ki po, Kang?
16 July 2011 at 12:52 am
Kang darmo orng mana lam kenal wae. Kapan2 aku di kasih plood seng uampuh. Pengen blajar plood aku. Wkwkwkwk
16 July 2011 at 12:56 am
1 th aku main nimbuzz tp gk bisa ngeplood tlg di ajarin yow.
24 July 2011 at 10:06 am
He,he, kang dharmo emang pinter.. Gue ja sbagian ga bs ngartiin tutoriale.. yo wis slm sejahtera ae kang dhar sing bagus2 dwe he,he
..
17 September 2011 at 4:03 pm
thanx i was looking 4
18 September 2011 at 3:06 pm
tilik maning……mbokan teyeng…….pdhal mumet……
20 November 2011 at 11:02 pm
bro how can we make appliction (.exe) flod appliction for nim buzz please teach mee thxxxxxx
30 November 2011 at 1:49 am
wordpress…
[...]VB Fundamental to Build Nimbuzz Flood Application « Nimbuzz Brotherflood[...]…