Файл, папка или линк?

[skord]

Как определить, что путь в переменной является путем к папке на локальном диске, а не к файлу (на локальном диске или в сети)?
Думаю я понятно написал

[GSerg]

Если не требовать, чтобы путь к папке заканчивался слэшем, то никак, ибо файл может быть без расширения.

[skord]

Никак? Фигово...
Пробовал через GetAttr, но при линке ошибка...

[GSerg]

А, так у тебя есть возможность проверить существования физически?
Тогда Dir( , vbDirectory) проверяй.

[skord]

У... блин про Dir то забыл...
Хотя уже через GetAttr сделал, вроде тоже работает

Код: Выделить всё

Private Function GetPathType(Path As String) As String
On Error GoTo er
If GetAttr(Path) >= 16 And GetAttr(Path) <= 23 Then
    GetPathType = 0 'folder
Else
    GetPathType = 1 'file
End If
er:
  If Err = 76 Then GetPathType = 2'link
End Function

Спасибо за помощь!