Darren DICK 
      d.dick at uws.edu.au
      
      Mon Mar 21 22:19:24 CST 2005
    
This Works - WooHoo
Dim fs
Dim x as integer
Set fs = CreateObject("Scripting.FileSystemObject")
   x = fs.FolderExists(Me.txtFolderPath)
   
   If x = -1 Then
        MsgBox "Folder Exists"
   ElseIf x = 0 Then
        MsgBox "Folder doesn't Exist"
   End If
So.for some reason I couldn't include the line
fs.FolderExists(Me.txtFolderPath)
Inside an if statement.
But if I Dim'd X as an integer and
Attached the line fs.FolderExists(Me.txtFolderPath)
To the X then I could test the result value
I am grateful, but does andyone know why??
Have a great day
Many thanks to Dan and Doris
See ya
Darren