How to check if folder exists in QTP

Example in QTP -

In below code , we check if a folder at C:\sagar exists
        

             Environment.Value("ResultFolderPath") = "C:\sagar"

            Set Fo = createobject("Scripting.FilesystemObject")
            If Not Fo.FolderExists(Environment.Value("ResultFolderPath")) Then
                    print "Folder does not exist"
            Else
                    print "Folder does exist"
            End If



This is how we can check if a folder exists  in QTP.