FiveTech Software tech support forums

... = 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])) endif Next :Send() END WITH lRet := .t. CATCH MsgInfo("No fue posible enviar el correo") lRet := .f. END ...

... OBJECT oEmailMsg :From := alltrim(_from) :To := alltrim(_to) :CC := "" :BCC := "" :Subject := _subject :TextBody := _textbody :AddAttachment( ALLTRIM( "c:\test0.prg" ) ) WITH OBJECT :configuration:Fields :Item( cSchema + "smtpserver" ):Value := alltrim(_smtpserver) ...

... := "" oEmailMsg:Subject := cSubject oEmailMsg:MDNRequested := FALSE oEmailMsg:HTMLBody := cBody If File( cAttach ) oEmailMsg:AddAttachment := cAttach Endif If lAttachCsv .AND. File( cCsvFile ) oEmailMsg:AddAttachment := cCsvFile Endif oEmailMsg:Send() Catch oError MsgInfo( ...

Good Morning, oEmailMsg:AddAttachment method Show your email sending routine please. test it too, with my email sending routine: RMAIL.PRG Download Complete, https://mega.nz/file/FQFWgIDT#kvRtIHIesRpTw9I8CxJenTRikG4VXM0t_7J8qVQsOX8 ...

... -2147352573;SubSystem: WINOLE;Message: Argument error This seems to happen right when I attempt to attach the file using the oEmailMsg:AddAttachment method. If I don't include an attachment the email sends fine. Is there a way to get better information on the Argument error to help ...

... oMsg:CC = cCc ENDIF IF !lHtml oMsg:TextBody = cMessage ELSE oMsg:HTMLBody = cMessage ENDIF IF !EMPTY( aAttach ) FOR i = 1 TO LEN( aAttach ) oMsg:AddAttachment( aAttach[ i ] ) NEXT ENDIF IF lNotification oMsg:Fields:Item( "urn:schemas:mailheader:disposition-notification-to" ):Value = ...

... :CC :="" :BCC :="" :Subject := "Soggetto" :TextBody := "Testo del messaggio" :AddAttachment(hb_curdrive()+":\"+curdir()+"\test.txt" ) WITH OBJECT :configuration:Fields :Item( cSchema + "smtpserver" ...

... :CC :="" :BCC :="" :Subject := "Soggetto" :TextBody := "Testo del messaggio" :AddAttachment(hb_curdrive()+":\"+curdir()+"\test.txt" ) WITH OBJECT :configuration:Fields :Item( cSchema + "smtpserver" ...

... :CC :="" :BCC :="" :Subject := "Soggetto" :TextBody := "Testo del messaggio" :AddAttachment(hb_curdrive()+":\"+curdir()+"\test.txt" ) WITH OBJECT :configuration:Fields :Item( cSchema + "smtpserver" ...

... :CC :="" :BCC :="" :Subject := "Soggetto" :TextBody := "Testo del messaggio" :AddAttachment(hb_curdrive()+":\"+curdir()+"\test.txt" ) WITH OBJECT :configuration:Fields :Item( cSchema + "smtpserver" ...

... :CC :="" :BCC :="" :Subject := "Soggetto" :TextBody := "Testo del messaggio" :AddAttachment(hb_curdrive()+":\"+curdir()+"\test.txt" ) WITH OBJECT :configuration:Fields :Item( cSchema + "smtpserver" ...

... :CC := "" :BCC := "" :Subject := _subject :TextBody := _textbody for _j:=1 to len(_arrattach) _cfile:=_arrattach[_j] :AddAttachment(_cfile) next _j WITH OBJECT :configuration:Fields :Item( cSchema + "smtpserver" ):Value := alltrim(_smtpserver) :Item( cSchema ...

... "pincopalla@pec.it" :CC := "" :BCC := "" :Subject := ALLTRIM( "ALGO" ) :TextBody := "CUERPITO" :AddAttachment( ALLTRIM( "c:\test.prg" ) ) WITH OBJECT :configuration:Fields :Item( cSchema + "smtpserver" ):Value := "smtp.gmail.com" ...

... oCfg :From = cFrom :To = cTo :CC = cCC :BCC = cBCC :Subject = cSubject :TextBody = cMsg For x2 := 1 To Len( cAttach ) if cAttach[x2] <> NIL :AddAttachment(cAttach[x2]) endif Next :Send() END WITH lRet := .t. CATCH lRet := .f. ++Vezes loop END Exit Enddo Return lRet

... funcione correctamente se debe corregir una linea del codigo que esta mal escrita esto es lo que dicce en el PRG: For nEle := 1 To Len( aAttach ) :AddAttachment := AllTrim( aAttach[ nEle ] ) Next el error se produce al tratar de adjuntar archivos porque esta mal escrito el argumento de :AddAttachment() ...