Codejock Forums Homepage
Forum Home Forum Home > Codejock Products > ActiveX COM > Calendar
  New Posts New Posts RSS Feed - Please help!
  FAQ FAQ  Forum Search   Events   Register Register  Login Login

Please help!
 Post Reply Post Reply
Author
Message
  Topic Search Topic Search  Topic Options Topic Options
Matt View Drop Down
Newbie
Newbie


Joined: 21 January 2006
Status: Offline
Points: 9 		Post Options Post Options   Thanks (0) Thanks(0)   Quote Matt Quote  Post ReplyReply Direct Link To This Post Topic: Please help!
    Posted: 21 January 2006 at 2:34pm

Hello,

I've purchased the Calendar control, and am having trouble making recurring entries. I have been over and over the sample program, but can't see what I'm missing thats causing me to fail. Th ereal problem for me is that the sample simply does too much.

Basically I have a calendar and have no problems creating events on it.

I don't need a screen to edit the events, and I don't need a screen for the user to specify the recurrence patterns.

All I want to do is take my calendar event, attach a recurrence pattern to it, populate the pattern options manually, and have the recurrences display on the calendar.


Can anyone list the steps I need to take, and the order they need to be done in, to accomplish this? 

Thanks much

Matt
Back to Top
sserge View Drop Down
Moderator Group
Moderator Group


Joined: 01 December 2004
Status: Offline
Points: 1297 		Post Options Post Options   Thanks (0) Thanks(0)   Quote sserge Quote  Post ReplyReply Direct Link To This Post Posted: 22 January 2006 at 4:45am
Hi Matt,

Please look at Calendar VB sample, frmMain, Form_Load() handler.
There is some commented code which shows how to create a recurrence.

    Dim NewEvent As CalendarEvent, Recurrence As CalendarRecurrencePattern
 
    ' 1 - Create new event
    Set NewEvent = CalendarControl.DataProvider.CreateEvent
 
    ' 2 - Make it as recurrence (Master event)
    Set Recurrence = NewEvent.CreateRecurrence
    
    ' 3 - Set Master event properties
    NewEvent.Subject = "Recurrence test"
 
'** 3 - Set Recurrence pattern options '******************
 
    ' 3.a - Event Start Time and duration
    Recurrence.StartTime = #3:00:00 PM#
    Recurrence.DurationMinutes = 90
 
    ' 3.b - Start/End dates (see also other End date options)
    Recurrence.StartDate = #1/2/2006#
    Recurrence.EndDate = #10/2/2006#
 
    ' 3.c - Recurrence options 
    Recurrence.Options.RecurrenceType = xtpCalendarRecurrenceWeekly
    Recurrence.Options.WeeklyIntervalWeeks = 1
    Recurrence.Options.WeeklyDayOfWeekMask = xtpCalendarDayMo_Fr
    ' 4 - Update recurrence in the master event
    NewEvent.UpdateRecurrence Recurrence
    ' 5 - Add (or update if you edit existing) event
    CalendarControl.DataProvider.AddEvent NewEvent

 
Hopefully that will help. Also try searching other posts here to find more info about recurrences.

--
WBR,
Serge
Back to Top
 Post Reply Post Reply
  Share Topic   

Forum Jump Forum Permissions View Drop Down

Forum Software by Web Wiz Forums® version 12.04
Copyright ©2001-2021 Web Wiz Ltd.

This page was generated in 0.141 seconds.