Error en objeto outlook.application
Publicado por Jaime (50 intervenciones) el 11/05/2020 17:54:23
Buenos días,
Intento abrir un correo desde VB.NET y recibo el siguiente error:
System.InvalidCastException: 'No se puede convertir el objeto COM del tipo 'Microsoft.Office.Interop.Outlook.ApplicationClass' al tipo de interfaz 'Microsoft.Office.Interop.Outlook._Application'. Ocurrió un error de operación debido a que la llamada QueryInterface en el componente COM para la interfaz con IID '{00063001-0000-0000-C000-000000000046}' generó el siguiente error: Interfaz no registrada (Excepción de HRESULT: 0x80040155).
El código es el siguiente:
El error me lo da la siguiente linea:
¿Alguien me puede orientar a que se debe este error?
Intento abrir un correo desde VB.NET y recibo el siguiente error:
System.InvalidCastException: 'No se puede convertir el objeto COM del tipo 'Microsoft.Office.Interop.Outlook.ApplicationClass' al tipo de interfaz 'Microsoft.Office.Interop.Outlook._Application'. Ocurrió un error de operación debido a que la llamada QueryInterface en el componente COM para la interfaz con IID '{00063001-0000-0000-C000-000000000046}' generó el siguiente error: Interfaz no registrada (Excepción de HRESULT: 0x80040155).
El código es el siguiente:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
Private Sub btn_Mail_Click(sender As Object, e As EventArgs) Handles btn_Mail.Click
'creo un objeto de la aplicación outlook Dim oApp As Outlook._ApplicationoApp = New Outlook.Application
'Creo un objeto de tipo mail Dim oMsg As Outlook.MailItemTry
oMsg = oApp.CreateItem(Outlook.OlItemType.olMailItem)
'Le pongo de asunto el titulo de la obraoMsg.Subject = txt_Titulo.Text
'Le añado el cuerpo del mensajeoMsg.Body = "Bon dia " & cbb_Contacto.Text & ","
'le añado el mail de destinooMsg.To = txt_Mail.Text
'muestro el mensajeoMsg.Display()
Catch ex As Exception
MessageBox.Show(ex.Message)
Finally
oMsg = NothingoApp.Quit()
oApp = NothingEnd Try
End Sub
El error me lo da la siguiente linea:
1
oMsg = oApp.CreateItem(Outlook.OlItemType.olMailItem)
¿Alguien me puede orientar a que se debe este error?
Valora esta pregunta
0
