how check if folder exist

I know how to check if a file is existed or not.
fs.FileExists(Path&"file.asp")

but how to check if a folder is existed or not.

Please help


Thanks

 

you can use like:

if fs.FolderExists("c:\asp")=true then ...

(you have the appropriate permissions to view files and folder)

 

Thanks,

why it does not work for fs.FolderExists("c:\asp\") ?

Regards

 

Hello,

You can used below code

Function ReportFolderStatus(fldr)
  Dim fso, msg
  Set fso = CreateObject("Scripting.FileSystemObject")
  If (fso.FolderExists(fldr)) Then
    msg = fldr & " exists."
  Else
    msg = fldr & " doesn't exist."
  End If
  ReportFolderStatus = msg
End Function

Code (markup):

Function return folder status