[AccessD] A2203: Determine if a folder exists - SOLVED

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





More information about the AccessD mailing list