0
selestos
28.07.13
✎
18:07
|
&AtClient
Procedure Test(Команда)
SystemInfo = New SystemInfo();
COMObjectName = "V"+StrReplace(Left(SystemInfo.AppVersion, 3), ".", "")+".Application";
BackgroundJobsApplication = New COMObject(COMObjectName);
Try
Promo = BackgroundJobsApplication.Connect("File=""C:\Users\Зевс\Documents\InfoBase7""; Usr=""Translator"";")
Except
DoMessageBox(NStr("en = 'Error opening a background copy!'; ru = 'Ошибка открытия фоновой копии!'"));
EndTry;
MyObject = Promo.ModuleQuery.TestExecute();
message(MyObject);
Endprocedure
Это процедура создана во внешней обработке ---смысл в том что я создал COMОбъек чтоб иметь возможность обращаться ко всем объектам и методам конфигураций
--Потом Я создал внешнюю обработку ModuleQuery в которой создал простую простую функцию
Function TestExecute() Export
return "All work fine!";
Endfunction
На обработка создал кнопку Test--при нажатий на которой естественно должно выводится тестовое сообщение All work fine!
Но вместо этого выводит ошибку
{Форма.Форма.Форма(19)}: Значение не является значением объектного типа (ModuleQuery)
MyObject = Promo.ModuleQuery.TestExecute();
|
|