sending images through email

madi2999

Member
Joined
Aug 8, 2004
Messages
10
Programming Experience
Beginner
before I get to my question I will explain what I trying to do:

I am working on a windows application, and part of what I want it to do is send an email to a group of email addresses, I have a list of email addresses retrieved from a database.

I managed to send an e-mail using outlook to only one user, but I would appreciate the help in directing me how to be able to send an e-mail to a group of users

thanks
 

madi2999

Member
Joined
Aug 8, 2004
Messages
10
Programming Experience
Beginner
hello,

I managed to send an email in my vb.net program but when I paste a pic it donesn't get sent. My vb.net invokes outlook to send emails.

thanks in advance
 

madi2999

Member
Joined
Aug 8, 2004
Messages
10
Programming Experience
Beginner
I don't think I was clear in my query, I have written a vb.net program that sends email to a list of users but I am having difficulties send a pic or image I have pasted the code below:



Dim OLApp As New Outlook.Application

'Creating outlook Namespace object

Dim OLNameSpace As Outlook.NameSpace

'creating outlook mailitem

Dim msg As Outlook.MailItem

Dim e_address As String

'creating newblan mail message

sINIFile = Application.StartupPath & "\..\setting.ini"

e_address = GetINI(sINIFile, "email", "email", "")







msg = OLApp.CreateItem(Outlook.OlItemType.olMailItem)

'Adding recipeints to the mail message

msg.Recipients.Add(e_address)

'adding subject information to the mail message

msg.Subject = title

'adding body message information to the mail message

msg.Body = richtextbox.text


'sending message
msg.Send()

appreciate the help
 

madi2999

Member
Joined
Aug 8, 2004
Messages
10
Programming Experience
Beginner
hello,

beside the code add the outlook object Library that can be found under projects>>>add refrence>>com tab




'Created Outlook Application object
Dim OLApp As New Outlook.Application
'Creating outlook Namespace object
Dim OLNameSpace As Outlook.NameSpace
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'creating outlook mailitem
Dim msg As Outlook.MailItem
'creating newblan mail message
msg = OLApp.CreateItem(Outlook.OlItemType.olMailItem)
'Adding recipeints to the mail message
msg.Recipients.Add("Something@Somewhere.com")
'adding subject information to the mail message
msg.Subject = "Test"
'adding body message information to the mail message
msg.Body = "This is a test message"
'sending message
msg.Send()
End Sub
 

Paszt

Staff member
Joined
Jun 3, 2004
Messages
1,500
Location
Raleigh, NC - USA
Programming Experience
Beginner
simply repeat the line: msg.Recipients.Add("someOne@domain.com") using the different email addresses.

You could also create a distribution list in Outlook which contains all the emails in the group and send using that distribution list's name.
 
Top Bottom