Последнее обновление: 23 мая 2015 в 14:58
Подпишись на RSS
rss Подпишитесь на RSS, чтобы всегда быть в курсе событий.
16 августа 2009 · Всячина, Новости, Фото

После проведения выставки самолетов на день Авиастроителя 15 августа 2009 года в Ульяновске, при перетаскивании самолетов в ангары произошло ЧП. Военный «кукурузник» (Ан-2) повредил опору шасси и завалился на бок, сломав при этом крыло, что привело к тому, что другие самолеты не могли двигаться и стояли на «взлетке» несколько часов. Я был там дважды, в […]


1 ноября 2009 · Игрушки, Фото

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


Метки

Метки записей
открыть xlsx docx Новая форма счет-Фактуры Взлом Командная строка вирус 1с реестр Добавить новую метку Армия Экономика Свертка 1С Интренет Вопросы Делаем LiveCD День жестянщика сбились номера документов Деньги гаджеты Экстремальные игры СМС XPE Скачать 1С печать от поставщика Отчет взломать пароль Интернет Работа уменьшить размер базы Отзывы Автомобили бесплатно заблокирован Взлом 1 Драйвера office 2007 Сайты контент-провайдер Обработки Лирика сайт антивирус Проблемы переустановка windows Печатные формы сертфикаты партии Файлы 1С Жизнь Игры пакетный запуск 1С Спутниковое ТВ Обзоры LiveCD Dr.Web Финансы свертка торговли Удаление партий Видео Юмор просроченная дебиторская задолженность автозапуск Программы Методика свертки 1С связь редактирование DBF Структура 1С перенос документов Asus Eee Zver DVD Фото Свертка по партиям HP Pavilion dv6000 1с и MySQL Спорт Пошаговая свертка Отношения Взлом 1С расчет ПЗД Мужчина и женщина СМС оплата Интерент свертка автоматизация Установка Windows Подключить 1С к MySQL мошенничество Оборудование office 2003 Ошибки 1С Свертка базы 1С Windows XP антивирусы портативный аккумулятор Бухгалтерия вирус эмулирует нажатие Win вирус SMS свертка в картинках перенумарация Система восстановить нумерацию Кино Oracle ZverCD Драйвер ODBC скачать homachi локальная сеть через интернет Вирусы программы для слепых скачать конвертер office 2003-2007 реестр удаляем пароли узнать пароль Вся Оптимизация дравер MySQL скачать Загрузка с компакт - диска код защита Альпинизм Интересные места Drivers Документы на почту удаление документов jaws Программы для 1С Анализ ПДЗ новости сверка базы 1С
23 мая 2015

Как работать с Яндекс Диском из 1С

Автор статьи: , 23 мая 2015 в рубрике , Вопросы и ответы. . Просмотров: 2 488

i Как работать с Яндекс Диском из 1С

До недавнего времени работала конструкция, использующая WebDAV, код 1С выглядел примерно так:

Приемник = "https://ЛОГИН:ПАРОЛЬ@webdav.yandex.ru/ИМЯФАЙЛА.XML";
Приемник = "c:\ИМЯФАЙЛА.XML";
КопироватьФайл(Источник, Приемник);

Где,

ЛОГИН — имя пользователя на Яндекс-Диске,
ПАРОЛЬ — соответственно, пароль пользователя,
Но недавно я обнаружил, что Яндекс диск включил SSL — шифрование и вышеприведенный код перестал работать.

Для моих наработок необходим более простой способ обмена.

Я пришел к выводу, что можно подключать Яндекс-Диск как локальный диск в операционную систему. Этот способ даже предпочтительнее, так как дает более широкие возможности при работе с яндексом. В этом случае мы работаем с ЯД как с обычным локальным диском и получаем в свое распоряжение весь инструментарий 1С для работы с файлами. Приведу несколько примеров:

Авторские права на предоставленный материал принадлежат автору сайта http://extremallife.ru

1. Подключаем ЯД с помощью команды операционной системы


ЗапуститьПриложение("net use ИМЯДИСКА: \\webdav.yandex.ru@SSL /USER:ЛОГИН ПАРОЛЬ");

ИМЯДИСКА — буква диска в системе (нужно чтобы была не занята, например «Q»)

Этот способ не очень хорош, и не применим в случае, если после подключения необходимо сразу использовать подключенный диск, например копировать файлы.

На подключение диска уходит некоторое время (до нескольких секунд, в зависимости от скорости подключения), а программа уже выполняется дальше.

Поэтому используем следующий способ

2. Подключаем ЯД с ожиданием подключения

WshShell = Новый COMОбъект("WScript.Shell");
WshShell.Run("net use ИМЯДИСКА: \\webdav.yandex.ru@SSL /USER:ЛОГИН ПАРОЛЬ", 1, 10);

10 — время ожидания ответа в секундах.

3. Копируем один файл

КопироватьФайл(ПутьФайлаЛокально,ПутьФайлаНаЯД);

или

КопироватьФайл("C:\test.xml",R:\test.xml);

4. Копировать несколько файлов

НайденныеФайлы = НайтиФайлы("C:\","*.*");
Для Каждого файл из НайденныеФайлы Цикл
КопироватьФайл(Файл.ПолноеИмя,"Q:\"+Файл.Имя);
КонецЦикла;

5. Удалить файлы

НайденныеФайлы = НайтиФайлы("Q:\","*.*");
Для Каждого файл из НайденныеФайлы Цикл
УдалитьФайлы("Q:\"+Файл.Имя);
КонецЦикла;

6. Отключить диск, опять с помощью команды ОС

ЗапуститьПриложение("net use ИМЯДИСКА: /delete");

И так далее…





Оставить комментарий

*

Блог программиста 1С. Программирование 1С
Если Вас что-то заинтересовало или возникли вопросы, пишите.
petr@evseev.ru
Skype - evseev_petr
ICQ - 262808698

Сохраните меня в социальных сервисах

Комментарии

Присоединяйтесь к обсуждению
  • Леха: Мало того, что это говно-антивирус требует .Net Framework не ниже 4.0, так он еще пожирает ресурсы компьютера,...
  • tommy: AVG равно еще хуже Касперского . Иди в жопу с ним
  • просто_чайник: Не люблю этот антивирус. Заметил такую особенность. Если обновить базы в начале работы, довольно часто...
  • Елена: Самое главное. Файл для совместной работы открыть нельзя! Если надо что-то отредактировать — только...
  • Виктор: Поставили мне на работе эту замечательную программку. Работать невозможно, ужасные тормоза. Стали...

Избранное видео

Ссылки