Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations dencom on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
Validate folder path 1
- Thread starter kliz0328
- Start date
-
1
- #2
Try something like:
Private Sub Form_Open(Cancel As Integer)
If Dir("C:\Program Files\Something", vbDirectory) = "" Then
MsgBox "Folder does not exist"
Else
MsgBox "Folder Exist"
End If
End Sub
Or you could try using:
Set fso = CreateObject("Scripting.FileSystemObject")
Private Sub Form_Open(Cancel As Integer)
If Dir("C:\Program Files\Something", vbDirectory) = "" Then
MsgBox "Folder does not exist"
Else
MsgBox "Folder Exist"
End If
End Sub
Or you could try using:
Set fso = CreateObject("Scripting.FileSystemObject")
- Status
Similar threads
