Make String() acting like a real File to be sent (as Net.Mail.Attachment)

Question

5.00/5 (1 vote)

See more:

Dim myString as String = "This String here should be send as Mail Attachment content (as a virtual File called HALLO.txt or without any extension)to the Mail Receiver without having to be saved on a file respectively on the HardDisk, since an attachment requieres a file from Harddisc or elsewhere"

VB

Dim SmtpServer As New SmtpClient()
           Dim mail As New MailMessage()
           SmtpServer.Credentials = New Net.NetworkCredential("JOHN.DOE@gmx.com", "PASSWORD")
           'SmtpServer.Port = 587
           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 oAttch As Net.Mail.Attachment = New Net.Mail.Attachment(myString)
           mail.Attachments.Add(oAttch)
           SmtpServer.Send(mail)
           mail.Dispose()

This is a very complicated question and not really of great use but if you have any idea please reply because i need this solution, thanks in advance:

Posted 6-May-12 2:52am

bEGI23

Updated 8-May-12 10:36am

v5

Add a Solution

2 solutions

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

OriginalGriff · Accepted Answer · 2012-05-06T03:38:00

Solution 1

Try converting the string to a Stream:

VB

Dim myString as String = "This String here should be send as Mail Attachment as (HALLO.txt or without any extension) File to the Mail Receiver without having to be saved on a file respectively on the HardDisk"
Dim ms As New MemoryStream(System.Text.Encoding.ASCII.GetBytes(myString))
Dim ct As New ContentType(MediaTypeNames.Text.Plain)
Dim oAttch As Net.Mail.Attachment = New Net.Mail.Attachment(ms, ct)
mail.Attachments.Add(oAttch)

[edit]Forgot the ContentType - OrignalGriff[/edit]

Posted 6-May-12 3:38am

OriginalGriff

Updated 7-May-12 21:29pm

v2

Comments

[no name] 7-May-12 17:01pm

Dude you have forgotten something because i get an exception saying;
"Value of Type 'System.IO.Memory.Stream' cannot be converted to String"

[no name] 8-May-12 8:50am

Hi again. Your code works but the string wasnt sent as Attachment, it was sent as Mail Body. If you come up with something new please let me know, sorry for the inconveinence, Begi

Maciej Los 8-May-12 10:14am

You need to read carefully the answer. OriginalGriff wrote: "File to mail (...)" should be saved and get from "HardDisk".
Save data into txt file and use something like this:
Dim oAttch As Net.Mail.Attachment = New Net.Mail.Attachment(PathToFile, ContentType)
More at MSDN: Attachment Contructor, ContentType with examples

[no name] 8-May-12 11:25am

I already know how to send a mail containing an attachment, but my question was how to make for example a string "hello world" to send as attachment meant as virtual File, because i dont want always to write some string to "c:\myAttachment.txt". I want directly to send my string as mail attachment, on which the user(receiver), will be able to download that attachment as a file, containing my string on it understand?
thanks in advance, Begi

Maciej Los 8-May-12 12:15pm

Yes, now i do understand you ;)

Monjurul Habib 8-May-12 16:34pm

5!

bEGI23 · Accepted Answer · 2012-05-09T18:08:00

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[^]

VB

Dim SmtpServer As New SmtpClient()
            Dim mail As New MailMessage()
            SmtpServer.Credentials = New Net.NetworkCredential("JOHN.DOE@gmx.com", "PASSWORD")
            'SmtpServer.Port = 587
            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

VB

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)

VB

'Here is the magic;

VB

Dim disposition As ContentDisposition = oAttch.ContentDisposition
        disposition.FileName = "MyPersonalAttachment.txt" 'Sets this name for the new attachment as a new file containing myString on it
        mail.Attachments.Add(oAttch)
        SmtpServer.Send(mail)
        mail.Dispose()