Invoke the assembly

Once you have copied the DLL to your project, use the following script to invoke objects from your assembly.

Public m_myObject As Object
Public m_ManifestActivator As Object
Private m_AssemblyResolver As Transformation_Extensions.AssemblyResolver

Public Sub Application_InitializeScript()
If m_myObject Is Nothing Then

' find the project folder and infer the "custom" folder from it

Dim fso As New FileSystemObject
m_ProjectFolder = fso.GetFile(Project.FileName).ParentFolder.Path

' create a new Assemly Resolver object

Set m_AssemblyResolver = New Transformation_Extensions.AssemblyResolver
m_AssemblyResolver.Init(m_ProjectFolder & "\Custom", Project.ScriptExecutionMode = CscScriptModeServerDesign)

' Create a manifest activator

Set m_ManifestActivator = CreateObject("Microsoft.Windows.ActCtx")
m_ManifestActivator.manifest = m_ProjectFolder & "\Custom\dl.manifest"

' create an object from your library

Set m_myObject = m_ManifestActivator.CreateObject("MyCompanyName.My.COM.Example.TestObject")
m_myObject.MyExampleFunction()

End If

End Sub