Тема: 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.
В названии ветки всегда должен быть указан язык программирования или среда исполнения скрипта, если это возможно.