Address Book/Global Address List & Visual Basic 6 Part II (AddressEntry)

Similar Threads:

1.Extract specific email addresses from outlook global address book

I need to update a database with the new email addresses. The global
address book has about four email addresses for each person that I
want in my database. I have some sample code that extracts email
addresses out of a distribution list and puts it into a word document.
I am not sure as to how to get the correct email address out of the
address book and put it into some sort of table. Any help will be
appreciated.
Lauren

2.information From Global Address Book into list box.

HI,
I am new in this. I have to get the Information from the GAL  into the listbox. First i would need to find the User name from the GAL. then which i would need to get the information(phone number, address, alias, department) of the selected name output into the listbox of the UserForm. 
I manage only to get the userName into the combolist. But Can anyone how can i use the selected name to extract out the details of the selected name from the combolist?

Public Sub Import_Contacts()

Set olApp = New Outlook.Application
Set olNamespace = olApp.GetNamespace("MAPI")
Set olAddressList = olNamespace.AddressLists("Global Address List")

narCNT = olAddressList.AddressEntries.count

redim strarray(narCNT+1)
i=0

For Each olAB In olAddressList.AddressEntries

STRArray(i)=trim(olAB.NAme)
comboList1.addItem (strArray(i))
i=i+1
do events

next olAB

set olApp = nothing
End Sub

3.getting the AddressEntry object to update for a Personal Address Book

What I am trying to do is a write a vbscript that will, on userl login,
update any Personal Address Books they may have with the updated entry
in the Global Address List.  Currently, I am developing this in VB6 and
I'll port it over to vbscript when I'm done.

The script looks something like


    oMAPI.Logon
    Set colAddressLists = oMAPI.AddressLists
    Set colGALAddressEntries = colAddressLists("Global Address
List").AddressEntries

    For Each objAddressList In colAddressLists
        if objAddressEntry.type = Case OlDisplayType.olUser
            Set objGALAddress =
colGALAddressEntries.Item(objAddressEntry.Name)
			objAddressEntry.Type = objGALAddress.Type
			objAddressEntry.Address = objGALAddress.Address
			objAddressEntry.Update True, True
        End If
	Next objAddressList

The problem is, that this only updates the address in the PAB if it
happens to be an SMTP type.  There doesn't seem to be any visible
properties that allow you to set the property to X.400, SMTP, etc..,
and I don't know how to force the entry to get updated.

Any ideas?  I'm really stuck on this, and i know the answer lies in my
poor grasp of the MAPI object model.  I should add that I am tryingn to
run this on a machine with Outlook 2003 installed, but I will have to
factor it for Outlook 2000.  Any help will be most sincerely
apprecieated, so thankt in advance.

regards
--Peter j. Shaw


{sorry, I posted this also on microsoft.public.outlook.contacts as a
separate thread, but wasn't sure if that was the best place to ask}

4.Creating address list personal distribution lists with visual basic

I am unable to create a vbasic tool to add a address 
entry from the global address book to an address list 
entry that is a distribution list.  I don't receive an 
error but neither do changes or additions show.  This 
makes me think I am seeing a security feature.  Any ideas?

5.Outlook, Address Book (Outlook w/Exchange Server), and Visual Basic 6, Help Pls

Hi,

I'm trying to create a VB6 application where the user can press a button and
the Outlook (2002) Address Book pops up with all the Global addresses.
Then, after  the user selects the desired people in the address book
(usually a single person), I'd like to retrieve:

(Full) Name
Email Address
Phone Number
Pager Number
Office
Department

for each person selected and then populate some text boxes on a form.

Is this possible, and if so, how?

TIA, and Special Thanks again to anyone who can help out.

Eric

6. Access to Outlook's Address book via Visual Basic

7. [Outlook] [Visual Basic] Address book

8. Outlook, Address Book (Outlook w/Exchange Server), and Visual Basic 6, Help Pls