With reference to 'Another request for the update.' by Matt Bloomfield

> Not so sure whether this is a Contact Manager or MD-II issue, but what
> I'd like to see is when choosing names from the address book, the
> first name and last name being sent to the To: field with the email
> address.  It's a pain having to add them manually,
> Maybe it's already possible with arexx but I've not been able to do it
> and no one can tell me how.

 Here are a couple of small scripts which while they are not a total
solution to your problem, they will get you some of the way there.

 The first one will send first-name second-name <email@addess>, to MD-II and
open a new message from the current account.

 The second uses the rexx tricks library to put the Email address, with the
same format, into the clipboard, so you can paste wherever you want.

 I hope this gives you a start.

 Regards
  Jules

(Note: I tested this first script from a Shell only. For some strange
reason MD-II puts a comma between the second-name and the address, but
when the output is sent to a Shell it is correct.)

-- 8< -- CUT HERE -- 8< --

/*
Send a name and Email address to MD-II from CManager &
open a new message from the current account.
[EMAIL PROTECTED]
27-11-2000
*/

OPTIONS RESULTS

/*
 Check that Microdot is running
 */
IF ~SHOW('P','MD.1') THEN DO
    EXIT
    END

/*
 Check that CManager is running
 */
IF ~SHOW('P','CONTACTMAN.1') THEN DO
    EXIT
    END

ADDRESS 'CONTACTMAN.1'

GETENTRY ENTRY

EMAILNAME='"'ENTRY.NAME ENTRY.LASTNAME'"'" "'<'ENTRY.EMAIL'>'

ADDRESS 'MD.1'

NewMsgWindow TO EMAILNAME

-- 8< -- Cut Here -- 8< --

-- 8< -- Cut Here -- 8< --

/*
 $AUTHOR: by Jules ([EMAIL PROTECTED]) 27-11-2000
 $DESCRIPTION: Retrieve an Email address from CManager.

 CManager by Simone Tellini
 rexxtricks.library by Jürgen Kohrmeyer

 This script will take a name and Email address from
 CManager and put it into the Clipboard, then use the
 RAmiga V key combination to paste it wherever you want.
*/

OPTIONS RESULTS

CALL ADDLIB("libs:rexxtricks.library", 0, -30, 0)

ADDRESS 'CONTACTMAN.1'

GETENTRY Entry
EMAILNAME='"'ENTRY.NAME ENTRY.LASTNAME'"'" "'<'ENTRY.EMAIL'>'

CALL WRITECLIPBOARD(0,EMAILNAME)

EXIT

-- 8< -- Cut Here -- 8< --
--
My name is not DR. Death
-- Bart Simpson
__________________________________________________________________
MicroDot-II Mailing List - http://www.vapor.com/md2/
MicroDot-II FAQ: http://faq.vapor.com/md2/
Listserver Help: mailto:[EMAIL PROTECTED]?Subject=HELP
Unsubscribe....: mailto:[EMAIL PROTECTED]?Subject=UNSUBSCRIBE

Reply via email to