Акцент

[Yura]

В Акценті 7.4 для кореспондентів був написаний діалог, який являє собою картку клієнта. Тепер є необхідність цей діалог викликати з іншої програми. Без встановленого адміністратора все працює.
Для перевірки використовував такий скрипт:

Dim Dialog
Dim WA
Dim App
Set WA = CreateObject("Accent74.Workarea")
Set App = WA.Application

if WA.OpenDatabase2("E:\Accent\Data\baza.adb") then
Set Dialog = App.CreateDialog("Klient_form.adg")
Dialog.Map("ID") = 2928
Dialog.DoModal
App.Quit
else
MsgDlg "Неможливо відкрити базу даних"
end if

А якщо встановити адміністратор і навіть не включати захист, то дає помилку. Підскажіть як можна запустити акцентівський діалог зовні при встановленому адміністраторі і включеному захисті.

[olimp]

[Yura]