LastName property problem in Dutch Groupwise (part 1)

[rleurs]

I’m writing an application for import contacts into several addressbooks. But there is a major problem:

Using this (sample) code:

Sub Main(Client, GWEvent)

Dim AddressBooks
Dim AddressBook
Dim oAddressBookEntries
Dim oAddressBookEntry

Set AddressBooks = GroupWise.AddressBooks
Set AddressBook = AddressBooks.Item(“Test Book”)

if IsEmpty(AddressBook) then
MsgBox(“Could not locate that address book”)
else
MsgBox(AddressBook.Name)
Set oAddressBookEntry = AddressBook.AddContact(“Bill Smith”)
with oAddressBookEntry
.FirstName = “Bill”
.LastName = “Smith”
<— cut —>
end with
end if

Set AddressBooks = nothing
MsgBox(“Done”)
End Sub

[This message was edited by rleurs on August 16, 2002 at 05:42 AM.]

[This message was edited by rleurs on August 16, 2002 at 05:51 AM.]

Topic