Cannot create ActiveX component

Question

So, I've looked all over for an answer for this one and so far, everything I've seen offered as fixes do not work.
Exception Details: System.Exception: Cannot create ActiveX component.
Source Error:
Line 39:
Line 40:             ' Create Acrobat Application object
Line 41:             PDFApp = CreateObject("AcroExch.App")
I have a webserver on which is installed the latest version of Acrobat Standard.
Here is my code:
Imports System.Data
Imports System.Data.SqlClient
Imports System.Web.Configuration
Imports System.Data.OleDb
Imports System.Security
Imports System.Security.Principal
Partial Class CodeTest
    Inherits System.Web.UI.Page
    Dim LOGON32_LOGON_INTERACTIVE As Integer = 2
    Dim LOGON32_PROVIDER_DEFAULT As Integer = 0
    Dim impersonationContext As WindowsImpersonationContext
    Declare Function LogonUserA Lib "advapi32.dll" (ByVal lpszUsername As String, _
                            ByVal lpszDomain As String, _
                            ByVal lpszPassword As String, _
                            ByVal dwLogonType As Integer, _
                            ByVal dwLogonProvider As Integer, _
                            ByRef phToken As IntPtr) As Integer
    Declare Auto Function DuplicateToken Lib "advapi32.dll" ( _
                            ByVal ExistingTokenHandle As IntPtr, _
                            ByVal ImpersonationLevel As Integer, _
                            ByRef DuplicateTokenHandle As IntPtr) As Integer
    Declare Auto Function RevertToSelf Lib "advapi32.dll" () As Long
    Declare Auto Function CloseHandle Lib "kernel32.dll" (ByVal handle As IntPtr) As Long
    Private Sub savePDFtoTIF(ByVal fullPathPDF As String, ByVal fullPathTIF As String)
        Dim PDFApp As Acrobat.AcroApp
        Dim PDDoc As Acrobat.CAcroPDDoc
        Dim AVDoc As Acrobat.CAcroAVDoc
        Dim JSObj As Object
        If impersonateValidUser("XXXXXXX", "", "XXXXXXXXXX") Then
            ' Create Acrobat Application object
            PDFApp = CreateObject("AcroExch.App")
            ' Create Acrobat Document object
            PDDoc = CreateObject("AcroExch.PDDoc")
            ' Open PDF file
            PDDoc.Open(fullPathPDF)
            ' Create AV doc from PDDoc object
            AVDoc = PDDoc.OpenAVDoc("TempPDF")
            ' Hide Acrobat application so everything is done in silentmode()
            PDFApp.Hide()
            ' Create Javascript bridge object
            JSObj = PDDoc.GetJSObject()
            ' Attempt to save PDF to TIF image file.
            ' SaveAs method syntax .SaveAs( strFilePath, cConvID )
            ' For TIFF output the correct cConvid is
            ' cCovid MUST BE ALL LOWERCASE.
            JSObj.SaveAs(fullPathTIF, "com.adobe.acrobat.tiff")
            PDDoc.Close()
            PDFApp.CloseAllDocs()
            ' Clean up
            System.Runtime.InteropServices.Marshal.ReleaseComObject(JSObj)
            JSObj = Nothing
            System.Runtime.InteropServices.Marshal.ReleaseComObject(PDFApp)
            PDFApp = Nothing
            System.Runtime.InteropServices.Marshal.ReleaseComObject(PDDoc)
            PDDoc = Nothing
            System.Runtime.InteropServices.Marshal.ReleaseComObject(AVDoc)
            AVDoc = Nothing
            undoImpersonation()
        Else
            lblStatus.Text = "Unable to impersonate"
            Exit Sub
        End If
    End Sub
    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
        savePDFtoTIF("D:\DoH\998.110803030832.pdf", "D:\DoH\Project\000.tif")
    End Sub
    Private Function impersonateValidUser(ByVal userName As String, _
ByVal domain As String, ByVal password As String) As Boolean
        Dim tempWindowsIdentity As WindowsIdentity
        Dim token As IntPtr = IntPtr.Zero
        Dim tokenDuplicate As IntPtr = IntPtr.Zero
        impersonateValidUser = False
        If RevertToSelf() Then
            If LogonUserA(userName, domain, password, LOGON32_LOGON_INTERACTIVE, LOGON32_PROVIDER_DEFAULT, token) <> 0 Then
                If DuplicateToken(token, 2, tokenDuplicate) <> 0 Then
                    tempWindowsIdentity = New WindowsIdentity(tokenDuplicate)
                    impersonationContext = tempWindowsIdentity.Impersonate()
                    If Not impersonationContext Is Nothing Then
                        impersonateValidUser = True
                    End If
                End If
            End If
        End If
        If Not tokenDuplicate.Equals(IntPtr.Zero) Then
            CloseHandle(tokenDuplicate)
        End If
        If Not token.Equals(IntPtr.Zero) Then
            CloseHandle(token)
        End If
    End Function
    Private Sub undoImpersonation()
        impersonationContext.Undo()
    End Sub
End Class
The impersonation works, as I use the same code on another page where I am manipulating file system objects through that account, with this code. Also, the code without the impersonation, works on my local machine perfectly.
Any ideas on what to do would be greatly appreciated.
Justice

Answer 1

Look, I got dragged into a project that was late from the start, but is a big contract for the printing company that I work for that uses a lot of Adobe products internally for what they do.
In good faith, I tried to purchase something that would work. I was in a rush and didn't read the entire EULA as I was installing it. Obviously, I wasn't trying to screw the system or I wouldn't have been here, posting about it. I also do not need an education about what is true or false on the internet. I need a solution now that is going to meet the customers needs based on what is provided here. Rather simple, and don't reallly have the time for an entire formalized consultation as to our "business needs", since this is really all we need it for and time is of the essence.
If the best Adobe can do is publicly slap customers around on forums and throw vague answers out to follow up on, then I guess it's time to seek out other solutions for our business needs.