Как импортировать DLL в MSScriptControl.ScriptControl

Question

У меня есть запрос на элемент управления MS Script, у меня есть программа VB6, которая использует элемент управления MSScript, чтобы позволить пользователям писать макросы внутри приложения.

Мой вопрос заключается в том, как импортировать DLL в объект типа MSScriptControl.ScriptControl.

Answer 1

Вы имеете в виду загрузить объект scriptControl?

в VBScript:

set x = createobject("msscriptcontrol.scriptcontrol")
x.language = "vbscript"
x.executestatement "a = 12"

в vb6:

Public Sub class_initialize()
Set Script = CreateObject("ScriptControl")
Script.Language = "VBScript"
Script.Reset
Script.ExecuteStatement "abc = 123"
End Sub