Hi

I have been using Redemption to access the current user's email
address in the following manner  ...

    Dim CU As Redemption.SafeCurrentUser
    Set CU = CreateObject("Redemption.SafeCurrentUser")

    msgbox "Email " + CU.Address

However, on Windows XP, Office XP in internet only mode, this doesn't
work.  CU.Address and CU.Type are both null.

Can anyone tell me another way of getting the current SMTP address of
the current user.

Thanks in advance

James

Redemption internally uses IMAPISession::QueryIdentity(). That part of
Extended MAPI is broken in Outlook 2000 IMO and Outlook 2002 without
Exchange Server; there is no known workaround.

Dmitry Streblechenko (MVP)
http://www.dimastr.com/
OutlookSpy  - Outlook, CDO
and MAPI Developer Tool