akkvamarin
Кирилл Коновалов

(31) Yashazz, Писал я обработку под влиянием книжки А. Михайлова. О чем указал еще в самых первых версиях обработки в справочной информации. Я это не скрываю. Некоторые примеры из этой книжки я внес сюда. Дальше я ВСЁ писал сам.
FTP Менеджер, можно посмотреть код где я ссылаюсь, что введенная в адрес строка это ftp адрес, далее забыл вставить код работы с ftp. Вам нужен ftp - будет, но это не значит что я заведо кого-то обманывал.
Моя обработка полностью бесплатна и с полностью открытым кодом, ни о каких sm речи не идет. Две последние версии обработки полностью бесплатны.
Прочитал еще раз правила публикации, и если вам интересно то модераторы ничего не скажут.
И спасибо за тест, данную возможную ошибку в строке 214 исправим.

(28) Yashazz, Ок. Если нашел ошибки, особенно грубые, опиши мне их, сюда или в личку. Чтоб твоё 5минутное тестирование не пропало даром, внеси свой вклад в качество ;) я а обещаю сделать его более качественным. Да, FTP менеджер сначала добавлял, после правил, но так и не выложил в финале.

(26) BoryaMbi, Ого, спасибо за пожелания и ссылку, сам офигел и приятно удивлен )) И вам успехом ;)

(20) все коды открыты, вирусописания там нет )) Скачай новую верию, может это исправит твою проблему

полезно и на заметку

(1) А разве бывает у пользователя 1С IP? IP определен на компьютер или что-то другое имелось ввиду? И что значит в какой сетке? В какой домен входит этот пользователь Виндовс?

Нафига скрывать общий модуль? Что супер секретное, коммерческое решение? Не понимаю. Решается всё оч просто, и без WMI. Кому надо пожалуйста:

Shell = Новый COMОбъект("WScript.Shell");
СпешлПапка = Shell.SpecialFolders("Recent"); // папка где хранится история кликов пользователя, что запускал, что открывал
Избранное = Новый Файл(СпешлПапка);
Ярлыки = НайтиФайлы(Избранное.ПолноеИмя, "*.lnk"); // полный перечень всего что запускал пользователь

<Столкнулся с такой проблемой, что при получение данных таким способом заметно "подтормаживание">

Да, так действительно, тормозит, я заметил это давно. Для куска кода вашего пункта 1 ни в коем случае нельзя указывать "Пока i < prn.Count()-1 Цикл" лучше заранее определить общее количество принтеров и использовать эту переменную для цикла "Пока i < ОбщКолВоПринтеров - 1 Цикл", поскольку каждый прогон по циклу система делает запрос на размер коллекции принтеров, что сильно увеличивает время исполнения кода.
Я, например, получаю их в 1С другим способом. Срабатывает моментом:
Сервис = ПолучитьCOMОбъект("winmgmts:{impersonationLevel=impersonate}!\\" +ИмяКомпьютера() + "\root\cimv2");
ПринтерыВсе = Сервис.ExecQuery("Sel ect * from Win32_Printer");
Для Каждого Принтер из ПринтерыВсе Цикл
Сообщить(Принтер.Name);
КонецЦикла;

(14) хм...вот вопросец так вопросец, посмотрю, мысль интересная

(12) Спасибо! :) Обработку не забросил, по мере наличия времени дописываю ее потихоньку. Если кто-то чё-то заметил какой-то баг, то пожалуйста сообщите мне.