visual basisc .net « BG personal blog

29ott/083

VB.NET – inviare un’email attraverso il Namespace System.Net.Mail con gestione degli errori

A partire dalla versione 2.0 di .NET il Namespace System.Web.Mail è stato rimpiaziato da System.Net.Mail, dedicato interamente all'invio di email e molto più completo ed esteso rispetto al precedente. In questo stralcio di codice mostro come implementare una semplice funzione che consente l'invio di email in formato HTML, con un allegato e in modalità asincrona, così da poter intercettare facilmente eventuali errori. Il codice è ampiamente commentato, in caso di dubbi o problemi non esitate a postare un commento.

Tag: .NET, allegati, allegato, attachment, attachments, e-mail, email, HTML, invio asincrono, mail, MailMessage, SendAsync, smtp, System.Net.Mail, VB .NET, visual basisc .net Continua a leggere

28ott/080

VB.NET – ridimensionare un’immagine

In questo brevissimo post vi mostro come, molto facilmente, ridimensionare un'immagine in VB.NET. Il codice è molto semplice ed ampliamente commentato, può essere utilizzato sia per rimpicciolire sia per ingrandire un immagine in formato .bmp .jpeg .gif .png .tiff.

Dim bitmap As New Bitmap("C:\immagine_originale.jpg") 'path dell'immagine originale
 
Dim larghezza As Integer = 800 'larghezza nuova immagine
Dim altezza As Integer = 600 'altezza nuova immagine
Dim nuova_immagine As New Bitmap(larghezza, altezza)
Dim temp As Graphics = Graphics.FromImage(nuova_immagine)
 
temp.InterpolationMode = Drawing2D.InterpolationMode.HighQualityBicubic
temp.DrawImage(bitmap, New Rectangle(0, 0, larghezza, altezza), New Rectangle(0, 0, bitmap.Width, bitmap.Height), GraphicsUnit.Pixel)
 
nuova_immagine.Save("C:\nuova_immagine.jpg", System.Drawing.Imaging.ImageFormat.Jpeg) 'path dove salvare l'immagine ridimensionata
 
'ricordiamoci di riliasciare gli oggetti caricati in memoria
temp.Dispose()
bitmap.Dispose()
nuova_immagine.Dispose()