&НаКлиенте

Процедура ОбработкаКоманды(ПараметрКоманды, ПараметрыВыполненияКоманды)



    //Помещаем обработку во временном хранилище

    АдресХранилища = "";

    Результат = ПоместитьФайл(АдресХранилища, "C:\ВнешняяОбработка.epf", , Ложь);

    ИмяОбработки = ПодключитьВнешнююОбработку(АдресХранилища);



    // Откроем форму подключенной внешней обработки

    ОткрытьФорму("ВнешняяОбработка."+ ИмяОбработки +".Форма");

КонецПроцедуры



&НаСервере

Функция ПодключитьВнешнююОбработку(АдресХранилища)

    Возврат ВнешниеОбработки.Подключить(АдресХранилища);

КонецФункции   

 



&НаСервере

Функция ПодключитьВнешнююОбработку(АдресХранилища)

	Возврат ВнешниеОбработки.Подключить(АдресХранилища);

КонецФункции	





&НаСервере

Функция ПодключитьВнешнийОтчет(АдресХранилища)

	Возврат ВнешниеОтчеты.Подключить(АдресХранилища);

КонецФункции	





&НаКлиенте

Процедура дзФайловВыбор(Элемент, ВыбраннаяСтрока, Поле, СтандартнаяОбработка)

	СтандартнаяОбработка = Ложь; ВыбСтрока=Элемент.ТекущиеДанные;

	Если НЕ ВыбСтрока.ЭтоГруппа Тогда

		АдресХранилища = "";

		Если ВыбСтрока.Расширение = ".epf" Тогда

			Рез=ПоместитьФайл(АдресХранилища,ВыбСтрока.ПолноеИмя, ,Ложь);

			ИмяОбработки = ПодключитьВнешнююОбработку(АдресХранилища);

			ОткрытьФорму("ВнешняяОбработка."+ИмяОбработки+".Форма");  			

		ИначеЕсли ВыбраннаяСтрока.Расширение = ".erf" Тогда

			Рез=ПоместитьФайл(АдресХранилища,ВыбСтрока.ПолноеИмя, ,Ложь);

			ИмяОбработки = ПодключитьВнешнийОтчет(АдресХранилища);

			ОткрытьФорму("ВнешнийОтчет."+ИмяОбработки+".Форма"); 			

		КонецЕсли;		

	КонецЕсли; 	

КонецПроцедуры   

 ПереместитьФайл("C:\Temp\Order.htm", "C:\My Documents\Order.htm");    

 Если НайтиФайлы("C:\est.txt") <> Неопределено Тогда 

    ПереместитьФайл("C:\est.txt", "C:\estnew.txt"); 

    Сообщить("Файл перемещен."); 

Иначе 

    Сообщить("Действие не выполнено. Файл в источнике не найден."); 

КонецЕсли;   

 ФС.ПереименоватьФайл("transinvcust.dbf", "st.dbf"); 

 WshShell=СоздатьОбъект("WScript.Shell");

КодВозвр=WshShell.Run("RENAME C:\folder\test.txt test1.txt");

 КомандаСистемы("ren c:\A.txt B.txt"); 

 objFSO = Новый COMОбъект("Scripting.FileSystemObject"); 

objFolder = objFSO.GetFolder("C:\_1"); 

objFolder.Name = "_21";   

 &НаКлиенте

Процедура ОбработкаКоманды(ПараметрКоманды, ПараметрыВыполненияКоманды)



    //Помещаем обработку во временном хранилище

 

    АдресХранилища = "";

    Результат = ПоместитьФайл(АдресХранилища, "C:\ВнешняяОбработка.epf", , Ложь);           

    ИмяОбработки = ПодключитьВнешнююОбработку(АдресХранилища);

    

    // Откроем форму подключенной внешней обработки

 

    ОткрытьФорму("ВнешняяОбработка."+ ИмяОбработки +".Форма");



КонецПроцедуры



&НаСервере

Функция ПодключитьВнешнююОбработку(АдресХранилища)



    Возврат ВнешниеОбработки.Подключить(АдресХранилища);



КонецФункции        

 

Стр = Шаблон("Это название услуги: [Услуга.Наименование]");

//   выдает: "Это название услуги: Доставка Товара"

 

// ниже - пример с дополнением пробелами

Стр = ФиксШаблон("Это название услуги [Услуга.Наименование]");

//   выдает: "Это название услуги Доставка Товара"

// далее - с сокращением строки

Стр = ФиксШаблон("Это название услуги [Услуга.Наименование]");

//   выдает: "Это название услуги Упаковка товара"

 

// Возвращает объект любого типа. По сути является универсальной, но

// работает дольше чем _Вычислить(), поэтому  рекомендовал бы

// использовать ее когда нужно вернуть именно объект

Функция _ВычислитьОбъект( Выражение ) Экспорт

      Возврат ЗначениеИзСтроки(Шаблон( "[ЗначениеВСтроку("+ Выражение+")]"));

КонецФункции



// Возвращает число. Использую ее когда нужно получить результат выполнения

// лок. функции, которые обычно возвращают 0/1 или когда просто нужно вызвать

// лок. функцию из глоб. модуля

Функция _Вычислить( Выражение) Экспорт

      Возврат Число(Шаблон( "["+ Выражение+ "]"));

КонецФункции

Вызов функции осуществляется так:

_Вычислить( "ИмяЛокФункции()");



// Возвращает строку. Функцию удобно использовать когда нужно получить значение

// лок. переменной в гл. модуле

Функция _ВычислитьСтроку( Выражение) Экспорт

      Возврат Строка(Шаблон( "["+ Выражение+ "]"));

КонецФункции

Вызов функции осуществляется так:

глПерем= _ВычислитьСтроку( "ЛокПерем");



//  Присвоение. Функция используется для присвоения значений локальным переменным из гл. модуля

Функция _Присвоение ( Приемник ,Источник) Экспорт

      Попытка

              Приемник = Источник ;

      Исключение

       КонецПопытки;

КонецФункции

Функция вызывается примерно так:

_Вычислить ("_Присвоение(ЛокПерем,глПерем)" );