Thread: user details
View Single Post
  #2  
Old January 30th 06, 05:19 AM posted to microsoft.public.outlook.program_vba
Rookie
external usenet poster
 
Posts: 3
Default user details

I figured it out. it was objRecip.Name
--
Thanks,
Jerry L


"Rookie" wrote:

I have a generic txt box on a custom appt form that is being used for
receipents. What I want to do is place a button on the form that acts as a
"check names". What I need is if the value is a valid address I need to be
able to find things like display name and such. Any help would be greatly
appreicated. Below is the code I have so far.

Sub CommandButton2_Click()
strChangeTo = Item.UserProperties.Find("ChgTo").Value
z=split(strChangeTo,";")
i=0
Do until i = (ubound(z)+1)
Set objRecip = Item.Recipients.Add(z(i))
if objRecip.resolve = true then
msgbox z(i) & " is a valid address."
else
msgbox z(i) & " is not a valid address."
end if
i=i+1
Loop
End Sub
--
Thanks,
Jerry L

Ads