The laAddressbooks variable IS a vfp array. I misread something. Sorry.

Richard


>Steven,
>
>Look into the Domino objects. Here is some sample code:
>

>oSession =createobject("Lotus.NotesSession")
>oSession.Initialize("<UserspasswordHere") && Will use the defualt user on the machine.
>
>laAddressbooks = oSession.AddressBooks && Gets the array of public and private address books NOT a VFP Array
>&& Finds the public address book
>FOR lnLoopCount = 1 TO ALEN(lvAddressBooks, ARRAY_ROW)
>     IF lvAddressBooks[lnLoopCount].IsPublicAddressBook
>	loAddressBook = lvAddressBooks[lnLoopCount]
>	EXIT
>
>     ENDIF
>NEXT && lnLoopCount = 1 TO ALEN(laAddressBooks, ARRAY_ROW)
>
>&&Quick if
>IIF(loAddressBook.IsOpen,;	&& Check if DB is open
>	FALSE,;				&& Discarded
>	loAddressBook.Open)		&& Open it if not
>	
>loView = loAddressBook.GetView("People")	&& Retrieves all people for this address book
>IF ISNULL(loView)	&& Verify view was retreived
>     RETURN FALSE
>	
>ENDIF
>	
>lvEntries = loView.AllEntries
>
>DIMENSION Sourcearray[lvEntries.Count, 2]
>FOR lnLoopCount = 1 TO lvEntries.Count
>     lvColumns = lvEntries.GetNthEntry(lnLoopCount).ColumnValues
>     SourceArray[lnLoopCount, 1] = STRTRAN(lvColumns[2]," , ",", ")
>     SourceArray[lnLoopCount, 2] = lvColumns[5]
>
>NEXT && lnLoopCount = 1 TO lvEntries.Count
>
>

>
>This has worked in 7 and 8 and should work under 6.
>
>Richard
>
>>Unfortunatly we use Domino/Lotus here. Got any ideas on how to do this with the Domino server?