Invio della posta elettronica - Cronologia

Vuott il 23:29, 8 giu 2024

2024-06-08T23:29:17Z

← Versione meno recente		Versione delle 17:29, 8 giu 2024
Riga 177:		Riga 177:
	Public Sub Button1_Click()		Public Sub Button1_Click()

	~~Dim pass As String = "propria_password"~~		If exist("/etc/acpi/mailbtn.sh") then
			Shell "echo '<FONT Color=gray>MIA_PASSWORD</font>' \| sudo -S /etc/acpi/mailbtn.sh"
	If exist("/etc/acpi/mailbtn.sh") then		Message.Warning("Premere un tasto per avviare il programma di invio della posta elettronica.")
	Shell "echo '<FONT Color=gray>MIA_PASSWORD</font>' \| sudo -S /etc/acpi/mailbtn.sh"		Else
	Message.Warning("Premere un tasto per avviare il programma di invio della posta elettronica.")		Message.Warning("Non è presente nel sistema lo script\"mailbtn.sh\".")
	Else		Endif
	Message.Warning("Non è presente nel sistema lo script\"mailbtn.sh\".")
	Endif

	End		End

Vuott il 23:28, 8 giu 2024

2024-06-08T23:28:47Z

← Versione meno recente		Versione delle 17:28, 8 giu 2024
Riga 28:		Riga 28:

	With SMTP		With SMTP
	.Host = "''nome_Host''"		.Host = "<FONT Color=darkorange>''nome_Host''</font>"
	.Port = ''Porta_Host''		.Port = <FONT Color=darkorange>''Porta_Host''</font>
	.User = "''nome_utente''"		.User = "<FONT Color=darkorange>''nome_utente''</font>"
	.Password = "''password''"		.Password = "<FONT Color=darkorange>''password''</font>"
	.Debug = True		.Debug = True
	.From = "''indirizzo_email_di_chi_invia_la posta''"		.From = "<FONT Color=darkorange>''indirizzo_email_di_chi_invia_la posta''</font>"
	.To.Add("''indirizzo_email_del_destinatario''")		.To.Add("<FONT Color=darkorange>''indirizzo_email_del_destinatario''</font>")
	.Subject = "''testo_dell'Oggetto_della_email''"		.Subject = "<FONT Color=darkorange>''testo_dell'Oggetto_della_email''</font>"
	.Encrypt = Net.SSL		.Encrypt = Net.SSL
	.Add("''testo_del_corpo_dell'email - ossia_il_messaggio''")		.Add("<FONT Color=darkorange>''testo_del_corpo_dell'email - ossia_il_messaggio''</font>")
	If IsNull(file_allegato) = False Then .Add(file_allegato)		If IsNull(file_allegato) = False Then .Add(file_allegato)
	.Send()		.Send()
Riga 180:		Riga 180:

	If exist("/etc/acpi/mailbtn.sh") then		If exist("/etc/acpi/mailbtn.sh") then
	Shell "echo ~~" & pass & "~~ \| sudo -S /etc/acpi/mailbtn.sh"		Shell "echo '<FONT Color=gray>MIA_PASSWORD</font>' \| sudo -S /etc/acpi/mailbtn.sh"
	Message.Warning("Premere un tasto per avviare il programma di invio della posta elettronica.")		Message.Warning("Premere un tasto per avviare il programma di invio della posta elettronica.")
	Else		Else

Vuott il 23:58, 4 mar 2024

2024-03-04T23:58:39Z

← Versione meno recente		Versione delle 17:58, 4 mar 2024
Riga 4:		Riga 4:
	==Uso del Metodo ".SendMail()" della classe ''Desktop''==		==Uso del Metodo ".SendMail()" della classe ''Desktop''==
	Per poter utilizzare il Metodo ".SendMail()" della classe ''Desktop'', si dovrà impostare nel progetto anche il componente <FONT color=#B22222>''gb.desktop''</font>:		Per poter utilizzare il Metodo ".SendMail()" della classe ''Desktop'', si dovrà impostare nel progetto anche il componente <FONT color=#B22222>''gb.desktop''</font>:
	~~'''~~Public~~'''~~ Sub Button1_Click()		Public Sub Button1_Click()

	Desktop.SendMail(["<FONT Color=gray>''lista_degli_indirizzi_email_dei_destinatari''</font>"], ["<FONT Color=gray>''lista_dei_destinatari_CC''</font>"], ["<FONT Color=gray>''lista_dei_destinatari_BCC''</font>"], "<FONT Color=gray>''oggetto_dell'email''</font>", "<FONT Color=gray>''corpo_dell'email''</font>", "<FONT Color=gray>''percorso_del_file_che_sarà_allegato''</font>")		Desktop.SendMail(["<FONT Color=gray>''lista_degli_indirizzi_email_dei_destinatari''</font>"], ["<FONT Color=gray>''lista_dei_destinatari_CC''</font>"], ["<FONT Color=gray>''lista_dei_destinatari_BCC''</font>"], "<FONT Color=gray>''oggetto_dell'email''</font>", "<FONT Color=gray>''corpo_dell'email''</font>", "<FONT Color=gray>''percorso_del_file_che_sarà_allegato''</font>")

	~~'''~~End~~'''~~		End
	Se la lista ''CC'' e/o la lista ''BCC'' non è presente, allora si porrà uno spazio vuoto: [" "],... .		Se la lista ''CC'' e/o la lista ''BCC'' non è presente, allora si porrà uno spazio vuoto: [" "],... .

	Se non deve essere allegato alcun file, allora si ometterà il corrispondente parametro di riferimento.		Se non deve essere allegato alcun file, allora si ometterà il corrispondente parametro di riferimento.

			Il Metodo "Desktop.SendMail()" è solo un'interfaccia per il portale desktop o gli script XDG: il corpo del messaggio deve essere un testo semplice e l'argomento dell'allegato non funziona con il portale desktop al momento.

	In questo caso il browser avvierà il programma per la gestione della posta elettronica.		In questo caso il browser avvierà il programma per la gestione della posta elettronica.



	==Uso della Classe "''SmtpClient'' "==		==Uso della Classe "''SmtpClient'' "==
	Per utilizzare la classe "''SmtpClient'' ", si dovrà impostare nel progetto anche il Componente <FONT color=#B22222>''gb.net.smtp''</font>:		Per utilizzare la classe "''SmtpClient'' ", si dovrà impostare nel progetto anche il Componente <FONT color=#B22222>''gb.net.smtp''</font>:
	~~'''~~Public~~'''~~ Sub Button1_Click()		Public Sub Button1_Click()

	Dim SMTP As New SmtpClient		Dim SMTP As New SmtpClient
Riga 41:		Riga 42:
	End With		End With

	~~'''~~End~~'''~~		End
	Laddove in particolare:		Laddove in particolare:
	<BR>- la Proprietà ''.Host'' si riferisce al ''Server'' di posta elettronica presso il quale il mittente possiede la registrazione di casella postale elettronica. Solitamente inizia con smtp.server.xx		<BR>- la Proprietà ''.Host'' si riferisce al ''Server'' di posta elettronica presso il quale il mittente possiede la registrazione di casella postale elettronica. Solitamente inizia con smtp.server.xx
Riga 56:		Riga 57:

	Il codice Gambas sarà dunque il seguente:		Il codice Gambas sarà dunque il seguente:
	~~'''~~Public~~'''~~ Sub Button1_Click()		Public Sub Button1_Click()

	Dim SMTP As New SmtpClient		Dim SMTP As New SmtpClient
Riga 78:		Riga 79:
	End With		End With

	~~'''~~End~~'''~~		End
	L'invio di posta elettronica con la Classe ''SmtpClient'' funziona anche in un'applicazione ''a riga di comando''.		L'invio di posta elettronica con la Classe ''SmtpClient'' funziona anche in un'applicazione ''a riga di comando''.

Riga 84:		Riga 85:
	Per inviare contemporaneamente la email a più destinatari, scrivendo il loro indirizzo di posta elettronica nel medesimo ''campo'' dei destinatari, si utilizzerà il Metodo ".Insert()" delle Proprietà disponibili: ".To.", ".Cc", ".Bcc".		Per inviare contemporaneamente la email a più destinatari, scrivendo il loro indirizzo di posta elettronica nel medesimo ''campo'' dei destinatari, si utilizzerà il Metodo ".Insert()" delle Proprietà disponibili: ".To.", ".Cc", ".Bcc".
	<BR>L'argomento del predetto Metodo "''.Insert( )''" sarà un vettore di tipo ''Strng[ ]'' contenente gli indirizzi di posta elettronica dei destinatari, ai quali inviare la medesima email.		<BR>L'argomento del predetto Metodo "''.Insert( )''" sarà un vettore di tipo ''Strng[ ]'' contenente gli indirizzi di posta elettronica dei destinatari, ai quali inviare la medesima email.



	==Uso del comando specifico html==		==Uso del comando specifico html==
	Con alcuni oggetti che supportano il codice ''html'' si potrà utilizzare lo specifico comando ''A HREF + mailto'':		Con alcuni oggetti che supportano il codice ''html'' si potrà utilizzare lo specifico comando ''A HREF + mailto'':
	~~'''~~Public~~'''~~ Sub Button1_Click()		Public Sub Button1_Click()

	<FONT color=#006400>' ''Qui, come esempio, utilizzeremo l'oggetto "Message":''</font>		<FONT color=#006400>' ''Qui, come esempio, utilizzeremo l'oggetto "Message":''</font>
	Message.Info("<A HREF=\"mailto:<FONT Color=gray>''indirizzo_email_del_destinatario''</font>\">Un testo qualsiasi</a>")		Message.Info("<A HREF=\"mailto:<FONT Color=gray>''indirizzo_email_del_destinatario''</font>\">Un testo qualsiasi</a>")

	~~'''~~End~~'''~~		End
	In questo caso il browser avvierà il programma per la gestione della posta elettronica.		In questo caso il browser avvierà il programma per la gestione della posta elettronica.



	==Uso di ''Thunderbird'', ''Evolution'' e ''KMail''==		==Uso di ''Thunderbird'', ''Evolution'' e ''KMail''==
	Mostreremo ora la modalità per inviare posta elettronica mediante "''Thunderbird'' ", "''Evolution'' " e "''KMail'' " con l'uso del comando ''Shell'': <SUP>[[[#Note\|Nota 1]]]</sup>		Mostreremo ora la modalità per inviare posta elettronica mediante "''Thunderbird'' ", "''Evolution'' " e "''KMail'' " con l'uso del comando ''Shell'': <SUP>[[[#Note\|Nota 1]]]</sup>
	~~'''~~Public~~'''~~ Sub Button1_Click()		Public Sub Button1_Click()

	postaElettronica("<FONT Color=gray>''client_di_posta''</font>", "<FONT Color=gray>''indirizzo_destinatario''</font>", "<FONT Color=gray>''Oggetto_dell'email''</font>", "<FONT Color=gray>''Corpo_dell'email''</font>", "<FONT Color=gray>''invio_file_allegato''</font>")		postaElettronica("<FONT Color=gray>''client_di_posta''</font>", "<FONT Color=gray>''indirizzo_destinatario''</font>", "<FONT Color=gray>''Oggetto_dell'email''</font>", "<FONT Color=gray>''Corpo_dell'email''</font>", "<FONT Color=gray>''invio_file_allegato''</font>")

	~~'''~~End~~'''~~		End

	~~'''~~Public~~'''~~ Sub postaElettronica(client As integer, destinatario As String, oggetto As String, corpo As String, allegato As String)
			Public Sub postaElettronica(client As integer, destinatario As String, oggetto As String, corpo As String, allegato As String)

	Dim comandomail As String		Dim comandomail As String
Riga 169:		Riga 169:
	Endif		Endif

	~~'''~~End~~'''~~		End
	In questo caso il browser avvierà il programma per la gestione della posta elettronica.		In questo caso il browser avvierà il programma per la gestione della posta elettronica.



	==Uso dello script ''mailbtn.sh'' con il comando ''Shell''==		==Uso dello script ''mailbtn.sh'' con il comando ''Shell''==
	In "''/etc/acpi/events'' " è possibile trovare tutti gli eventi riconosciuti. Se nella cartella "''/etc/acpi''" è presente lo script "''/etc/acpi/mailbtn.sh'' ", potrà essere utilizzato con il comando ''Shell'' per avviare il programma per la gestione della posta elettronica.:		In "''/etc/acpi/events'' " è possibile trovare tutti gli eventi riconosciuti. Se nella cartella "''/etc/acpi''" è presente lo script "''/etc/acpi/mailbtn.sh'' ", potrà essere utilizzato con il comando ''Shell'' per avviare il programma per la gestione della posta elettronica.:
	~~'''~~Public~~'''~~ Sub Button1_Click()		Public Sub Button1_Click()

	Dim pass As String = "propria_password"		Dim pass As String = "propria_password"
Riga 187:		Riga 186:
	Endif		Endif

	~~'''~~End~~'''~~		End
	In questo caso si avvierà il programma per la gestione della posta elettronica.		In questo caso si avvierà il programma per la gestione della posta elettronica.

Vuott il 23:08, 14 lug 2022

2022-07-14T23:08:54Z

← Versione meno recente		Versione delle 17:08, 14 lug 2022
Riga 43:		Riga 43:
	'''End'''		'''End'''
	Laddove in particolare:		Laddove in particolare:
	<BR>- la ~~prorpietà~~ ''.Host'' si riferisce al ''Server'' di posta elettronica presso il quale il mittente possiede la registrazione di casella postale elettronica. Solitamente inizia con smtp.server.xx		<BR>- la Proprietà ''.Host'' si riferisce al ''Server'' di posta elettronica presso il quale il mittente possiede la registrazione di casella postale elettronica. Solitamente inizia con smtp.server.xx
	<BR>- la ~~proprietà~~ ''.Port'' si riferisce alla porta in ''uscita'' del predetto ''Server'';		<BR>- la Proprietà ''.Port'' si riferisce alla porta in ''uscita'' del predetto ''Server'';
	<BR>- la ~~proprietà~~ ''.User'' si riferisce all'indirizzo della casella di posta elettronica di chi ''invia'' il messaggio di posta elettronica;		<BR>- la Proprietà ''.User'' si riferisce all'indirizzo della casella di posta elettronica di chi ''invia'' il messaggio di posta elettronica;
	<BR>- la ~~proprietà~~ ''.Password'' si riferisce alla parola d'ordine utilizzata dall'utente per accedere al servizio di posta elettronica presso il proprio ''Server''.		<BR>- la Proprietà ''.Password'' si riferisce alla parola d'ordine utilizzata dall'utente per accedere al servizio di posta elettronica presso il proprio ''Server''.

Vuott il 23:06, 14 lug 2022

2022-07-14T23:06:59Z

← Versione meno recente		Versione delle 17:06, 14 lug 2022
Riga 2:		Riga 2:


	==Uso del ~~metodo~~ "''.SendMail''" della classe ''Desktop''==		==Uso del Metodo ".SendMail()" della classe ''Desktop''==
	Per poter utilizzare il ~~metodo~~ "''.SendMail''" della classe ''Desktop'', si dovrà impostare nel progetto anche il componente <FONT color=#B22222>''gb.desktop''</font>:		Per poter utilizzare il Metodo ".SendMail()" della classe ''Desktop'', si dovrà impostare nel progetto anche il componente <FONT color=#B22222>''gb.desktop''</font>:
	'''Public''' Sub Button1_Click()		'''Public''' Sub Button1_Click()

Riga 17:		Riga 17:


	==Uso della Classe "''SmtpClient''"==		==Uso della Classe "''SmtpClient'' "==
	Per utilizzare la classe "''SmtpClient''", si dovrà impostare nel progetto anche il ~~componente~~ <FONT color=#B22222>''gb.net.smtp''</font>:		Per utilizzare la classe "''SmtpClient'' ", si dovrà impostare nel progetto anche il Componente <FONT color=#B22222>''gb.net.smtp''</font>:
	'''Public''' Sub Button1_Click()		'''Public''' Sub Button1_Click()

	Dim SMTP As New SmtpClient		Dim SMTP As New SmtpClient
	Dim file_allegato AS String		Dim file_allegato AS String

	file_allegato = File.Load("<FONT Color=gray>''/percorso/dell'eventuale/file/da/allegare''</font>")		file_allegato = File.Load("<FONT Color=gray>''/percorso/dell'eventuale/file/da/allegare''</font>")
Riga 58:		Riga 58:
	'''Public''' Sub Button1_Click()		'''Public''' Sub Button1_Click()

	Dim SMTP As New SmtpClient		Dim SMTP As New SmtpClient
	Dim file_allegato AS String		Dim file_allegato AS String

	file_allegato = File.Load("<FONT Color=gray>''/percorso/dell'eventuale/file/da/allegare''</font>")		file_allegato = File.Load("<FONT Color=gray>''/percorso/dell'eventuale/file/da/allegare''</font>")
Riga 79:		Riga 79:

	'''End'''		'''End'''
			L'invio di posta elettronica con la Classe ''SmtpClient'' funziona anche in un'applicazione ''a riga di comando''.
	L'invio di posta elettronica con la Classe ''SmtpClient'' funziona anche in applicazione ''a riga di comando''.


	====Invio a più destinatari contemporaneamente====		====Invio a più destinatari contemporaneamente====
	Per inviare contemporaneamente la email a più destinatari, scrivendo il loro indirizzo di posta elettronica nel medesimo ''campo'' dei destinatari, si utilizzerà il Metodo "''.Insert( )''" delle ~~proprietà~~ disponibili: "''.To.''", "''Cc''", "''Bcc''".		Per inviare contemporaneamente la email a più destinatari, scrivendo il loro indirizzo di posta elettronica nel medesimo ''campo'' dei destinatari, si utilizzerà il Metodo ".Insert()" delle Proprietà disponibili: ".To.", ".Cc", ".Bcc".
	<BR>L'argomento del predetto Metodo "''.Insert( )''" sarà un vettore di tipo ''Strng[ ]'' contenente gli indirizzi di posta elettronica dei destinatari, ai quali inviare la medesima email.		<BR>L'argomento del predetto Metodo "''.Insert( )''" sarà un vettore di tipo ''Strng[ ]'' contenente gli indirizzi di posta elettronica dei destinatari, ai quali inviare la medesima email.

Riga 97:		Riga 95:

	'''End'''		'''End'''

	In questo caso il browser avvierà il programma per la gestione della posta elettronica.		In questo caso il browser avvierà il programma per la gestione della posta elettronica.

Riga 103:		Riga 100:

	==Uso di ''Thunderbird'', ''Evolution'' e ''KMail''==		==Uso di ''Thunderbird'', ''Evolution'' e ''KMail''==
	Mostreremo ora la modalità per inviare posta elettronica mediante "''Thunderbird''", "''Evolution''" e "''KMail''" con l'uso del comando ''Shell'': <SUP>[[[#Note\|Nota 1]]]</sup>		Mostreremo ora la modalità per inviare posta elettronica mediante "''Thunderbird'' ", "''Evolution'' " e "''KMail'' " con l'uso del comando ''Shell'': <SUP>[[[#Note\|Nota 1]]]</sup>
	'''Public''' Sub Button1_Click()		'''Public''' Sub Button1_Click()

Riga 109:		Riga 106:

	'''End'''		'''End'''


	'''Public''' Sub postaElettronica(client As integer, destinatario As String, oggetto As String, corpo As String, allegato As String)		'''Public''' Sub postaElettronica(client As integer, destinatario As String, oggetto As String, corpo As String, allegato As String)
Riga 174:		Riga 170:

	'''End'''		'''End'''

	In questo caso il browser avvierà il programma per la gestione della posta elettronica.		In questo caso il browser avvierà il programma per la gestione della posta elettronica.

Riga 180:		Riga 175:

	==Uso dello script ''mailbtn.sh'' con il comando ''Shell''==		==Uso dello script ''mailbtn.sh'' con il comando ''Shell''==
	In "''/etc/acpi/events''" è possibile trovare tutti gli eventi riconosciuti. Se nella cartella "''/etc/acpi''" è presente lo script "''/etc/acpi/mailbtn.sh''", potrà essere utilizzato con il comando ''Shell'' per avviare il programma per la gestione della posta elettronica.:		In "''/etc/acpi/events'' " è possibile trovare tutti gli eventi riconosciuti. Se nella cartella "''/etc/acpi''" è presente lo script "''/etc/acpi/mailbtn.sh'' ", potrà essere utilizzato con il comando ''Shell'' per avviare il programma per la gestione della posta elettronica.:
	'''Public''' Sub Button1_Click()		'''Public''' Sub Button1_Click()

	Dim pass As String = "propria_password"		Dim pass As String = "propria_password"

	If exist("/etc/acpi/mailbtn.sh") then		If exist("/etc/acpi/mailbtn.sh") then
Riga 197:		Riga 192:


	==Note==		=Note=
	[1] Il codice è tratto da un suggerimento dell'utente "''Golia''" del Forum di Gambas-it.org, al quale va un sentito ringraziamento.		[1] Il codice è tratto da un suggerimento dell'utente "''Golia''" del Forum di Gambas-it.org, al quale va un sentito ringraziamento.

Vuott il 22:20, 16 ott 2019

2019-10-16T22:20:38Z

← Versione meno recente		Versione delle 16:20, 16 ott 2019
Riga 6:		Riga 6:
	'''Public''' Sub Button1_Click()		'''Public''' Sub Button1_Click()

	Desktop.SendMail(["lista_degli_indirizzi_email_dei_destinatari"], ["lista_dei_destinatari_CC"], ["lista_dei_destinatari_BCC"], "oggetto_dell'email", "corpo_dell'email", "percorso_del_file_che_sarà_allegato")		Desktop.SendMail(["<FONT Color=gray>''lista_degli_indirizzi_email_dei_destinatari''</font>"], ["<FONT Color=gray>''lista_dei_destinatari_CC''</font>"], ["<FONT Color=gray>''lista_dei_destinatari_BCC''</font>"], "<FONT Color=gray>''oggetto_dell'email''</font>", "<FONT Color=gray>''corpo_dell'email''</font>", "<FONT Color=gray>''percorso_del_file_che_sarà_allegato''</font>")

	'''End'''		'''End'''
Riga 93:		Riga 93:
	'''Public''' Sub Button1_Click()		'''Public''' Sub Button1_Click()

	<FONT color=#006400>' ''~~qui~~, come esempio, utilizzeremo l'oggetto "Message":''</font>		<FONT color=#006400>' ''Qui, come esempio, utilizzeremo l'oggetto "Message":''</font>
	Message.Info("<A HREF=\"mailto:''indirizzo_email_del_destinatario''\">Un testo qualsiasi</a>")		Message.Info("<A HREF=\"mailto:<FONT Color=gray>''indirizzo_email_del_destinatario''</font>\">Un testo qualsiasi</a>")

	'''End'''		'''End'''
Riga 103:		Riga 103:

	==Uso di ''Thunderbird'', ''Evolution'' e ''KMail''==		==Uso di ''Thunderbird'', ''Evolution'' e ''KMail''==
	Mostreremo ora la modalità per inviare posta elettronica mediante "''Thunderbird''", "''Evolution''" e "''KMail''" con l'uso del comando ''Shell'': \|[[#Note\|1]]\|		Mostreremo ora la modalità per inviare posta elettronica mediante "''Thunderbird''", "''Evolution''" e "''KMail''" con l'uso del comando ''Shell'': <SUP>[[[#Note\|Nota 1]]]</sup>
	'''Public''' Sub Button1_Click()		'''Public''' Sub Button1_Click()

	postaElettronica("client_di_posta", "indirizzo_destinatario", "Oggetto_dell'email", "Corpo_dell'email", "invio_file_allegato")		postaElettronica("<FONT Color=gray>''client_di_posta''</font>", "<FONT Color=gray>''indirizzo_destinatario''</font>", "<FONT Color=gray>''Oggetto_dell'email''</font>", "<FONT Color=gray>''Corpo_dell'email''</font>", "<FONT Color=gray>''invio_file_allegato''</font>")

	'''End'''		'''End'''

Vuott il 22:04, 4 apr 2019

2019-04-04T22:04:29Z

← Versione meno recente		Versione delle 16:04, 4 apr 2019
Riga 81:		Riga 81:

	L'invio di posta elettronica con la Classe ''SmtpClient'' funziona anche in applicazione ''a riga di comando''.		L'invio di posta elettronica con la Classe ''SmtpClient'' funziona anche in applicazione ''a riga di comando''.


			====Invio a più destinatari contemporaneamente====
			Per inviare contemporaneamente la email a più destinatari, scrivendo il loro indirizzo di posta elettronica nel medesimo ''campo'' dei destinatari, si utilizzerà il Metodo "''.Insert( )''" delle proprietà disponibili: "''.To.''", "''Cc''", "''Bcc''".
			<BR>L'argomento del predetto Metodo "''.Insert( )''" sarà un vettore di tipo ''Strng[ ]'' contenente gli indirizzi di posta elettronica dei destinatari, ai quali inviare la medesima email.

Vuott il 23:22, 4 set 2016

2016-09-04T23:22:26Z

← Versione meno recente		Versione delle 17:22, 4 set 2016
Riga 22:		Riga 22:

	Dim SMTP As New SmtpClient		Dim SMTP As New SmtpClient
	Dim ~~$fl~~ AS String		Dim file_allegato AS String

	~~$fl~~ = File.Load("''/percorso/dell'eventuale/file/da/allegare''")		file_allegato = File.Load("<FONT Color=gray>''/percorso/dell'eventuale/file/da/allegare''</font>")

	With SMTP		With SMTP
Riga 37:		Riga 37:
	.Encrypt = Net.SSL		.Encrypt = Net.SSL
	.Add("''testo_del_corpo_dell'email - ossia_il_messaggio''")		.Add("''testo_del_corpo_dell'email - ossia_il_messaggio''")
	.Add(~~$fl~~)		If IsNull(file_allegato) = False Then .Add(file_allegato)
	.Send()		.Send()
	End With		End With
Riga 43:		Riga 43:
	'''End'''		'''End'''
	Laddove in particolare:		Laddove in particolare:
	<BR>- la prorpietà ''.Host'' si riferisce al ''Server'' di posta elettronica presso il quale ~~colui che invia~~ il ~~messaggio~~ possiede la registrazione di ~~una~~ casella postale elettronica;		<BR>- la prorpietà ''.Host'' si riferisce al ''Server'' di posta elettronica presso il quale il mittente possiede la registrazione di casella postale elettronica. Solitamente inizia con smtp.server.xx
	<BR>- la proprietà ''.Port'' si riferisce alla porta in ''uscita'' del predetto ''Server'';		<BR>- la proprietà ''.Port'' si riferisce alla porta in ''uscita'' del predetto ''Server'';
	<BR>- la proprietà ''.User'' si riferisce all'indirizzo della casella di posta elettronica di chi ''invia'' il messaggio di posta elettronica;		<BR>- la proprietà ''.User'' si riferisce all'indirizzo della casella di posta elettronica di chi ''invia'' il messaggio di posta elettronica;
Riga 52:		Riga 52:
	<BR>Poniamo dunque il caso di avere un account presso ''server'' di posta elettronica ''tiscali.it'' . In tal caso sappiamo che il parametro ''in uscita'' relativo al ''Server host'' principale di ''Tiscali'' è: ''smtp.tiscali.it'' .		<BR>Poniamo dunque il caso di avere un account presso ''server'' di posta elettronica ''tiscali.it'' . In tal caso sappiamo che il parametro ''in uscita'' relativo al ''Server host'' principale di ''Tiscali'' è: ''smtp.tiscali.it'' .
	<BR>Sappiamo anche che il numero della porta per la posta ''in uscita'' è attualmente: 465.		<BR>Sappiamo anche che il numero della porta per la posta ''in uscita'' è attualmente: 465.
	<BR>Poniamo il caso che il nome scelto dall'utente identificativo della propria casella di posta elettronica sia: ''~~esempio_invio~~@tiscali.it'', e che la sua password per accedere a tale casella postale sia: ''miapassword''.		<BR>Poniamo il caso che il nome scelto dall'utente mittente, identificativo della propria casella di posta elettronica, sia: ''nome_utente@tiscali.it'', e che la sua password per accedere a tale casella postale sia: ''miapassword''.
	<BR>Poniamo infine il caso che la casella di posta elettronica del destinatario del messaggio sia: ''~~esempio_riceve~~@yahoo.it'' .		<BR>Poniamo infine il caso che la casella di posta elettronica del destinatario del messaggio sia: ''esempio_destinatario@yahoo.it'' .

	Il codice Gambas sarà dunque il seguente:		Il codice Gambas sarà dunque il seguente:
Riga 59:		Riga 59:

	Dim SMTP As New SmtpClient		Dim SMTP As New SmtpClient
	Dim ~~allegato~~ AS String		Dim file_allegato AS String

	~~allegato~~ = File.Load("''/percorso/dell'eventuale/file/da/allegare''")		file_allegato = File.Load("<FONT Color=gray>''/percorso/dell'eventuale/file/da/allegare''</font>")

	With SMTP		With SMTP
	.Host = "<FONT Color=#B22222>smtp.tiscali.it</font>"		.Host = "<FONT Color=#B22222>smtp.tiscali.it</font>"
	.Port = <FONT Color=#B22222>465</font>		.Port = <FONT Color=#B22222>465</font>
	.User = "<FONT Color=#B22222>~~esempio_invio~~</font>" <FONT Color=gray>' ''ma va bene anche: ~~esempio_invio~~@tiscali.it''</font>		.User = "<FONT Color=#B22222>nome_utente</font>" <FONT Color=gray>' ''ma va bene anche: nome_utente@tiscali.it''</font>
	.Password = "<FONT Color=#B22222>miapassword</font>"		.Password = "<FONT Color=#B22222>miapassword</font>"
	.Debug = True		.Debug = True
	.From = "<FONT Color=#B22222>~~esempio_invio~~@tiscali.it</font>"		.From = "<FONT Color=#B22222>nome_utente@tiscali.it</font>"
	.To.Add("<FONT Color=#B22222>~~esempio_riceve~~@yahoo.it</font>")		.To.Add("<FONT Color=#B22222>esempio_destinatario@yahoo.it</font>")
	.Subject = "''testo_dell'Oggetto_della_email''"		.Subject = "''testo_dell'Oggetto_della_email''"
	.Encrypt = Net.SSL		.Encrypt = Net.SSL
	.Add("''testo_del_corpo_dell'email - ossia_il_messaggio''")		.Add("''testo_del_corpo_dell'email - ossia_il_messaggio''")
	If IsNull(~~allegato~~) = False Then .Add(~~allegato~~)		If IsNull(file_allegato) = False Then .Add(file_allegato)
	.Send()		.Send()
	End With		End With

Vuott il 07:52, 5 mag 2015

2015-05-05T07:52:54Z

← Versione meno recente		Versione delle 01:52, 5 mag 2015
Riga 77:		Riga 77:
	.Send()		.Send()
	End With		End With

			'''End'''

	L'invio di posta elettronica con la Classe ''SmtpClient'' funziona anche in applicazione ''a riga di comando''.		L'invio di posta elettronica con la Classe ''SmtpClient'' funziona anche in applicazione ''a riga di comando''.

Vuott il 07:51, 5 mag 2015

2015-05-05T07:51:09Z

← Versione meno recente		Versione delle 01:51, 5 mag 2015
Riga 24:		Riga 24:
	Dim $fl AS String		Dim $fl AS String

	$fl = File.Load("''/percorso/dell'eventuale/file/da/allegare''")		$fl = File.Load("''/percorso/dell'eventuale/file/da/allegare''")

	With SMTP		With SMTP
Riga 61:		Riga 61:
	Dim allegato AS String		Dim allegato AS String

	~~$fl~~ = File.Load("''/percorso/dell'eventuale/file/da/allegare''")		allegato = File.Load("''/percorso/dell'eventuale/file/da/allegare''")

	With SMTP		With SMTP