Cita: 1) si existe un directorio
<%
Set Archivo=Server.CreateObject("Scripting.FileSy stemObject")
If Archivo.FolderExists("C:\Mi carpeta")=True Then
...
End if
%>
Este no recuerdo
<%
set Archivo = CreateObject ("Scripting.FileSystemObject")
set Carpeta = Archivo.GetFolder("c:\Mi carpeta\")
Carpeta.Delete
%>
saludos

:)