Baltazar500:
Smitis,
Цитата:
Спасибо. Работает. Всего-то и нужна была одна дополнительная строка.
Код:
Хотя и короткий путь для софта которому это дело передаётся н понадобился и всё сократилось ещё больше до (FSO остаётся для разбора текстового файла с путями)
Код:
Буду теперь знать про device path ...
Smitis,
Цитата:
Добавляйте в начало имени файла/папки \\?\ |
Код:
Set FSO = CreateObject("Scripting.FileSystemObject") F = "\\?\" & F Set File = FSO.GetFile(F) msgbox(File.ShortPath) |
Код:
Set FSO = CreateObject("Scripting.FileSystemObject") F = "\\?\" & F msgbox(F) |
Буду теперь знать про device path ...