VB.Net Tutorial/Socket Network/MailMessage

Send an Email

Imports System
Imports System.Web
Imports System.Web.Mail
Imports System.Data
Imports System.Drawing
Imports System.Collections
Imports System.Windows.Forms
Imports System.ruponentModel
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()