Go Premium for a chance to win a PS4. Enter to Win

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 4913
  • Last Modified:

(Exception from HRESULT: 0x8002801D (TYPE_E_LIBNOTREGISTERED)).

I am trying to automate Word from a VB.net application but keep getting the error:
"Unable to cast COM object of type 'Microsoft.Office.Interop.Word.ApplicationClass' to interface type 'Microsoft.Office.Interop.Word._Application'. This operation failed because the QueryInterface call on the COM component for the interface with IID '{00020970-0000-0000-C000-000000000046}' failed due to the following error: Library not registered. (Exception from HRESULT: 0x8002801D (TYPE_E_LIBNOTREGISTERED))."

I ran RegAsm to register Office.dll, Microsoft.Vbe.Interop.dll and Microsoft.Office.Interop.Word.dll successfully.

However, I continue to get this error when oWord.Visible = True attempts to execute.



Imports Word = Microsoft.Office.Interop.Word
Imports System.Runtime.InteropServices
 
Private Sub OpenWordDoc
       Dim oWord As Word.Application
        Dim wDoc As Word.Document
        Dim para1 As Word.Paragraph
        Dim strResult As String
 
        oWord = CreateObject("Word.Application")
        oWord.Visible = True
 
        wDoc = oWord.Documents.Add
        para1 = wDoc.Content.Paragraphs.Add
        para1.Range.Text = RepairCommentsTextBox.Text
 
 
        'para1 = wDoc.Content.Paragraphs.Add()
        'para1.Range.Text = RepairCommentsTextBox.Text
        'para1.Range.InsertParagraphAfter()
 
        wDoc.CheckSpelling()
 
        strResult = Microsoft.VisualBasic.Left(wDoc.Content.Text, Len(wDoc.Content) - 1)
        If Not RepairCommentsTextBox.Text = strResult Then
            RepairCommentsTextBox.Text = strResult
        End If
End Sub

Open in new window

0
PenningtonCounty
Asked:
PenningtonCounty
1 Solution
 
omegaomegaDeveloperCommented:
Hello, PenningtonCounty,

I'm still using Word 2000 and VS2005, but I tried running your code with those and had no trouble. (That is, until I got to "Len(wDoc.Content)".  I had to change that to "Len(wDoc.Content.Text)" to get that statement to work.)

I suspect that there must be some problem with your reference to the Word Object Library.  Have you checked this reference to make sure that it is consistent with Word 2003?

Also, I'm not familiar with the effects of the statement:

     Imports Word = Microsoft.Office.Interop.Word

but for me this statement seems to be unnecessary and generates a warning.  The code works for me both with the statement in place and also if it is commented out.  But perhaps in VS2008 and Word2003 this is causing some interference.  What happens if you remove it?

Cheers,
Randy




0
 
PenningtonCountyAuthor Commented:
You did point out a problem that I had not gotten to just yet. The problem causing the error was solved by removing a conflicting Interop assembly. The following link was helpful in getting to the problem: http://msdn.microsoft.com/en-us/library/aa159923(office.11).aspx
that plus advice from a Word Automation Expert.
0

Featured Post

Technology Partners: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Tackle projects and never again get stuck behind a technical roadblock.
Join Now