Send an Email : MailMessage « Socket Network « VB.Net Tutorial

1. VB.Net Tutorial
2. Socket Network
3. MailMessage

Imports System
Imports System.Web
Imports System.Web.Mail
Imports System.Data
Imports System.Drawing
Imports System.Collections
Imports System.Windows.Forms
Imports System.ComponentModel

Public Class Tester
    Public Shared Sub Main
    
        Dim mails As New MailMessage

        mails.From = "from@from.net"
        mails.To = "to@to.net"
        mails.Subject = "message"
        mails.Cc = "cc@cc.net"
        mails.Body = "this is the message"
        mails.BodyEncoding = System.Text.Encoding.UTF8
        mails.BodyFormat = MailFormat.Html
        mails.Attachments.Add("c:\\test.txt")
        SmtpMail.Send(mails)
        
    End Sub

End Class

Unhandled Exception: System.InvalidCastException: Unable to cast object of type 'System.String' to t
ype 'System.Web.Mail.MailAttachment'.
   at System.Web.Mail.SmtpMail.CdoSysHelper.Send(MailMessage message)
   at System.Web.Mail.SmtpMail.Send(MailMessage message)
   at Tester.Main()