Prima rezolvare, din command prompt:
creare: mkdir \\.\c:\con
stergere: rd /S /Q \\.\c:\con
A doua rezolvare, html: Atentie, am CopyRight asupra ei !
Slavati textul de mai jos intr'un fisier cu extensia htm sau html si
dati click pe el.
<html>
<body>
<script type="text/vbscript">
dim filesys, newfolder, confolder
confolder = "\\.\c:\con"
set filesys=CreateObject("Scripting.FileSystemObject")
If Not filesys.FolderExists(confolder) Then
Set newfolder = filesys.CreateFolder(confolder)
document.write("Am creat folderul CON<br>")
else
set newfolder = filesys.GetFolder(confolder)
newfolder.Delete
document.write("Am sters folderul CON<br>")
End If
document.write("S-auzim de bine !<br><br>")
document.write("<B>CopyRight (C)2005 k33,
k33@k.ro</B>")
</script>
</body>
</html>