Вопрос № 162718: Здравствуйте, уважаемые эксперты! Вопрос по 8,1. Подскажите пожалуйста как узнать номер железяки, на которой установлена 1С (номер жесткого диска или номер процессора или номер материнской платы). Также как можно проверить наличие в реестре Windows к...
Вопрос № 162744: Добрый день!! Подскажите как можна поменять в 1С 7.7 название всех месяцев с русского на украинский во всех документах??...
Вопрос № 162.718
Здравствуйте, уважаемые эксперты! Вопрос по 8,1. Подскажите пожалуйста как узнать номер железяки, на которой установлена 1С (номер жесткого диска или номер процессора или номер материнской платы). Также как можно проверить наличие в реестре Windows конкретной записи (ключа)? Заранее спасибо.
Отправлен: 19.03.2009, 09:37
Вопрос задал: М.Денис (статус: 3-й класс)
Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 6)
Отвечает: Владимир Лазурко
Здравствуйте, М.Денис!
Встроенными средствами 1С нельзя, а вот с помощью внешних компонент или скриптов можно. Например, Microsoft Windows Script Host (WSH), в русских версиях Windows называемый Сервером Сценариев, представляет собой языконезависимый сервер (контроллер обработчиков сценариев) для 32-х разрядных операционных систем Microsoft Windows. В состав WSH включены обработчики сценариев (scripting engines) языков Visual Basic Script и Java Script. Другими поставщиками программного обеспечения могут
быть созданы свои обработчики сценариев (в виде ActiveX-объектов) для других языков, таких как Perl, TCL, REXX, Python и других.
В Приложении цитата с сайта www.script-coding.info - описание методов сервера сценариев с реестром, кроме того, там есть много других интересных "вкусняшек". С помощью этого сервера сценариев можно проверить/прочесть/изменить/удалить конкретн
ый ключ в реестре. А здесь можно скачать полное описание WSH в CHM формате.
Во вложении - 2 внешние компоненты для работы с реестром из 1С. Документация прилагается.
Здесь описаны методы чтения аппаратной части компьютера.
Процедура глМакси
мизироватьОкно() Экспорт WSHShell = СоздатьОбъект("WScript.Shell"); WSHShell.SendKeys("%"); // посыл "нажатия" клавищи ALT WSHShell.SendKeys("{LEFT}{DOWN}{DOWN}{DOWN}{DOWN}{DOWN}{ENTER}"); // последовательность нажатий клавиш для вызова контекстного меню окна "Развернуть" и нажатие Enter КонецПроцедуры
Успехов! С уважением, Владимир.
Приложение:
Прикреплённый файл: Загрузить >> Срок хранения файла на сервере RusFAQ.ru составляет 30 суток с момента отправки ответа. --------- И как хотите, чтобы с вами поступали люди, так и вы поступайте с ними. (Евангелие от Луки, 6:31, совр. перевод)
Ответ отправил: Владимир Лазурко (статус: Практикант)
Ответ отправлен: 19.03.2009, 10:29
Как сказать этому эксперту "спасибо"?
Отправить SMS
#thank 245597 на номер 1151 (Россия) | Еще номера >>
Вам помогли? Пожалуйста, поблагодарите эксперта за это!
Оценка за ответ: 5 Комментарий оценки: Большое спасибо за внимание. Вашы ссылки и вложение очень мне помогли!
Вопрос № 162.744
Добрый день!! Подскажите как можна поменять в 1С 7.7 название всех месяцев с русского на украинский во всех документах??
Отвечает: Владимир Лазурко
Здравствуйте, Артем Олександрович!
Прежде всего - какая у Вас конфигурация типовая или самописная? Если типовая - то там уже всё сделано, необходимо в папку с базой положить файлы с прописью. Если эти файлы поместить в папку с программой (обычно это каталог %programfiles%1cv77in или %programfiles%1cv77.admin) Архив с этими файлами прикреплен к ответу.
Как именованы файлы: первые три символа - международное название валюты, суффикс - язык, расширение SPL. По содержимому это текстовые
файлы. Пример прописи на украинском языке для гривни и названий месяцев в Приложении.
Если база самописная, в которой не предусмотрена работа с национальными языками, кроме русского (он по умолчанию и прописан в платформе) - я расскажу поподробнее.
В типовых файлах прописи кроме месяцев есть еще и описание денежных едениц конкретной валюты на конкретном языке. Вам понадобятся файлы прописи на украинском языке, и программно задать работу с конкретным языком
оператором Прописть(ИмяФайлаПрописи). После этого все строки с буквенным форматированием (названия месяцев, суммы прописью и т.д.) будут выводиться на указанном в файле языке.
Например, Формат(ДатаДок, "ДДДММММГГГГ") выведет строку "18 Березня 2009 р."
В Глобальном модуле, чтоб не писать в каждом документе, определить процедуру, которая будет устанавливать язык для печатных форм. В типовых конфигурациях для этого используется процедура глУстПропись.
Создайте её и Вы. В первом параметре передается валюта (гривня, рубли, доллары, евро и т.д.), во втором параметре язык литерой "р" для русского языка или "у" для украинского. В справонике Валюты определны реквизиты: ФайлПрописиРус строка, для хранения имени файла (и пути) прописи на русском языке. ФайлПрописиУкр строка, для хранения имени файла (и пути) прописи на украинском языке.
Код:
Процедура глУстПропись(Вал,Язык = "") Экспорт Язык = Нрег(Язык); Если Язык = "" Тогда // из константы Если Константа.ФормыНаУкраинском = Нет Тогда Пропись(СокрЛП(Вал.ФайлПрописиРус)); Иначе Пропись(СокрЛП(Вал.ФайлПрописиУкр)); КонецЕсли; ИначеЕсли (Язык
= "р") или (Язык = "русский") Тогда Пропись(СокрЛП(Вал.ФайлПрописиРус)); ИначеЕсли (Язык = "у") или (Язык = "украинский") Тогда Пропись(СокрЛП(Вал.ФайлПрописиУкр)); КонецЕсли; КонецПроцедуры
Хотя в конкретном случае с одной валютой - гривней и выводом всех печатных форм на украинском языке достаточно будет текст из Приложения сохранить в файл uahukr.spl и положить этот файл в папку с ба
зой. А в процедуре печати достаточно будет написать Пропись("uahukr.spl"); Пример:
Код:
Процедура Печать() Пропись("uahukr.spl") .... создание и заполнение печатной формы ....
Успехов! С уважением, Владимир.
Приложение:
Прикреплённый файл: Загрузить >> Срок хранения файла на сервере RusFAQ.ru составляет 30 суток с момента отправки ответа. --------- И как хотите, чтобы с вами поступали люди, так и вы поступайте с ними. (Евангелие от Луки, 6:31, совр. перевод)
Ответ отправил: Владимир Лазурко (статус: Практикант)
Ответ отправлен: 19.03.2009, 18:45
Как сказать этому эксперту "спасибо"?
Отправить SMS
#thank 245641 на номер 1151 (Россия) | Еще номера >>
Вам помогли? Пожалуйста, поблагодарите эксперта за это!
Скажите "спасибо" эксперту, который помог Вам!
Отправьте СМС-сообщение с тестом #thank НОМЕР_ОТВЕТА
на короткий номер 1151 (Россия)
Номер ответа и конкретный текст СМС указан внизу каждого ответа.
* Стоимость одного СМС-сообщения от 7.15 руб. и зависит от оператора сотовой связи.
(полный список тарифов)
** При ошибочном вводе номера ответа или текста #thank услуга считается оказанной, денежные средства не возвращаются.
*** Сумма выплаты эксперту-автору ответа расчитывается из суммы перечислений на портал от биллинговой компании.
