Страницы: 1
RSS
oHttp.Open "GET" не видит файл на сетевом диске
 
Добрый день.

Пишу файл для обработки программ раскроя в html формате. Обработка идет следующим образом:
Код
SourceFolder = "Z:\Путь\1 участок\Раскрой"
Set fso = CreateObject("scripting.filesystemobject")
Set curfold = fso.GetFolder(SourceFolder)
Set oHttp = CreateObject("MSXML2.XMLHTTP")

For Each sfol_0 In curfold.SubFolders
For Each Files In oCurFolder.Files

oHttp.Open "GET", Files, False

В таком виде все работает корректно.

Но! Стоит попробовать адаптировать для работы с сетевым диском (чтобы файл могли использовать все сотрудники), как возникает проблема:
Меняю путь на:
Код
SourceFolder = "\\agave\Logist\Путь\1 участок\Раскрой"
(та же самая папка, только с доступом через сеть, а не диск Z), в переменную Files попадает корректный путь до файла, а вот далее возникает ошибка:
Код
oHttp.Open "GET", Files, False выдает 
Цитата
Run-time error '-2147467259 (80004005)':
Method 'open' of object 'IXTMLHTTPRequest' failed
Что я делаю не так?
 
Апну. Никто не может подсказать?
 
Цитата
Andrey Belkin написал: Никто не может подсказать?
Никто.
file://agave/Logist/Путь/1 участок/Раскрой
 
Цитата
oHttp.Open "GET", Files, False
зачем это??? при работе-то с локальными файлами...

а не работает потому, что метод Open ждет в качестве параметра «нормальный» путь к файлу (или нормальный URL)
видимо, UNC-пути не поддерживаются в методе oHttp.Open

откройте один из обрабатываемых файлов в браузере - и посмотрите, какой там будет путь в строке адреса (что-то, начинающееся с file:)
может, дописав такой префикс, всё и заработает
 
Цитата
Игорь написал: oHttp.Open "GET", Files, Falseзачем это??? при работе-то с локальными файлами...
А как по другому? Честно говоря, этот кусок "содрал" из плекса (получение курсов на дату) и пользуюсь, т.к. работает
Страницы: 1
Читают тему
Наверх