FiveTech Software tech support forums

... ) //Traza( 1, "ValType(oMsg)=", ValType(oMsg) ) oMsg:Configuration := oCfg //Traza( 1, ":" ) IF !EMPTY( cSender ) cFrom := ["] + cSender + ["] + " <" + cFrom + ">" //Traza( 1, ":" ) ENDIF oMsg:DSNOptions := 14 /// <<<<<<<<<<<<<<<< ...

... ) //Traza( 1, "ValType(oMsg)=", ValType(oMsg) ) oMsg:Configuration := oCfg //Traza( 1, ":" ) IF !EMPTY( cSender ) cFrom := ["] + cSender + ["] + " <" + cFrom + ">" //Traza( 1, ":" ) ENDIF oMsg:DSNOptions := 14 /// <<<<<<<<<<<<<<<< ...

... reproducir el acuse de entrega. En mi código utilizo: oMsg:Fields:Item( "urn:schemas:mailheader:disposition-notification-to" ):Value = cFrom oMsg:Fields:Item( "urn:schemas:mailheader:return-receipt-to" ):Value = cFrom oMsg:Fields:Update() He encontrado varia documentación ...

I cannot test it but maybe oMailItem:to := cRecipient oMailItem:from := cFrom you should try Thank you. But I have tried and get an errormessage. Error description: (DOS Error -2147352570) WINOLE/1008  No exported variable: FROM   Args:     [   ...

I cannot test it but maybe

oMailItem:to := cRecipient
oMailItem:from := cFrom

you should try

... no se puede enviar los correos utilizando CDO TRY oMsg := CREATEOBJECT ( "CDO.Message" ) WITH OBJECT oMsg :Configuration = oCfg :From = cFrom :To = cTo :CC = cCC :BCC = cBCC :Subject = cSubject :TextBody = cMsg For x := 1 To Len( aAttach ) if aAttach[x] <> NIL :AddAttachment(AllTrim(aAttach[x])) ...

... Local cServer := "smtp.gmail.com" Local cUserName := "Shipping@mycompany.com" Local cPassWord := "mypassword" Local cFrom := "Shipping@mycompany.com" Local cSubject := DtoC( Date() ) + "-" + Time() + ", SPF Test for EMail" Local cToAddr ...

... this forum.. ****************************************************************************************************** STATIC FUNCTION SENDMAIL( cFrom, cServer, cTo, cSubject, cMessage, aAttach, cSender, cUser, cPassword, aCc, lHtml, cPort, lNotification, lSSL ) LOCAL lOk := .F. LOCAL oCfg, oMsg ...

... these as in my Gmail account.... Allow Less Secure Apps - is ON 2-step verification - DISABLED I am passing all parameters to sendmail() SENDMAIL( cFrom, cServer, cTo, cSubject, cMessage, aAttach, cSender, cUser, cPassword, aCc, lHtml, cPort,lNotification , lSSL ) This is the return message : "Unsent ...

El Provedor, és gmail.com? Saludos. Karinha, buenos días: cFrom := PadR( 'xxxxxxxxx@alojamientovirtual.com', 180 ), cTo := PadR( 'xxxxxxx@gmail.com', 180 ) El email va desde una cuenta de "alojamientovirtual.com" a una de "gmail" ...

karinha wrote:El Provedor, és gmail.com?

Saludos.

Karinha, buenos días:

cFrom := PadR( 'xxxxxxxxx@alojamientovirtual.com', 180 ),
cTo := PadR( 'xxxxxxx@gmail.com', 180 )

El email va desde una cuenta de "alojamientovirtual.com" a una de "gmail"

... ( infos from internet ): // smtp.de.aol.com for emails ending with aol.com // login for the SMTP-Server is needed. // username and password LOCAL cFrom := "Uwe" LOCAL cServer := "smtp.de.aol.com" LOCAL cTo := "esckoenig@aol.com" // my email for testing the mailbox ...

... cAttach) endif Return lRet ******************************************************************************** Static Function Envia_Mail(oCfg,cFrom, cTo, cCC, cBCC, cMsg, cSubject, cAttach) local cToken local lRet := .f. local Vezes := 0 Do While Vezes <= 5 cTo := Destinatarios( cTo ) //--> ...

... 25 METHOD NoOp() 26 METHOD Rest( nPos ) 27 METHOD Pwd() 28 METHOD Cwd( cPath ) 29 METHOD Dele( cPath ) 30 METHOD LS( cSpec ) 31 METHOD Rename( cFrom, cTo ) 32 METHOD MKD( cPath ) 33 METHOD RMD( cPath ) 34 METHOD Retr( cFile ) 35 METHOD Stor( cFile ) 36 METHOD List( cSpec ) 37 METHOD UserCommand( ...

... Indirect execution support: --------------------------- Other than codeblocks, xHarbour provides the inderect execution function HB_ExecFromArray() that has the following syntax: HB_ExecFromArray( cFuncName, [aParams] ) --> result HB_ExecFromArray( @nFuncId(), [aParams] ) --> ...