While researching i found out from a website what i was searching for!
I want to thank 'OriginalGriff' and 'losmac' for their effort.
Here below is the website where i obtained some code, alright.
http://msdn.microsoft.com/en-us/library/system.net.mime.contentdisposition.aspx#Y0[
^]
Dim SmtpServer As New SmtpClient()
Dim mail As New MailMessage()
SmtpServer.Credentials = New Net.NetworkCredential("JOHN.DOE@gmx.com", "PASSWORD")
SmtpServer.Host = "mail.gmx.com"
mail = New MailMessage()
mail.From = New MailAddress("John.Doe@gmx.com")
mail.To.Add("to_someone@live.com")
mail.Subject = "Dear Santa"
mail.Body = "Whats up
Dim myString As String = "This String here as content(body) to the new Attachment(not to the Mail Body)"
Dim ms As New MemoryStream(System.Text.Encoding.ASCII.GetBytes(myString))
Dim oAttch As Net.Mail.Attachment = New Net.Mail.Attachment(ms, MediaTypeNames.Text.Plain)
Dim disposition As ContentDisposition = oAttch.ContentDisposition
disposition.FileName = "MyPersonalAttachment.txt"
mail.Attachments.Add(oAttch)
SmtpServer.Send(mail)
mail.Dispose()