www.Hacking-Romania.com
Hacking, gaby hacker team, programe hack, radmin hack, hi5 hack, hack the west, hacking romania, hacking stuff, hacking tools, 1 hack, 1st hacks, 2 hack, 2 hacks, 3 hack, 3 hacks, 3000 hack, 3004 hack, 4 hack, 4 hacks, 55 hack, 6 hack, 6 hacks, 7 hack, 7 hacks, 9 hack, 9dragons hack, a hack, adventure quest hack, aim hack, alz hack, and hacks, best hack, blue hack, bots hack, bots hacks, buy hack, cabal online hack, chaos hacks, cheat engine hack, cheat hack, cheats and hacks, cheats hacks, city hack, club hack, combo hack, conquer hacks, conquer online hack, conquer online hacks, conquer speed hack, conquiztador hack, counter strike 1.6 hack, damage hack, de hack, download hack, download hack for, dragonfable hack, dragonfable hacks, drakkarious hack, exp hack, flyff hack, free hack, free hacks, game hack, game hacks, garena exp hack, gladiatus hack, gm hack, gold hack, gunz hack, hack, hack 5, hack a pc, hack a site, hack a website, hack blog, hack conquer, hack counter strike, hack crack, hack cs, hack cs 1.6, hack dvd, hack email, hack forum, hack hunter, hack id, hack info, hack it, hack mess, hack muonline, hack net, hack password, hack passwords, hack pc, hack pdf, hack programs, hack site, hack sites, hack soft, hack software, hack team, hack the game, hack this, hack website, hack windows xp, hack world, hack xp, hacked, hacking, hacking game, hacking programs, hacking software, hacking tutorials, hacks, how hack, how to hack, icon hack, last chaos hack, last chaos hacks, life hack, lineage 2 hack, lineage 2 hacks, linux hack, lvl hack, maplestory hacks, mobile hack, multi hack 3.0, mybrute hack, naruto arena hack, naruto arena hacks, one hit kill hack, online hacks, perfect world hacks, pool hack, programe hack, resolution hack, resource hack, roll hack, royal hack, silkroad hack, source hack, speed hack, speed hacks, super hack, the west hack, warrock hack, warrock hacks, web hack, xpango hack, lockerz forum
Lista Forumurilor Pe Tematici
www.Hacking-Romania.com | Reguli | Inregistrare | Login

POZE WWW.HACKING-ROMANIA.COM

Nu sunteti logat.
Nou pe simpatie:
bruneta_ta_us
Femeie
25 ani
Giurgiu
cauta Barbat
25 - 52 ani
www.Hacking-Romania.com / Hacking-ul nostru cel de toate zilele / [Tut Vb6]Crearea unui server builder  
Autor
Mesaj Pagini: 1
danuhack
MEMBRU SPECIAL

Din: '"test
Inregistrat: acum 15 ani
Postari: 447
Buna astazi in acest tutorial vom atinge urmatoarele obiective -Sa intelegem functia split
-Crearea unui server builder pentru un trojan sau un program care necesita anumite setari.

1.0 |Idea de baza|

Vom avea un stub.exe acest stub il vom deschide ia vo prelua datele si le vom pune intr-un alt fisier gol apoi vom pune la sfarsitul fisierului respectiv vom pune setarile(un port un ip si o parola) despartite de un delimitator ca de exemplu $.

2.0|Crearea buiderului|


Pentru disign vom avea nevoie pe form de -3 textbox(pentru setari)
                                                             -1 textbox pentru locatia serverului final
                                                             -optional un common dialog
                                                             -un buton desigur

Private Sub Buid_Click()
Dim Gett As String
Open App.Path & "\stub.exe" For Binary as #1'deschidem Stubul in modul binar
Get #1,,Gett'generam datele intr-o voriabila
Open loc.text For Binary As #2'Deschidem cu ajutorul unui texbox care are o locatie bine stabilita de exemplu C:\serverfinal.exe
Put #2,,Gett'punem in server datele generate
Put #2,,Ip.text'Dupa cum am scris in partea 1.0 vom pune la sfarsit ip-u din textbox
Put #2,,"$"'despartim Datele cu delimitatorul $
Put #2,,port.text
Put #2,,"$"
Put #2,,parola.text
Close #1
Close #2
End Sub

il compilam si il punem intr-un folder

2.1 |Crearea Stubulu|Foarte necesar

Punem pe form tot 3 textboxuri si atat
Private Sub Form_Initialize()
Dim Setari() as String'O variabila de tip string care este extrem de importanta
Dim data as string
Open App.Path & App.Exename for Binary As #1'Deschidem acelasi fisier
Get #1,,data'Generam datele intr-o variabila
Close#1'Inchidem Fila
Setari() = Split(data,"$")'Imaprtim toate datele eliminad datele de la inceput pana la setarisi impartind cu delimitatorul $
Ip.text = Setari(1)'Prima Setare este ip-u
Port.Text = Setari(2)'A doua Este Portu
Parola.Text = Setari(3)'A trea Parola
End Sub
'aici in jos este codul pogramului dmnv
il compilam cu numele stub.exe si il punem in acelasi folder cu builderului

FiniSh

Tutorial Creat de Hackermad
Mai multe pe

Modificat de danuhack (acum 13 ani)


_______________________________________
[img]http://i220.photobucket.com/albums/dd214/CatalynCN/bnr_bancnota_zero_0_lei_ron_1266581.jpg[/img]

pus acum 13 ani
   
Pagini: 1  

Mergi la