Discussion Board

Results 1 to 2 of 2
  1. #1
    Registered User
    Join Date
    Mar 2003

    SDK3: unable to store calendar item (6310) in VB

    I try to save a calendar item (e.g. a memo).
    I can read an item:
    Dim pICalendarItemServ As NokiaCLCalendar.CalendarService
    Set pICalendarItemServ = New NokiaCLCalendar.CalendarService
    k = 17 'use a valid index!
    Set pICalItem = pICalendarItemServ.ReadCalendarItem(k)

    but then saving it (even without any changes)
    Call pICalendarItemServ.UpdateCalendarItem(k, pICalItem, 0)
    results in the error: 'Invalid parameters used'

    Same is when I creat a new calendar item and want to save it with
    k = pICalendarItemServ.WriteCalendarItem(pICalItem)

    How do I have to set the parameter ChangeCounter?
    I cannot read it by e.g.
    k = pICalItem.ChangeCounter
    error: 'invalid usage of a property'

    Please help me.

  2. #2
    Registered User
    Join Date
    Mar 2003

    RE: SDK3: unable to store calendar item (6310) in VB

    Try this:

    Set pICalItem = pICalendarItemServ.ReadCalendarItem(k)
    If pICalItem.Type = CALENDAR_TYPE_MEETING Then
    Set pIMeeting = pICalItem.TypeProperties
    pIMeeting.Subject = pIMeeting.Subject & " new"
    pICalendarItemServ.UpdateCalendarItem k, pIMeeting, changeCounter
    end if

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts