- CAYETANO CUESTAS
- PowerBuilder
- Thursday, 17 May 2018 05:29 PM UTC
Buen día para todos...
Estoy tratando de abrir un correo desde power builder con el codigo siguiente que me funciona para word, excel, power point pero no para Outlook.. Alguien puede ayudarme para saber que me esta faltando aca para poder completar la instruccion?
Gracias,
OLEObject ole_object3
integer li_resultado3
ole_object3 = CREATE OleObject
li_resultado3 = ole_object3.ConnectToNewObject('Outlook.Application')
If li_resultado3 0 then
DESTROY ole_object3
MessageBox ('error', 'NO PUEDE CONECTARSE A OUTLOOK')
RETURN
end if
fil = dw_10.GetRow()
DOC = dw_10.GetItemString(fil, 'NOMALFDOC')
DOCUMENTO1 = 'Q:\'+DOC+ ".msg"
ole_object3.workbooks.Open(DOCUMENTO1)
ole_object3.Visible=true
ole_object3.DisconnectObject()
DESTROY ole_object3
Find Questions by Tag
Helpful?
If a reply or comment is helpful for you, please don’t hesitate to click the Helpful button. This action is further confirmation of their invaluable contribution to the Appeon Community.