1 Тема от The gray Cardinal

  • The gray Cardinal
  • Разработчик
  • Неактивен

Тема: VBScript: вызов VBScript-функций из области LangMF

При работе с COM-сервером LangMF "Atomix.LangMF" можно вызывать функции, описанные на VBScript, из области кода LangMF. Для этого можно передать в область LangMF ссылки на VBScript-функции, полученные с помощью вызова GetRef. Демонстрация:

Set LMActiveX = CreateObject("Atomix.LangMF")
LMFCode = _
"<#Module=callfromVB>" & VbCrLf & _
"Sub Load(cmdstr)" & VbCrLf  & _
"SampleCall(""Hello, script-coding!"")" & VbCrLf  & _
"End Sub" & VbCrLf  & _
"<#Module>"
'Получение объекта функции и добавление в область LangMf
Set SampleObj = GetRef("Sample")
LMActiveX.AddObject SampleObj, "SampleCall"
'Инициализация кода LangMF
LMActiveX.Command LMFCode 
LMActiveX.Reset
'----------------------------------------------------------
Function Sample(data)
    MsgBox data
End Function

Идею предложил Poltergeyst.

Предложения в русском языке начинаются с большой буквы и заканчиваются точкой.
В названии ветки всегда должен быть указан язык программирования или среда исполнения скрипта, если это возможно.