Hello,

we have a web form on our website where users can enter their e-mail address
in order to get a newsletter. The form sends an e-mail to us with the users
e-mail address in the from field and in the body.

I created a rule that automatically answers this mail with a template. The
mail-template contains a link to our website to confirm the e-mail address.

All this works fine. But now I want Outlook, a macro or may be the template
itself to add the e-mail address of the user (in the to-field of the reply)
to the links: Just like
http://webserver/newsletter-confirm....userdomain.com

Any Ideas how to do this??

Greetings
Florian

Probably I'd use a placeholder for the link. Read the templates HTMLBody
property, replace the placeholder by the link with the address and write it
back into HTMLBody.

--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
Quick-Cats - The most effective way to assign Outlook categories:
http://www.shareit.com/product.html?...4&languageid=1
(German: http://www.VBOffice.net/product.html?pub=6)


Am Sat, 31 Mar 2007 19:52:25 +0200 schrieb Jens Sommer:

Hello,

we have a web form on our website where users can enter their e-mail
address
in order to get a newsletter. The form sends an e-mail to us with the
users
e-mail address in the from field and in the body.

I created a rule that automatically answers this mail with a template. The
mail-template contains a link to our website to confirm the e-mail
address.

All this works fine. But now I want Outlook, a macro or may be the
template
itself to add the e-mail address of the user (in the to-field of the
reply)
to the links: Just like
http://webserver/newsletter-confirm....userdomain.com

Any Ideas how to do this??

Greetings
Florian

Hello,

I googled a lot and tried this and that. Now the facts:

1. My rule works. Every Mail with the "correct" subject is answered with an
template e-mail (*.oft)
2. I wrote some VBA code to get the TO-e-mail-adress into the body:
===
Sub Test()
Dim myOlApp As Outlook.Application
Dim myOlIns As Outlook.Inspector
Dim objMail As Outlook.MailItem

Set myOlApp = CreateObject("Outlook.Application")
Set myOlIns = myOlApp.ActiveInspector

Set objMail = myOlIns.CurrentItem
objMail.Body = objMail.Body & "http://www.my-server.com/test.htm&user="
& objMail.To

Set myOlApp = Nothing
Set myOlIns = Nothing
Set objMail = Nothing
End Sub
===
This also works and inserts the URL and the e-mail-address at the end of the
body.

So my last problem is now: Merge this two together: I need the rule to
create the answer mail and then execute the code... but how?

I hope for your Ideas!

Greetings
JS

Jens, that doesn't work. You can create a rule to run a script. Then create
the e-mail and load the template yourself. You can load an *.oft file with
CreateItemFromTemplate.

--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
Quick-Cats - The most effective way to assign Outlook categories:
http://www.shareit.com/product.html?...4&languageid=1
(German: http://www.VBOffice.net/product.html?pub=6)

Am Tue, 3 Apr 2007 18:54:13 +0200 schrieb Jens Sommer:

Hello,

I googled a lot and tried this and that. Now the facts:

1. My rule works. Every Mail with the "correct" subject is answered with
an
template e-mail (*.oft)
2. I wrote some VBA code to get the TO-e-mail-adress into the body:
===
Sub Test()
Dim myOlApp As Outlook.Application
Dim myOlIns As Outlook.Inspector
Dim objMail As Outlook.MailItem

Set myOlApp = CreateObject("Outlook.Application")
Set myOlIns = myOlApp.ActiveInspector

Set objMail = myOlIns.CurrentItem
objMail.Body = objMail.Body & "http://www.my-server.com/test.htm&user="
& objMail.To

Set myOlApp = Nothing
Set myOlIns = Nothing
Set objMail = Nothing
End Sub
===
This also works and inserts the URL and the e-mail-address at the end of
the
body.

So my last problem is now: Merge this two together: I need the rule to
create the answer mail and then execute the code... but how?

I hope for your Ideas!

Greetings
JS