Invio Posta PEC

[Romeo]

Ciao,

Come si fa ad inviare un messaggio di posta PEC ?

SI può usare il comado:

DEFINE MAIL oMail
SUBJECT .....
TO ......
TEXT .....
ACTIVATE MAIL oMail

Grazie
Romeo

[Romeo]

Ho provato ad usare questo tuo (forse) esempio del forum con un indirizzo pec e non va, mi da errore come indicato, mentre se uso una posta mail normale di gmail funziona.
Mi sa che ci vuole qualche correzione , magari sul server pec di gmail o altro:
**********************************
#include "fivewin.ch"

function main()
LOCAL oEmailMsg
LOCAL cSchema := "http://schemas.microsoft.com/cdo/configuration/"

oEmailMsg := CREATEOBJECT ( "CDO.Message" )

WITH OBJECT oEmailMsg

:From := "pincopalla@pec.it"
:To := "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"
:Item( cSchema + "smtpserverport" ):Value := 465
:Item( cSchema + "sendusing" ):Value := 2
:Item( cSchema + "smtpauthenticate" ):Value := .T.
:Item( cSchema + "smtpusessl" ):Value := .T.
:Item( cSchema + "sendusername" ):Value := "pincopallal@pec.it"
:Item( cSchema + "sendpassword" ):Value := "miapasswordpec"
:Item( cSchema + "smtpconnectiontimeout"):Value := 30

:Update()

END WITH

:Send() *<--- qui mi da l'errore

END WITH

RETURN NIL
*******************

[Romeo]

Risolto !

Ho dovuto inserire
:Item( cSchema + "smtpserver" ):Value := "smtps.pec.aruba.it"


Sorry

[Romeo]

Mai possibile che non riesco a trovare una lista degli indirizzi dei server PEC smtp ?

Esempio per aruba ho trovato: smtps.pec.aruba.it

Ma per gli altri ? (gmail, fastweb,..)

Tks

[Silvio.Falconi]

register.it
server.pec-­email.com

https://www.register.it/wp-content/uplo ... Client.pdf

legalmail
Server di Posta in Entrata : mbox.cert.legalmail.it
Server di Posta in Uscita: sendm.cert.legalmail.it
Porta in entrata: 995
Porta in uscita: 25 o 465
Utilizzare la connessione sicura SSL/TSL

Pec.net
server.pec-email.com Porta 465

Posta ITaliane
mail.postecert.it
porta 465

Cmq smtps.pec.aruba.it è la maggiore che usano

cmq trova una lista qui
SMTP/POP https://httplab.it/popandsmtp.php
pubbliche amministrazioni, consultabili su IndicePA https://www.indicepa.gov.it/documentale/index.php?
professionisti iscritti ad albi ed elenchi professionali, raccolti in INI-PEC; http://www.inipec.gov.it/cerca-pec
soggetti iscritti al registro delle imprese, inclusi in INI-PEC http://www.inipec.gov.it/cerca-pec