Attach Text file to SMTP email

[zubie]

Hi all

 

I am using SMTP to send an email

I want to attach a text file to this but I dont know how to define it so that it gets attached correctly...

 

Dim msgMail As New MailMessage()

Dim stbMessageBody As New System.Text.StringBuilder()

dim strFileLocation = Server.MapPath("") & "\Bonus-" & Format(Date.Now, "dd-MM-yyyy") & ".txt"

 

Try

'CREATE MESSAGE BODY stbMessageBody.Append(strBody)

 

msgMail.From = fromID

msgMail.To = To_Email

msgMail.Body = "Bonus Orders"

msgMail.Subject = strSubject

msgMail.Attachments.Add(TextFile????) <-- Problem

SmtpMail.SmtpServer = strIPAddress

SmtpMail.Send(msgMail)

 

Catch ex As Exception

Throw ex

End Try

 

 

hopefully someone can help ..

thank

ZuBiE

[zubie]

Figured it out .. or I found it on the net :)

 

Add this to the code above

 

Dim attAttachment As MailAttachment

 

attAttachment = New MailAttachment(strFileLocation)

 

msgMail.Attachments.Add(attAttachment)

 

 

hope this helps someone else

ZuBiE