Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

smart icon to automatically forward mail 1

Status
Not open for further replies.

callcentreman

Technical User
Sep 7, 2001
10
NL
Hi all,

I'm looking for a few lines of code to create a smart icon which will automatically forward the selected mail to another mail-address; no need to keep a copy for myself.

Help is very much appreciated.

thanx,
Callcentreman
 
Hi !

I think you can edit your record in the Public Address Book, and fill in the field named "Forwarding Address" under the "Mail" tab...

I think it speaks for itself :)

Don't forget to clear it once you want the mails back to your normal address.

Hope this will help u

Regards,

Pierre
 
Ok maybe I need to give a bit more detail to explain why I need this.
In my company a lot of users mail my personal inbox with suggestions which *SHOULD* have been sent to a dedicated mail-in db. It's difficult to educate 8000 users ;) and instead of me manually forwarding these memos to this midb I would like to have a smart icon macro do this for me.
something like
@command([EditDocument])
@command([EditGotoField];"To:")
@command....

actually while giving this example I think I can figure it out myself....
Thanx anyway for your interest and help!
 
For all you interested in my final script:
@Command([MailForward]);
@Command([EditGotoField];"To:") ;
@Command([EditInsertText];"the.Other@mail.address");
@Command([MailSend]);
@Command([FileCloseWindow])


[2thumbsup][swords]
 
-or-

FIELD SendTo := "CN=IT Help Desk/O=ocs" ;
@MailSend ;

That will do the same thing. And if you want to delete the email in the same step follow it with this:

@Command([EditClear]) ;

And if you want to run it on multiple selected documents create an agent to run on selected documents with these formula:

FIELD SendTo := "CN=IT Help Desk/O=ocs" ;
@MailSend ;
@DeleteDocument;
SELECT @All

This agent is then run from the actions menu or you can run it from an action button with:

@Command([ToolsRunMacro];"Agent Name") Why don't you ask the Notes Wizards at
 
Thanks for the help! I hadn't figured out the deletion part so a star for your efforts!

:eek:)
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top