I forum Ricerca FAQ
Fai una domanda
Ultimo messaggio
crom@
crom@
il 24 dicembre 2008 alle 11:16
7 messaggi dal 26 novembre 2002
Il web è su server aruba

in web.config ho aggiunto
<add namespace="System.Net.Mail"/>

Ho poi utilizzato una routine di questo tipo in una pagina aspx.vb

Dim Mail As New MailMessage()
Dim Mittente As New MailAddress("xxxx@xxxxx.xx", "")
Mail.From = Mittente
Mail.To.Add("yyyyyyyyy@yyyyyy.yy")
Mail.To.Add("zzzzzzzzz@zzzzzz.zz")
Mail.To.Add("wwwwwwwww@wwwwww.ww")

'definisco il messaggio in modalità HTML
Mail.IsBodyHtml = True

'definisco la codifica del corpo del messaggio
Mail.BodyEncoding = System.Text.Encoding.UTF8

'definisco l'oggetto del messaggio
Mail.Subject = "Report Giornaliero"

'definisco il corpo del messaggio
Dim corpo as string

corpo="<html><body><b>Report relativo alle attività di oggi</b><br></body>/<html>"

Mail.Body = Corpo

'definisco la priorità del messaggio
Mail.Priority = Net.Mail.MailPriority.High

Dim smtp As New SmtpClient("smtp.aruba.it", 25)
'invio il messaggio in modalità asincrona

On Error Resume Next
smtp.Send(Mail.From.ToString, Mail.To.ToString, Mail.Subject, Mail.Body)


le email vengono inviate a tutti, ma:
1) non hanno la priorità alta
2) non sono formattate HTML

Dove sbaglio?
Qulcuno mi da un consiglio?
Modificato da crom@ il 24 dicembre 2008 11.18 -
RispondiQuoting
crom@
crom@
il 24 dicembre 2008 alle 11:52
7 messaggi dal 26 novembre 2002
Mi rispondo da solo,

Non so perchè succeda!!! ma la soluzione sembra essere:

annullare o commentare
smtp.Send(Mail.From.ToString, Mail.To.ToString, Mail.Subject, Mail.Body)

semplicemente
smtp.Send(Mail)
RispondiQuoting
crom@
crom@
il 24 dicembre 2008 alle 15:00
7 messaggi dal 26 novembre 2002
Aggiungo ancora una cosa,

Volevo un logo di intestazione all'interno della email ed ho fatto così:

ho commentato la riga
' Mail.Body = Corpo

e l'ho sostituita con tutto questo :


Dim plainView As AlternateView = AlternateView.CreateAlternateViewFromString("Questo messaggio sarà visualizzato per chi non supporta html", Nothing, "text/plain")

Dim htmlView As AlternateView = AlternateView.CreateAlternateViewFromString("<img src=cid:companylogo> " & corpo, Nothing, "text/html")

Dim logo As New LinkedResource(Request.ServerVariables("APPL_PHYSICAL_PATH") & "/Immagini/Logo.jpg")

logo.ContentId = "companylogo"
htmlView.LinkedResources.Add(logo)
Mail.AlternateViews.Add(plainView)
Mail.AlternateViews.Add(htmlView)


laciando inalterato il resto e tutto funziona alla perfezione, ovviamente dopo aver scaricato l'immagine "Logo.jpg" nella cartella immagini del mio sito web
Modificato da crom@ il 24 dicembre 2008 15.01 -
RispondiQuoting
openmiki
openmiki
il 4 gennaio 2009 alle 13:14
2 messaggi dal 09 luglio 2004
Sei un GRANDE!

Grazie!

Mi hai svoltato la giornata!

Anzi due giorni, uno per inviare la mail e uno per il giochetto della alternateView :D
RispondiQuoting

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.