Re: ENVIAR UN EMAIL
Posted: Fri Apr 12, 2019 7:46 pm
Arreglado con OUTLOOK
execute file "outlook.exe"
oOutLook := CreateObject("Outlook.Application")
oMail := oOutLook:CreateItem(0)
oRecip := oMail:Recipients
oRecip:Add( Win_eMail.cTo.Value )
oMail:CC:= Win_eMail.cCo.Value
execute file "outlook.exe"
oOutLook := CreateObject("Outlook.Application")
oMail := oOutLook:CreateItem(0)
oRecip := oMail:Recipients
oRecip:Add( Win_eMail.cTo.Value )
oMail:CC:= Win_eMail.cCo.Value