Estou utilizando a include {UTP/UTAPI019.i} para enviar emails. Quando executo esta include pelo EMS consigo enviar o email sem problemas, mas quando executo pelo WebSpeed não funciona. É exibido o log: Procedure: 'pi-exchange2 utp/utapi019.p' Line:1274) Error code: 0x80020009 pi-exchange2 utp/utapi019.p (5890) Procedure: 'pi-exchange2 utp/utapi019.p' Line:1274) Error occurred while accessing component property/method: Body. Procedure: 'pi-exchange2 utp/utapi019.p' Line:1274) Tipos incompatíveis: não é possível forçar o valor do parâmetro. O Outlook não pode converter a seqüência de caracteres. Procedure: 'pi-exchange2 utp/utapi019.p' Line:1274) Error code: 0x80020009 pi-exchange2 utp/utapi019.p (5890) Procedure: 'pi-exchange2 utp/utapi019.p' Line:1274) Unable to set com-handle property. (5677) Procedure: 'pi-exchange2 utp/utapi019.p' Line:1309) Error occurred while accessing component property/method: Body. Procedure: 'pi-exchange2 utp/utapi019.p' Line:1309) Memória ou recursos do sistema insuficientes. Feche algumas janelas ou programas e tente novamente. Procedure: 'pi-exchange2 utp/utapi019.p' Line:1309) Error code: 0x80020009 pi-exchange2 utp/utapi019.p (5890) Alguém sabe como posso corrigir isso? Obrigado
Consegui resolver fazendo da seguinte forma: Código: DEF VAR h_objoutlook AS COM-HANDLE NO-UNDO. DEF VAR h_objoutlookmsg AS COM-HANDLE NO-UNDO. DEF VAR h_objoutlookrecip AS COM-HANDLE NO-UNDO. CREATE "Outlook.Application" h_objoutlook. h_objoutlookmsg = h_objoutlook:CreateItem(0). h_objoutlookrecip = h_objoutlookmsg:Recipients:Add("meu_email@email.com.br"). h_objoutlookrecip:Type = 1. h_objoutlookmsg:Subject = "Test send Subject". h_objoutlookmsg:Body = "<message_contents>". h_objoutlookrecip:Resolve. h_objoutlookmsg:SEND. RELEASE OBJECT h_objoutlook. RELEASE OBJECT h_objoutlookmsg. RELEASE OBJECT h_objoutlookrecip.
