Кто-нибудь пробовал использовать сабж?
Если есть у кого-то опыт, поделитесь пожалуйста примером...
Заранее спасибо
OLE-шлюз для вызова интерфейсов Галактики
Модераторы: m0p3e, edward_K, Модераторы
-
- Заслуженный деятель интернет-сообщества
- Сообщения: 5188
- Зарегистрирован: 29 мар 2005, 17:49
- Откуда: SPB galaxy spb
поищи asdk.chm - там есть
для начала нужно будет выполнить
@start g:\GAL712\EXE\galnet.exe /RegServer
ПРИМЕР 2: (VBA)
Dim GalApp As Variant, Str As Variant
Set GalApp = CreateObject("GalNet.App")
Str = GalApp.ExecVip("SelectPodr", "Бухгалтерия")
if (GalApp.LastExecCode = 14) then
MsgBox "Выбрано подразделение:" + Str
end if
для начала нужно будет выполнить
@start g:\GAL712\EXE\galnet.exe /RegServer
ПРИМЕР 2: (VBA)
Dim GalApp As Variant, Str As Variant
Set GalApp = CreateObject("GalNet.App")
Str = GalApp.ExecVip("SelectPodr", "Бухгалтерия")
if (GalApp.LastExecCode = 14) then
MsgBox "Выбрано подразделение:" + Str
end if