/ Forums / Advansys Formativ / Creating Solutions with Formativ / Access birthday property in an address book entry

  • Creator
    Topic
  • #4334
    Support 3
    Participant

      Hi,

      It appears that you can access the Birthday, CreateDate, LastModifieddate, etc field of an address book entry by using the work-around suggested by Glade at GroupWise Object API forum:
      http://developer.novell.com/wiki/index.php/Object_API_Defect_Fixes#ADDRESSBOOK_OBJECT

      Please see the sample code below which shows the available fields of an address book entry. This sample code below eliminate the MAPI layer by using the MultiLogin and by setting the MutliLoginAddressBookSupport flag to TRUE. It then iterate through available fields (e.g Name, Birthday, CreateDate, LastModifieddate, etc) of the address book entry.

      NOTE: In order to use the MultiLogin() method, you will need the account userid, password and commandline argument (optional). If you use the Trusted Application then you will not require the password. See the Application object in Object API documentation (http://developer.novell.com/documentation/gwobjapi/index.html?gwobjenu/data/h7ikbsqg.html) and http://developer.novell.com/documentation//gwobjapi/gwobjenu/data/ain9a37.html#bncizkb (Section 1.7.7, Date Fields) for more information.


      dim oBook
      dim oEntry
      dim oAccount

      set oAccount = groupwise.account.parent.MultiLogin("userid", "/ipa-10.x.xx.x /ipp-1677", "password", 1, "")

      if not oAccount.MultiLoginAddressBookSupport then
      oAccount.MultiLoginAddressBookSupport = true
      end if


      set oBook = nothing
      set oBook = oAccount.addressbooks.item("Test Book")


      if oBook is nothing then
      exit sub
      end if

      set oEntry = oBook.AddressBookEntries.item(1)

      for each oField in oEntry.fields
      msgbox "Field Name: " & oField.Name & vbcrlf & "Value: " & oField.value
      next

      set oEntry = nothing
      set oBook = nothing
      set oAccount = nothing

      Regards,
      Advansys Support

      [This message was edited by Support 2 on May 23, 2007 at 10:56 PM.]

      [This message was edited by Support 3 on September 09, 2007 at 05:10 PM.]

      [This message was edited by Support 3 on September 09, 2007 at 05:10 PM.]

    • You must be logged in to reply to this topic.