كيف اقوم بارفاق صورة برسالة ايميل في برنامجي

uppppppppppppppppppppppppppppppppppppppppppp

Dim mail As New MailMessage()
mail.To = "me@mycompany.com"
mail.From = "you@yourcompany.com"
mail.Subject = "this is a test email."
mail.Body = "this is my test email body."
Dim attachment As New MailAttachment(Server.MapPath("myPicture.jpg")) 'create the attachment
mail.Attachments.Add(attachment) 'add the attachment
SmtpMail.SmtpServer = "localhost" 'your real server goes here
SmtpMail.Send(mail)

اشكرك اخي عماد خطيب على الكود

بسما رضى يشتغل عندي

ممكن تعطاني مثال عليه لانه هذي الاسطر حيرني و ما عرفت كيف اتعامل معاهن فا اذا ممكن اخي ترفقلي مشروع به الكود شغال \

Dim attachment As New MailAttachment(Server.MapPath("myPicture.jpg")) 'create the attachment 
mail.Attachments.Add(attachment) 'add the attachment 
SmtpMail.SmtpServer = "localhost" 'your real server goes here 
SmtpMail.Send(mail)

اهلا بك اخي

Dim attachment As New MailAttachment(مكان الصوره في حاسوبك او على ال server)

اما هنا فضع مكان localhost تفاصيل ال mail server الخاص بك (لا استطيع نشر تفاصيلي هنا)

SmtpMail.SmtpServer = "localhost"

اقرا هنا لتتعرف على mailmessage

mailmessage