В нашей сети пользователям категорически запрещено скачивание exe-файлов из интернета и запуск их на компьютерах. Отсюда возникла проблема скачивания файла cbrates.rbc.ru/bnk/bnk.exe и разархивирования его в %TEMP%\tempBik.
Файл bnk.exe - самораспаковывающийся архив, в котором содержится 3 текстовых файла: bnkdel.txt, bnkseek.txt и reg.txt
Попробовал в браузере поменять расширение EXE на ZIP и оказалось, что файл хранится на сервере и в этом варианте. Поэтому решил скорректировать стандартный код обработки "ЗагрузкаБанков":
В процедуре ПолучитьФайлРБК():
Адрес = "bnk/bnk.zip"; //exe заменил на zip +++АК--- 17.12.2013
...
//+++АК+++ Нет прав на запуск EXE, распаковываем файл с расширением ZIP
//КомандаСистемы(""""+ ВремКаталог + "\" + мИмяФайлаЗип + """", ВремКаталог);
ФайлыБанковZip = Новый ЧтениеZipФайла(ВремКаталог + "\" + мИмяФайлаЗип);
ФайлыБанковZip.ИзвлечьВсе(ВремКаталог + "\");
//---АК---
В разделе основной программы (внизу модуля):
мИмяФайлаЗип = "bnk.zip"; //+++АК--- 17.12.2013 Переименовал exe в zip
Т.е. при наличии у пользователя доступа в интернет и запрета на скачивание/запуск исполняемых файлов (*.exe) данный способ позволяет решить данную проблему средствами 1С.
Вступайте в нашу телеграмм-группу Инфостарт