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 Kofax_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 Kofax_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("Kofax.My.COM.Example.TestObject")

m_myObject.MyExampleFunction()

 

End If

End Sub