Link to home
Start Free TrialLog in
Avatar of bfuchs
bfuchsFlag for United States of America

asked on

How to get users email default address in Access 2003?

Hi Experts,
I am trying to retreive users default email address with the following code, however I'm getting a popup security warning, how can I avoid it?
MsgBox CreateObject("Outlook.Application").GetNamespace("MAPI").CurrentUser.Address

Open in new window

SOLUTION
Avatar of Nick67
Nick67
Flag of Canada image

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
SOLUTION
Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Avatar of bfuchs

ASKER

Hi Experts,

I'm looking to save all users emails (along with other info like username ipaddress etc..) in a table, this would be done as they log in to access app.

Therefore the options you're suggesting would be little complicate, as these would require setting up in each users pc.

Is there something I can deploy on my pc that will check every pc that's on the network and give me this info?
(The way I have something called advance ip scanner, which gives me all ipaddresses on the network, that actually also includes pc name mac address manufacture etc...)

If I can get something like that, then it would't batter me if I have to click OK for the security message.

Thanks,
Ben
SOLUTION
Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
SOLUTION
Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Avatar of bfuchs

ASKER

@Nick,
why are you looking to pull them out?
The manager is putting a list together of all employees info, and email is one of the info he wants to have.
FYI- see link below.
https://www.experts-exchange.com/questions/28620668/Get-system-info-in-vba.html?anchorAnswerId=40620458#a40620458

While trying your suggestion I got attached.
Untitled.png
SOLUTION
Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Avatar of bfuchs

ASKER

Hi Nick,

I spoke to our IT guy and he said our server is neither Exchange nor Active directory, just regular Pop3 server.
I guess this will not work, do you have another solution up your sleeves?

Thanks,
Ben
SOLUTION
Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Avatar of bfuchs

ASKER

Well, this sounds like something that will have to be manually done & maintained.
Since we already have a list of all users with their IP Addresses, I would like something that would associate all ip addresses with their email.

Just thinking, perhaps the original code I posted could somehow be handled by adding a send keys {"Enter"} after the security pops up, the question would be how do we have the code wait for that popup to appear?
SOLUTION
Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
SOLUTION
Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Avatar of bfuchs

ASKER

Hi,
it wouldn't be much of a warning, would it?
Yes, you right with this...

BTW, the security warning was removed in 2010 already , and maybe even earlier I just dont have a copy of 2007 to verify.

Wondering if Microsoft didn't came up with a patch to fix that annoying feature..

I saw on link below someone suggesting something to be installed, did you ever tried that, I just tried the code posted there and had the same issue.

http://www.vbaexpress.com/forum/showthread.php?9957-Solved-How-do-you-get-the-current-user-s-default-email-address

Re IP Address, we do ensure each user have always the same IP address (I am the one in charge of assigning an IP for every new user).
SOLUTION
Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
SOLUTION
Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Avatar of bfuchs

ASKER

@Nick,
Certainly not.
I had used code for mass email that worked fine in 2000, after a while we had to move it due to space limitation of outlook 2k, and since we had this security issue in 2003,  I had to deploy that code in the single pc in our office that has 2010, and as far I know it worked without problems, will see when I have a chance to test that again there.

Regardless of that, by using a version of outlook that does not have the security issue, is it possible to have code that checks emails addresses of all users on the network?
SOLUTION
Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Avatar of bfuchs

ASKER

@Nick,

Just one more thing before finalize.
Did you looked at the site i posted above (ID: 40629912)?
I see they're mentioning about installing something optional that comes with office 2003 package, if I understood well, that looks like a suitable solution w/o involving third parties, just wonder where do I find that option to install it?

Thanks,
Ben
ASKER CERTIFIED SOLUTION
Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Avatar of bfuchs

ASKER

I've requested that this question be closed as follows:

Accepted answer: 42 points for Nick67's comment #a40632213
Assisted answer: 42 points for Nick67's comment #a40626642
Assisted answer: 42 points for Scott McDaniel (Microsoft Access MVP - EE MVE )'s comment #a40626657
Assisted answer: 42 points for Nick67's comment #a40627007
Assisted answer: 42 points for Nick67's comment #a40627058
Assisted answer: 42 points for Nick67's comment #a40629243
Assisted answer: 42 points for Nick67's comment #a40629665
Assisted answer: 42 points for Nick67's comment #a40629893
Assisted answer: 41 points for Nick67's comment #a40629896
Assisted answer: 41 points for Nick67's comment #a40631178
Assisted answer: 41 points for Nick67's comment #a40631234
Assisted answer: 0 points for bfuchs's comment #a40632044
Assisted answer: 41 points for Nick67's comment #a40632056

for the following reason:

I guess all your answers are correct..
Thank you!
Avatar of bfuchs

ASKER

Hi,
I guess close question was pressed by mistake as I really meant to accept those answers selected, please have this set as accepted.
Thank you.
Avatar of bfuchs

ASKER

Hi,
I guess close question was pressed by mistake as I really meant to accept those answers selected, please have this set as accepted.
Thank you.
Avatar of bfuchs

ASKER

Thank You!