Inviare E-mail da vb net

mercoledì 06 aprile 2005 - 17.27

Marco81 Profilo | Newbie

Ciao, qualcuno sa come inviare e-mail tramite o la classe system.web o tramite quella apposita per outlook ? grazie

Marco81 Profilo | Newbie

Si, però volevo qualcosa che si legasse ad outlook perchè nella soluzione che dici tu ogni volta devo impostargli tutti i parametri ; la com per outlook c'è ma non riesco a utilizzarla (mentre invece per word è cosi semplice....) comunque grazie per la risposta, per ora utilizzo questa soluzione in attesa di altro ciao e grazie

Andy Profilo | Senior Member

Ciao..prova questa Sub..ti apre una mail Outlook compilata, ma devi poi inviarla tu e chiuderla tu..

Sub SendAttach(ByVal Attach_Path as string)
Dim objOutlk
Dim objMail
Dim strMsg as string

'Create a new message
objOutlk = CreateObject("Outlook.Application")
objMail = objOutlk.createitem(0)
objMail.To = "destinatario@dominio.it"
objMail.cc = ""
'Set up Subject Line
objMail.subject = "Soggetto"

objMail.attachments.add(Attach_Path)
objMail.body = "Corpo della mmia mail"
objMail.display()
'Clean up
objMail = Nothing
objOutlk = Nothing
End Sub


..spero ti sia utile..

Marco81 Profilo | Newbie

Perfetto ti ringrazio molto, ora devo risolvere un altro problema, svuotare il contenuto di un file txt nel body della mail .... grazie mille ciao

Andy Profilo | Senior Member

Beh, quello è il meno, apri il file .txt con un filestream e butti tutto nel campo del corpo della mail.

Marco81 Profilo | Newbie

Sì infatti ho fatto così, ho usato il filestream e fatto una megastringa, completa di chr(13) per andare a capo , ora ho un altro problema, modificare il font del body della mail da codice.... o modifico quello di default di outlook o lo modifico a mano ogni volta per ogni e-mail, se si potesse variare da codice sarebbe l'ideale ciao e grazie

trinity Profilo | Guru

potresti fare anche in questo modo:

Ti importi il namespace System.Web.Mail.

dim myMail as new System.Web.Mail.MailMessage()
myMail.Subject = "Mail di prova."
myMail.body = "Questa è una mail di test."
myMail.To = "Tizio "
myMail.From = "caio@ugidotnet.org"
smtpMail.SmtpServer = "[Nome o indirizzo IP del SMTP Server]"

smtpMail.send(myMail)

Ciao
Fabio

trinity Profilo | Guru

potresti fare anche in questo modo:

Ti importi il namespace System.Web.Mail.

dim myMail as new System.Web.Mail.MailMessage()
myMail.Subject = "Mail di prova."
myMail.body = "Questa è una mail di test."
myMail.To = "Tizio "
myMail.From = "caio@ugidotnet.org"
smtpMail.SmtpServer = "[Nome o indirizzo IP del SMTP Server]"

smtpMail.send(myMail)

Ciao
Fabio
Partecipa anche tu! Registrati!
Hai bisogno di aiuto ?
Perchè non ti registri subito?

Dopo esserti registrato potrai chiedere
aiuto sul nostro Forum oppure aiutare gli altri

Consulta le Stanze disponibili.

Registrati ora !
Copyright © dotNetHell.it 2002-2025
Running on Windows Server 2008 R2 Standard, SQL Server 2012 & ASP.NET 3.5