Como saber si una carpeta existe

[[EX3]]

Mediante el API de Windodws:

Código:

Option Explicit

Private Declare Function PathIsDirectory Lib "shlwapi.dll" Alias "PathIsDirectoryA" (ByVal pszPath As String) As Long

Private Sub Form_Load()
If CBool(PathIsDirectory("c:\windows")) Then MsgBox "El directorio existe"

End Sub 

Salu2...