FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Problema para enviar e-mail
Posts: 325
Joined: Sun Feb 03, 2008 11:04 PM

Problema para enviar e-mail

Posted: Sat Jul 19, 2008 01:52 PM

Hola Amigos

Estoy tratando enviar un e-mail en programa de e-mail me lo rechaza

include "fivewin.ch"

include "mail.ch"

function main()
local oWnd
define window oWnd
activate window oWnd on init doit()
return nil

function doit()
local oMail,aCustomer:={}
local cSubject:="Prueba"
local cMessage:="Prueba de envio de e-mail"

aadd(aCustomer,"dbarrio@jla.com.ar")

DEFINE MAIL oMail;
SUBJECT cSubject;
TEXT cMessage

oMail:aRecipients:=aCustomer

ACTIVATE MAIL oMail

msgInfo("mail sent")

return nil

Posts: 325
Joined: Sun Feb 03, 2008 11:04 PM

Problema para enviar e-mail

Posted: Sun Jul 20, 2008 01:25 PM

Le comento que sale desde el correo pero me reclaza el envio el outlook, que podra ser??

gracias

David

Posts: 325
Joined: Sun Feb 03, 2008 11:04 PM

Problema para enviar e-mail

Posted: Tue Jul 22, 2008 08:27 AM

Ya solucioné, estaba ejecutando el programa con outlook, y no con uotlook express.

muchas gracias igualmente

dbarrio
argentina

Continue the discussion