Emails With access 97 BUT NOT OUTLOOK

[hope]

Hi All

I have been and got Dev Ashish script Email for access 97

http://www.mvps.org/access/downloads/email.zip

My email program is Forte Agent
http://www.forteinc.com/agent/download.php

Now this all works Great in my email program
BUT
It will only email one mail at a time and puts it in the to: field

When you run the form it puts a list box up where you can select a person to email

What I want to do is select more than one person to email in the list box
So if in the list box I would select 4 email it would then put these in the
BCC box like fr**@fre.com,bi*@bill.com etc etc

OR if I selected ALL

it would put those in the BCC box

I have been trying to do this now for 3 days and got no further with it

Anyone can help on this please

I do NOT want to use Outlook

All the searches that I have done ALL talk about Outlook

Dev's program brings up my email program just great

So all I want is for it to select certain names and but that in the BCC field

I do not think Dev is about anymore or I would have emailed him

As always, any and all help is greatly appreciated.

Thank you in advance.

John

[Douglas J. Steele]

You could try checking the Access EMail FAQ Tony Toews has at
http://www.granite.ab.ca/access/email.htm

I happen to know that he uses Forte as well, so odds are he has something
there!

--
Doug Steele, Microsoft Access MVP
http://I.Am/DougSteele
(no e-mails, please!)
<ho**@hope.com> wrote in message
news:pl********************************@4ax.com...

Hi All

I have been and got Dev Ashish script Email for access 97

http://www.mvps.org/access/downloads/email.zip

My email program is Forte Agent
http://www.forteinc.com/agent/download.php

Now this all works Great in my email program
BUT
It will only email one mail at a time and puts it in the to: field

When you run the form it puts a list box up where you can select a person to email
What I want to do is select more than one person to email in the list box
So if in the list box I would select 4 email it would then put these in the BCC box like fr**@fre.com,bi*@bill.com etc etc

OR if I selected ALL

it would put those in the BCC box

I have been trying to do this now for 3 days and got no further with it

Anyone can help on this please

I do NOT want to use Outlook

All the searches that I have done ALL talk about Outlook

Dev's program brings up my email program just great

So all I want is for it to select certain names and but that in the BCC field
I do not think Dev is about anymore or I would have emailed him

As always, any and all help is greatly appreciated.

Thank you in advance.

John

[Tony Toews]

"Douglas J. Steele" <NOSPAM_djsteele@NOSPAM_canada.com> wrote:

You could try checking the Access EMail FAQ Tony Toews has at
http://www.granite.ab.ca/access/email.htm

I happen to know that he uses Forte as well, so odds are he has something
there!

Actually I have nothing Agent specific as my work with automating email has been with
Outlook or the Mabry controls.

Tony
--
Tony Toews, Microsoft Access MVP
Please respond only in the newsgroups so that others can
read the entire thread of messages.
Microsoft Access Links, Hints, Tips & Accounting Systems at
http://www.granite.ab.ca/accsmstr.htm

[Tony Toews]

ho**@hope.com wrote:

When you run the form it puts a list box up where you can select a person to email

What I want to do is select more than one person to email in the list box
So if in the list box I would select 4 email it would then put these in the
BCC box like fr**@fre.com,bi*@bill.com etc etc

OR if I selected ALL

it would put those in the BCC box

So what you really want is a multi-select list box and some code to pull out all the
email addresses you have selected placing them in a string with commas between them.
Some code to start you off using the A97 help files.

The following example prints the value of the bound column for each selected row in a
Names list box on a Contacts form. To try this example, create the list box and set
its BoundColumn property as desired and its MultiSelect property to Simple or
Extended. Switch to Form view, select several rows in the list box, and run the
following code:

Sub BoundData()
Dim frm As Form, ctl As Control
Dim varItm As Variant

Set frm = Forms!Contacts
Set ctl = frm!Names
For Each varItm In ctl.ItemsSelected
Debug.Print ctl.ItemData(varItm)
Next varItm
End Sub

Tony
--
Tony Toews, Microsoft Access MVP
Please respond only in the newsgroups so that others can
read the entire thread of messages.
Microsoft Access Links, Hints, Tips & Accounting Systems at
http://www.granite.ab.ca/accsmstr.htm

[hope]

Hi Tony

Thank you very much for the help

Ok let me get this right

I have made a form called "Contacts"

With Fields
Customer Id
Company Name
Contact Name
Contact Email
Contact Title
Names
On this form I have mad a list box as follows
Control source none
Row source Table /query
Row source Type
SELECT DISTINCTROW [Customers].[CustomerID], [Customers].[ContactEMail], [Customers].[ContactName] .[Names]FROM [Customers];
Bound Column 1
in the other box
Name Names
Multi Select simple
A command button
event on click
run code BoundData ()

I then goto the list box and select three names

I then press the command button

I get

Error
The expression you have entered contains invalid syntax
You may have enter a comma without a preceding value or identifier
what have I got wrong please ?

As always, any and all help is greatly appreciated.

Thank you in advance.

John

On Sun, 06 Jun 2004 02:01:36 GMT, Tony Toews <tt****@telusplanet.net> wrote:

ho**@hope.com wrote:

When you run the form it puts a list box up where you can select a person to email

What I want to do is select more than one person to email in the list box
So if in the list box I would select 4 email it would then put these in the
BCC box like fr**@fre.com,bi*@bill.com etc etc

OR if I selected ALL

it would put those in the BCC box

So what you really want is a multi-select list box and some code to pull out all the
email addresses you have selected placing them in a string with commas between them.
Some code to start you off using the A97 help files.

The following example prints the value of the bound column for each selected row in a
Names list box on a Contacts form. To try this example, create the list box and set
its BoundColumn property as desired and its MultiSelect property to Simple or
Extended. Switch to Form view, select several rows in the list box, and run the
following code:

Sub BoundData()
Dim frm As Form, ctl As Control
Dim varItm As Variant

Set frm = Forms!Contacts
Set ctl = frm!Names
For Each varItm In ctl.ItemsSelected
Debug.Print ctl.ItemData(varItm)
Next varItm
End Sub

Tony