HowTo Get mail session user's SMTP address

Hello,
does anybody know how can I get in VB6 SMTP mail address of current MAPI session user? I have Exchange server.

(I´m creating a e-mail to SMS sender program and I need to determine the length of user's SMTP address)

Thanks a lot

To get the currently logged on user's Exchange address, you simply use the session object's CurrentUser property.

For example:

Dim objSession as MAPI.Session

Set objSession = New MAPI.Sesssion

objSession.CurrentUserName