FileSystemObject - check if folder exsits

while i typically hate using On..Error..Resume..Next, it does serve purpose sometimes

<%
Dim objFSO, objFolder
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
On error resume next
Set objFolder = objFSO.GetFolder("/upload/folder01/")
if err.number > 0 then
   Response.Write("Folder doesn't exist, would you like to create it?")
else
   Response.Write("Folder exists.. do whatever here")
end if
on error goto 0
Set objFSO = Nothing
%>

thanks, ive tried MorningZ and got that to work

i have seen to check if a file excisted but didnt know if there was one to check a folder

i'll give pmormr's a try, thanks for the help