
oXyGeN
Active Members-
Posts
137 -
Joined
-
Last visited
Everything posted by oXyGeN
-
n-a aparut inca
-
Wikileaks spokesman Julian Assange has been arrested by police in London and will appear in court later today. A spokesman for Scotland Yard said: "Assange was arrested by appointment at a central London police station at 9.30 this morning. "He will appear at City of Westminster magistrates later today." Thirty-nine-year old Assange was arrested by the Met's Extradition Unit on behalf of Swedish authorities. He was arrested on a European arrest warrant issued by Sweden. The Metropolitan Police said: "He is accused by the Swedish authorities of one count of unlawful coercion, two counts of sexual molestation and one count of rape, all alleged to have been committed in August 2010." Sursa: theregister.co.uk
-
sincer, imi pare rau pt tine cand vad ca-ti folosesti cunostintele pt astfel de chestii cand ai putea face ceva mai constructiv, dar e alegerea ta. candva o sa-ti aduci aminte de ce ti-am spus si cel mai probabil o sa regreti mult actiunile tale de aventurier.
-
Du-te ma modestule, tu te-ai nascut invatat )) esti doar un mucos de copil frustrat care se joaca cu libertatea lui. Asculta un sfat prietenesc: calmeaza-te si nu mai cauta faima, stai in coltisoru tau si fa ce faci pentru tine, nu pentru vazul lumii sau poate preferi sa-ti care malacii pule-n cur la bulau... just think about it
-
and more here : https://media.blackhat.com/bh-eu-10/presentations/Lindsay_Nava/BlackHat-EU-2010-Lindsay-Nava-IE8-XSS-Filters-slides.pdf
-
sa-ti creasca ce-ai mic, mare !!!
-
adica nu merge chatul ...
-
ceva la genu? : ar fi interesant sa animezi textul din dreptunghi, sa-l faci sa curga
-
Cred ca vroiai sa scrii rstzone.org ... sau ai scris rstzone.org si ai dat replace global cu rstcenter.com ? Anyway welcome back !
-
România,locul 1 în Europa ºi 3 în lume la fraude pe internet
oXyGeN replied to oXyGeN's topic in Stiri securitate
because i know who the fuck are you bitch ! ai prins curaj ca ai scapat de pusculita ? ) fmm de oltean ... hai la o bere ) -
România,locul 1 în Europa ºi 3 în lume la fraude pe internet
oXyGeN replied to oXyGeN's topic in Stiri securitate
doar atat de putin stii sa injuri ? eu de obicei nu injur ... doar cand sunt provocat ... ce tupeu pe tine mha sa ma faci "idiot" ... da de unde mata ai atata creier ca sa ajungi la concluzia ca eu sunt idiot ? -
România,locul 1 în Europa ºi 3 în lume la fraude pe internet
oXyGeN replied to oXyGeN's topic in Stiri securitate
~Xenoger ai grija la limbaj fututzi mortzii matii de ratat ... cine pizda matii s-a laudat mha ? era doar o stire despre securitate manca-mi-ai curu` de impotent ! -
Infractorii românii folosesc servere din þara noastrã, falsificã pagini de internet ale unor bãnci strãine de renume sau firme din domeniul financiar ºi încercã sã obþinã date personale ale clienþilor sau coduri PIN. Fenomenul se numeºte "phishing", iar în România, douã mari bãnci s-au confruntat cu aceastã problemã. România ocupã locul 3 în lume, dupã Statele Unite ale Americii ºi China, cu un procent de 5% din toate siturile de tip fishing. Un studiu aratã cã din þara noastrã s-au trimis mii de mesaje cãtre firme din sectorul financiar din SUA ºi Italia, prin care atacatorii români încercau sã fure informaþii despre carduri bancare. Mulþi dintre ei au ºi reuºit, iar pãgubiþi sunt ºi în România. Infractorii preferã sã foloseascã servere din România, dar sã atace în strãinãtate. ªansele sã pãcãleascã sunt mai mari, iar probabilitatea sã fie prinºi mai micã. Chiar în aceste zile, o bancã importantã din România se confruntã cu fenomenul de phishing. Pe e-mailurile clienþilor au sosit mesaje în care se cer date confidenþiale despre carduri. În România, anul trecut, s-au înregistrat 570 de cazuri de infracþiuni cu cãrþi de credit, în urma cãrora zeci de clienþi ai unor bãnci au pierdut peste 100.000 de lei. La nivel mondial, phishingul a provocat pagube de zeci de miliarde de dolari. Sursa: ProTV
-
fitzi activi, faceti posturi de calitate, invatati cat mai mult si o sa ajungeti la VIP Private Section unde vetzi gasi lucruri foarte interesante... Long live RST !!!
-
Done ! Nu tre` sa creezi niciun fisier... se fac toate automat pe parcurs ce adaugi elevi/materii ... poti citi un catalog deja facut daca e facut dupa schema : nume elev:nota:materie:nota(ex: Pop Ion:nota:matematica:10) nume elev:teza:materie:nota(ex: Pop Ion:teza:matematica:10) nume elev:absenta:materie:absenta(ex: Pop Ion:absenta:matematica:25.01.2008) Sper sa nu ai probleme in utilizarea programului. Bafta ! Poftim si sursa: uses crt; var a,b,c,d:text; nr,nr2,elevi,materii,IOR,i,j,nota:byte; elev,materie,s,absenta,detalii,c2:string; ok,ok2,ok3:boolean; procedure meniu; begin clrscr; writeln('1. Adaugare elevi in catalog.'); writeln('2. Adaugare materii in catalog.'); writeln('3. Adaugare nota materie elev.'); writeln('4. Adaugare nota teza elev.'); writeln('5. Adaugare absenta elev.'); writeln('6. Afisare date elev.'); writeln('7. Iesire din program.'); writeln; write('Introduceti numarul optiunii dorite: ');readln(nr); end; begin assign(a,'elevi.txt'); assign(b,'materii.txt'); assign(c,'detalii.txt'); repeat meniu; if nr=1 then begin {$I-} reset(a); {$I+} IOR:=IOResult; if IOR=2 then rewrite(a) else append(a); clrscr; write('Introduceti nr. de elevi pe care doriti sa-i adaugati: '); readln(elevi); for i:=1 to elevi do begin ok:=false; repeat write('Introduceti numele elevului ',i,': ');readln(elev); for j:=1 to length(elev) do if elev[j]=' ' then ok:=true; if ok=false then begin writeln; writeln('Ati introdus un nume incorect.'); writeln('Numele elevului trebuie sa fie compus din doua parti : Nume si Prenume.'); writeln('exemplu: Pop Ion'); writeln('Apasati tasta ENTER pentru a introduce un nume corect de elev.'); readkey; writeln; end; until ok=true; writeln(a,elev); end; writeln; writeln('Actualizarea catalogului s-a efectuat cu succes.'); writeln('Apasati tasta ENTER pentru a reveni la meniu.'); readkey; close(a); end else if nr=2 then begin clrscr; {$I-} reset(; {$I+} IOR:=IOResult; if IOR=2 then rewrite( else append(; write('Introduceti numarul de materii pe care doriti sa le adaugati: '); readln(materii); for i:=1 to materii do begin write('Introduceti materia ',i,': '); readln(materie); writeln(b,materie); end; writeln; writeln('Actualizarea catalogului s-a efectuat cu succes.'); writeln('Apasati tasta ENTER pentru a reveni la meniu.'); readkey; close(; end else if nr=3 then begin clrscr; {$I-} reset(a); {$I+} IOR:=IOResult; if IOR=2 then begin writeln('Catalogul nu a fost creat inca.'); writeln('Apasati tasta ENTER pentru a reveni la meniu.'); readkey; end else begin write('Introduceti numele elevului la care doriti sa adaugati o nota: '); readln(elev); reset(a);reset(; {$I-} reset(c); {$I+} IOR:=IOResult; if IOR=2 then rewrite(c) else append(c); ok:=false; while not eof(a) do begin readln(a,s); if s=elev then ok:=true; end; if ok then begin write('Introduceti materia la care vreti sa adaugati o nota elevului ',elev,': '); readln(materie); ok2:=false; while not eof( do begin readln(b,s); if s=materie then ok2:=true; end; if ok2 then begin write('Introduceti nota pentru elevul ',elev,' la materia ',materie,': '); readln(nota); ok3:=false; for i:=1 to 10 do if nota=i then ok3:=true; if ok3 then begin {$I-} reset(c); {$I+} IOR:=IOResult; if IOR=2 then rewrite(c) else append(c); writeln(c,elev,':nota:',materie,':',nota); writeln; writeln('Actualizarea catalogului s-a efectuat cu succes.'); writeln('Apasati tasta ENTER pentru a reveni la meniu.'); readkey; end else begin writeln('Nota incorecta'); writeln('Apasati tasta ENTER pentru a reveni la meniu.'); readkey; end end else begin writeln('materie inexistenta'); writeln('Apasati tasta ENTER pentru a reveni la meniu.'); readkey; end; end else begin writeln('Elev inexistent.'); writeln('Apasati tasta ENTER pentru a reveni la meniu.'); readkey; end; close(a); close(; close(c); end; end else if nr=4 then begin begin clrscr; write('Introduceti numele elevului la care doriti sa adaugati nota la teza: '); readln(elev); reset(a); reset(; {$I-} reset(c); {$I+} IOR:=IOResult; if IOR=2 then rewrite(c) else append(c); ok:=false; while not eof(a) do begin readln(a,s); if s=elev then ok:=true; end; if ok then begin write('Introduceti materia de teza la care vreti sa adaugati o nota elevului ',elev,': '); readln(materie); ok2:=false; while not eof( do begin readln(b,s); if s=materie then ok2:=true; end; if ok2 then begin write('Introduceti nota de teza pentru elevul ',elev,' la materia ',materie,': '); readln(nota); ok3:=false; for i:=1 to 10 do if nota=i then ok3:=true; if ok3 then begin {$I-} reset(c); {$I+} IOR:=IOResult; if IOR=2 then rewrite(c) else append(c); writeln(c,elev,':teza:',materie,':',nota); writeln; writeln('Actualizarea catalogului s-a efectuat cu succes.'); writeln('Apasati tasta ENTER pentru a reveni la meniu.'); readkey; end else begin writeln('Nota incorecta'); writeln('Apasati tasta ENTER pentru a reveni la meniu.'); readkey; end end else begin writeln('Materie inexistenta'); writeln('Apasati tasta ENTER pentru a reveni la meniu.'); readkey; end; end else begin writeln('Elev inexistent.'); writeln('Apasati tasta ENTER pentru a reveni la meniu.'); readkey; end; close(a); close(; close(c); end end else if nr=5 then begin clrscr; write('Introduceti numele elevului la care doriti sa adaugati o absenta: '); readln(elev); reset(a); reset(; append(c); ok:=false; while not eof(a) do begin readln(a,s); if s=elev then ok:=true; end; if ok then begin write('Introduceti materia la care vreti sa adaugati o absenta elevului ',elev,':'); readln(materie); ok2:=false; while not eof( do begin readln(b,s); if s=materie then ok2:=true; end; if ok2 then begin write('Introduceti data absentei pentru elevul ',elev,' la materia ',materie,'(format:zz.ll.aaaa ; ex:25.01.2008): '); readln(absenta); ok3:=true; if ok3 then begin {$I-} reset(c); {$I+} IOR:=IOResult; if IOR=2 then rewrite(c) else append(c); writeln(c,elev,':absenta:',materie,':',absenta); writeln; writeln('Actualizarea catalogului s-a efectuat cu succes.'); writeln('Apasati tasta ENTER pentru a reveni la meniu.'); readkey; end else begin writeln('Absenta incorecta.'); writeln('Apasati tasta ENTER pentru a reveni la meniu.'); readkey; end end else begin writeln('Materie inexistenta.'); writeln('Apasati tasta ENTER pentru a reveni la meniu.'); readkey; end; end else begin writeln('Elev inexistent.'); writeln('Apasati tasta ENTER pentru a reveni la meniu.'); readkey; end; close(a); close(; close(c); end else if nr=6 then begin clrscr; {$I-} reset(a); {$I+} IOR:=IOResult; if IOR=2 then begin writeln('Catalogul nu a fost creat inca.'); writeln('Apasati tasta ENTER pentru a reveni la meniu.'); readkey; end else repeat clrscr; reset(a); reset(; reset(c); writeln('1.Afisare note materii elevi.'); writeln('2.Afisare note teze elevi.'); writeln('3.Afisare absente elevi.'); writeln('4.Revenire meniul principal.'); writeln; write('Introduceti numarul optiunii dorite: ');readln(nr2); writeln; if nr2=1 then begin write('Introduceti numele elevului la care doriti sa vizualizati notele: '); readln(elev); ok:=false; while not eof(a) do begin readln(a,s); if s=elev then ok:=true; end; if ok then begin write('Introduceti materia la care vreti sa vizualizati notele elevului ',elev,': '); readln(materie); ok2:=false; while not eof( do begin readln(b,s); if s=materie then ok2:=true; end; if ok2 then begin writeln('Elevul ',elev,' are la materia ',materie,' notele:'); while not eof(c)do begin readln(c,detalii); c2:=copy(detalii,1,length(elev)); if c2=elev then begin c2:=copy(detalii,length(elev)+2,4); if c2='nota' then begin c2:=copy(detalii,length(elev)+7,length(materie)); if c2=materie then begin c2:=copy(detalii,length(elev)+8+length(materie),2); writeln(c2); end; end; end; end; writeln; writeln('Apasati tasta ENTER pentru a reveni la meniu.'); readkey; end; if ok2=false then begin writeln('materie inexistenta'); writeln('Apasati tasta ENTER pentru a reveni la meniu'); readkey; end; end; if ok=false then begin writeln('Elev inexistent.'); writeln('Apasati tasta ENTER pentru a reveni la meniu'); readkey; end; end; if nr2=2 then begin write('Introduceti numele elevului la care doriti sa vizualizati notele: '); readln(elev); ok:=false; while not eof(a) do begin readln(a,s); if s=elev then ok:=true; end; if ok then begin write('Introduceti materia la care vreti sa vizualizati notele de teza ale elevului ',elev,': '); readln(materie); ok2:=false; while not eof( do begin readln(b,s); if s=materie then ok2:=true; end; if ok2 then begin writeln('Elevul ',elev,' are la materia ',materie,' nota de teza:'); while not eof(c)do begin readln(c,detalii); c2:=copy(detalii,1,length(elev)); if c2=elev then begin c2:=copy(detalii,length(elev)+2,4); if c2='teza' then begin c2:=copy(detalii,length(elev)+7,length(materie)); if c2=materie then begin c2:=copy(detalii,length(elev)+8+length(materie),2); writeln(c2); end; end; end; end; writeln; writeln('Apasati tasta ENTER pentru a reveni la meniu.'); readkey; end; if ok2=false then begin writeln('materie inexistenta'); writeln('Apasati tasta ENTER pentru a reveni la meniu'); readkey; end; end; if ok=false then begin writeln('Elev inexistent.'); writeln('Apasati tasta ENTER pentru a reveni la meniu'); readkey; end; end; if nr2=3 then begin write('Introduceti numele elevului la care doriti sa vizualizati notele: '); readln(elev); ok:=false; while not eof(a) do begin readln(a,s); if s=elev then ok:=true; end; if ok then begin write('Introduceti materia la care vreti sa vizualizati absentele elevului ',elev,': '); readln(materie); ok2:=false; while not eof( do begin readln(b,s); if s=materie then ok2:=true; end; if ok2 then begin writeln('Elevul ',elev,' are la materia ',materie,' absentele:'); while not eof(c)do begin readln(c,detalii); c2:=copy(detalii,1,length(elev)); if c2=elev then begin c2:=copy(detalii,length(elev)+2,7); if c2='absenta' then begin c2:=copy(detalii,length(elev)+10,length(materie)); if c2=materie then begin c2:=copy(detalii,length(elev)+11+length(materie),10); writeln(c2); end; end; end; end; writeln; writeln('Apasati tasta ENTER pentru a reveni la meniu.'); readkey; end; if ok2=false then begin writeln('materie inexistenta'); writeln('Apasati tasta ENTER pentru a reveni la meniu'); readkey; end; end; if ok=false then begin writeln('Elev inexistent.'); writeln('Apasati tasta ENTER pentru a reveni la meniu'); readkey; end; end; close(a); close(; close(c); until nr2=4; end else if nr=7 then exit; until nr=7; readln end.
-
zi daca mai stai pe forum pana maine ca atunci ti-l fac k-lumea de la 0 cu mai multe optiuni...
-
si io te iubesc Kenpachi
-
Don`t let Satan steal your soul !!! http://www.bisericasatanista.org/ ***PATCHED***
-
nu mai merge
-
ca sa nu mai fii nevoit sa te loghezi din programu` ala pe idu` tau si in + buddy check nu merge daca nu ai in lista id-ul pe care vrei sa-l verifici(din cate stiu)
-
de informatica ...