View Single Post
  #3  
Old May 4th 06, 12:30 PM posted to microsoft.public.outlook.program_vba
Mike in Venice
external usenet poster
 
Posts: 3
Default Email address in "From" field

Hi Michael...

Wow, this REALLY got me close. You have to realize that I haven't done
ANYTHING in VB before, so I wasn't much sure what you were talking about at
first, but with a little deduction and finding other code examples, I at
least got the idea of what to do. I still don't quite have it though, and
maybe you could give me a little more guidance. I checked the code examples
on dimastr.com, and found one that seems to be in the right vein, but not
knowing VB, I'm not clear enough on how to modify it to assign the returned
value to the new custom field. I'm working with a Msg Box for the purposes of
at least figuring out what I'm doing and to see if I'm getting the right info
returned by the script. So far I've been able to obtain a sender email addy
and get it to come up in the Msg Box. But strangely it's not the addy of the
new item I add to the Inbox. However, I think I can suss that out. I just
need to know how to apply this to the new field. This is the code I grabbed
from dimastr:

dim sItem, oItem
set sItem = CreateObject("Redemption.SafeMailItem")
set oItem = Application.Session.GetDefaultFolder(6).Items(1) 'get first
e-mail from the Inbox, can be any other item
sItem.Item = oItem
PrSenderEmail = &H0C1F001E
MsgBox sItem.Fields(PrSenderEmail)


I'm not sure exactly what PrSenderEmail is, and I'm trying to integrate
SenderEmailAddress instead. I get the same result either way. I'm pretty sure
I'll figure that out, but I'd be happy to change this code any way that you
suggest. But mostly, how does this go into the custom field?

Thanks SO much. I'll be sure to pass this on to the other frustrated people
out there once I get it working!

Sincerely,
Michael Robinson
Venice, CA

-----------


"Michael Bauer" wrote:

Am Wed, 3 May 2006 13:51:01 -0700 schrieb Mike in Venice:

Mike, first you can add an userdefined field manually to the Inbox and add
it to the view. Right click on the header column, select Field chooser and
click New. Enter "From Address" e.g.

Now use the ItemAdd event of the Inbox and from the Redemption the RDOMail
or SafeMailItem object. For both thereĀ“re samples on www.dimastr.com. The
objects can tell you the senderĀ“s address. Simply copy it into the
userdefined field you have created above.

--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
-- www.vbOffice.net --


PLEASE PLEASE PLEASE help me with this. I'm gonna blow my brains out if I
can't figure this out soon LOL!

I'm very computer savvy, but I have zero VB experience. I have been
searching for a way to define a custom column in Outlook 2000 that will

show
the sender's email in the Inbox. I know this is something they built-out

of
Outlook for security reasons, but it blows my mind that it is not

something
that I can choose to do. I cannot STAND viewing sender by a name that they
put in. It wastes my time dealing with spam, and I prefer to work with
contacts via their email addresses. I have found this complaint widespread

in
my search to do this task which should be simple and obvious to Microsoft.

My actual question is this. I installed Redemption and it does show in my
addins. I have found VBScripts (from Sue Mosher and a couple others) that

say
that this can be accomplished through Redemption or CDO, but I have NO

idea
how to implement them. I can open them in the VB editor in Outlook, but

the
whole thing is not very user friendly, and no one has published a simple

file
that I can copy into a directory, use as a form or whatever I need to do,

and
explained how to define a custom field that simply shows the sender's

email
address! This is INSANE to me LOL! I don't understand why this is so hard

to
track down.

PLEASE help. I can follow any complex instructions... I just need the
instruction.

Thanks SO much in advance. I have spent probably 15 hours just searching

and
experimenting trying to do this one little thing, and I am nowhere with

it. I
will most certainly switch to ACT or something that will let me show the
sender's email as a field in the inbox if I don't resolve this.

Thanks again!


Ads