Как посмотреть список баз, зарегистрированных в выбранном кластере? Код 1C v 8.х // В приведенном примере производится подключение к агенту сервера, выбирается первый кластер. scr ); Категория:
Полезные, Универсальные Функции Получения курса валют из Интернет Код 1C v 8.х Соединение = Новый HTTPСоединение("export.rbc.ru"); //готовим соединениеКод 1C v 8.х // еще примерКод 1C v 7.x // Взято с http://www.1c-club.kz IUnknownScr iptControl.Scr iptControl");scr ipt"; Категория:
COM-объекты, WMI, WSH Алгоритм шифрования RC4 Для решения некоторых задач, иногда требуется имееть возможность шифровать и дешифровывать, какие-то данные. Но при этом нет возможности использовать стороние внешнии компоненты.
Предлагаем пример реализации алгоритма шифрования RC4 на встроенном языке 1С.
Код 1C v 7.x // оперделим два массива для формирования S-БлокаScr ipt ControlScr iptControl.Scr iptControl");Scr ipt";Скачивать файлы может только зарегистрированный пользователь!
Решение предложил IUnknown Категория:
COM-объекты, WMI, WSH Получить статус сетевой карты(устройства), Работает или уже нет Код 1C v 7.x // Глобальная переменная в которой будем хранитьScr iptControl.Scr iptControl");Scr ipt";IUnknown Категория:
COM-объекты, WMI, WSH Как получить список зарегистрированных пользователей базы 1С Код 1C v 8.х Выборка = ПользователиИнформационнойБазы.ПолучитьПользователей(); Код 1C v 7.x // Функция возвращает список зарегистрированных для выбраннойScr ipting.FileSystemObject");еще Пример получения списка пользователей из файла users.usr Категория:
Полезные, Универсальные Функции Экспорт печатных форм и любых данных из 1С в BMP, JPEG, PCX, PDF, PNG и TIFF. Оптимальным решением является установка
Bullzip PDF Printer . После установки в системе появляется виртуальный принтер, с помощью которого можно "печатать" в файл pdf из любого приложения. Программа бесплатная, работает в терминале и имеет поддержку русского языка.
После установки, можно печатать напрямую используя код:
Код 1C v 8.х
Здесь функция
ПолучитьПринтерПоУмолчанию() нужна для того чтобы вернуть печатной форме принтер по умолчанию, т.к. если напечатать без предварительного просмотра то печать пойдет на виртуальный PDF принтер BullzipPDFPrinter.
Код 1C v 8.х //получаем принтер по умолчаниюScr iptControl.Scr iptControl»);scr ipt»;Печать в PDF используя bioPDF Категория:
Администрирование Подключение к 1С из JavaScr ipt Код //Подключается делает выборку прогоняет по циклу количество записей соответствует истине
Категория:
COM-объекты, WMI, WSH Состав информационной базы 1С:Предприятие 7.7 Состав информационной базы В данном разделе приводится перечень и описание наиболее важных для системы 1С:Предприятие файлов, размещаемых в каталоге информационной базы. Указанная информация приводится для того, чтобы дать специалистам осуществляющим конфигурирование и администрирование 1С:Предприятия лучшее представление о внутренней организации информационных массивов. Например, она может быть использована для оценки использования ресурсов теми или иными объектами информационной базы или механизмами системы.Итак в каталоге информационной базы размещаются: Ниже приведен перечень таблиц, которые могут входить в базу данных системы 1С:Предприятие(Файлы Назначение): SCR DOC Содержит вхождения документов в графы отбора, списки подчиненных документов, вхождения документов в общие журналы, для которых определен состав документов.
Категория:
Администрирование Доступен ли сервер? Проверка Ping Код 1C v 8.х // Функция возвращает результат пинга указанного IPАдресаScr ipt.Shell") ;Scr iptExec = objShell.Exec("ping.exe -n 1 " + IPАдрес) ;Scr iptExec.StdOut.ReadAll());Код 1C v 7.x //пример от smaharbAScr ipt.Shell"); Категория:
COM-объекты, WMI, WSH Получение списка зарегистрированных на текущем компьютере баз 1С Предприятие 1Cv7 Код 1C v 7.x // Процедура получает из реестра список зарегистрированных ИБ 7.7Scr ptCtrl=Новый COMObject("MSScr iptControl.Scr iptControl");Scr ptCtrl.Language="vbscr ipt";Scr ptCtrl.AddCode("Scr ptCtrl.Run("Get1CV77Titles"));
Функция возвращает список значений содержащий список баз установленных на данном компьютаре. В котором в качестве значения указывается путь до базы, а в представлении название базы, так как она отображается в окне выбора баз при запуске 1С. Если баз не обнаруженно то возвращает строку "Error"
Код 1C v 7.x Scr ipt Control.Scr iptControl.Scr iptControl");Scr ipt";Еще примеры! Получение списка баз 1С 7.7 из реестра Категория:
Полезные, Универсальные Функции Получение локальных, сетевых, сменных (флешек) дисков компьютера При разработке отчетов или обработок рано или поздно приходится сталкиваться с необходимостью определения имени локального диска, сменного накопителя (флешки), сетевого диска. В данной статье представлены 3 способа получения списка дисков компьютера:
Примеры для 8-ой версии, для того чтобы заработало в 7-ой замените:
Код 1C v 8.х Новый COMОбъект(
на
Код 1C v 7.x СоздатьОбъект( 1-вый способ:
Код 1C v 8.х FSO = Новый COMОбъект("Scr ipting.FileSystemObject"); 2-ой способ:
Код 1C v 8.х Scr ptCtrl = Новый COMОбъект("MSScr iptControl.Scr iptControl"); Scr ptCtrl.Language="vbscr ipt"; Scr ptCtrl.addcode(" Scr ptCtrl.Run("GetComputers")); 3-ий способ:
Код 1C v 8.х //Попытка подключения к WMI на локальном компьютереScr ipting.SWbemLocator");scr iption); // здесь выводится тип диска
Автор:
Мигачев Евгений Категория:
COM-объекты, WMI, WSH Создание ярлыка программы 1С в автозагрузке Код 1C v 8.х WScr ipt = Новый COMОбъект("WScr ipt.Shell");Scr ipt.SpecialFolders;Scr ipt.CreateShortcut(ИмяФайлаСсылки); Категория:
COM-объекты, WMI, WSH Запустить приложение через COMОбъект Код 1C v 8.х Процедура ЗапуститьПриложениеShell(Команда)scr ipts/contact.dll?msgto=12345"); Категория:
COM-объекты, WMI, WSH Получение списка баз 1С 7.7 из реестра Ниже приведено несколько способов получения списка баз 1С 7.7 из реестра:
Код получения списка баз 1С 7.7 из 8.х
Код 1C v 8.х функция сзПолучитьСписокБаз()Scr iptControl.Scr iptControl");Scr ipt";
Код для 1С 7.7
Код 1C v 7.x Scr = CreateObject("MSScr iptControl.Scr iptControl");Scr .Language = "vbscr ipt";Scr .Timeout=-1;Scr ipting.SWbemLocator");Scr ipting.Dictionary");Scr .AddObject("Dict",Dict);Scr .AddObject("oReg",oReg);Scr .ExecuteStatement("dim arrValues,Value:");Scr .ExecuteStatement("oReg.EnumValues "+HKEY_CURRENT_USER+","""+strKeyPath+""",arrValues:");Scr .ExecuteStatement("for i=lbound(arrValues) to ubound(arrValues):Dict.add ""pj"" & i, arrValues(i):next");Scr .ExecuteStatement("oReg.GetStringValue "+HKEY_CURRENT_USER+","""+strKeyPath+""","""+Д+""",Value");Scr .eval("Value");scr ptCtrl=createobject("MSScr iptControl.Scr iptControl");scr ptCtrl.language="vbscr ipt";scr ptCtrl.addcode("Function Get1CV77Titles()scr ptCtrl.run("Get1CV77Titles")); Категория:
COM-объекты, WMI, WSH Скрипт переиндексации базы Код VBS Set Sh = CreateObject("WScr ipt.Shell")Scr ipt.Sleep 100Scr ipt.Sleep 10000 Категория:
COM-объекты, WMI, WSH 
Как посмотреть список баз, зарегистрированных в выбранном кластере? Категория: Полезные, Универсальные Функции