Дан путь "C:\kolonosa"
как определить с помощью vb является ли этот путь папкой или он является файлом без разширения?

Konst_One,

сейчас попробовал не пойдёт.
если файл без разширения то всё равно ничего не даёт 2 параметр.

этой функцией хорошо проверять существует ли файл или папка а определить 1 или 2 не получается(( может есть какие идеи?

Akina,

это как? приведи пример

и какой смысл у папки расширение? для чего?

Konst_One,

да что вы говорите.
читайте тему определить путь - файл ли он или папка
теперь попробуйте проверить теже операции с файлом вместо c:\TEMP поставте к примеру c:\TEM где тем файл без расширения. ну или хотябы "c:\temp.txt"(в первом и втором файл должен быть создан)

в t возвращается "modelator.txt" хотя флаг vbDirectory
им не удастся проверить путь файл или папка

ну вот кто о чём а вшивый как всегда о своём...
мне не нужно определить существует ли файл или папка
мне нужно определить по пути файл или папка чтобы использовать разные функции для копирования их.

кстати кто знает если в инструкцию Open послать путь к папке будет ли ошибка?

извиняюсь)





это самое то спасибо)

BelowZerosurbanecкстати кто знает если в инструкцию Open послать путь к папке будет ли ошибка? эм... и каким образом вы пытаетесь послать Open путь к папке?... вернее, какой вообще в этом смысл. как я писАл выше, вы путаете Open, создающий текстовый файл в случае его отсутствия и dir, проверяющий существование файла или папки. в вашем случае нет файлов без разширения. вы просто их не видите. включите отображение расширений файлов в настроках винды.
1) насчёт опен я не заикался ранее
2) причём тут " включите отображение расширений файлов в настроках винды"?

2) зачем тогда всё это?
посмотрел визуально в эксплоере папка это или файл и перекинул его(её) в нужное место ....глупости пишешь

BelowZerosurbanec,

потому что вы путали Dir и Open.
surbanecOn Error Resume Next
t = Dir("C:\modelator.txt\", vbDirectory)

If Err<>0 Then
Debug.Print "не директория это"
End If что это за код вообще? вы проверяете,... даже не знаю, что вы пытаетесь проверить. ошибка будет в любом случае
если это папка то не будет

и что там за глупость сказал Akina ....
папка с расширением))) xD смешно)

BelowZero,

и напиши где я попутал дир и опен в каком месте!