save data in visual fox how to?

hi,

roka wrote: how could i do to save calendar data  in a table or cursor in visual fox9?

good Question ... i´m working with Xbase++ on same.

Information you will get from CalenderHitInfo
*** snip ***
METHOD Calender:EditCell(oHitInfo)

   CalendarViewEvent := oHitInfo:ViewEvent

   IF CalendarViewEvent == NIL
*      MSGBOX("do you want to create a new Entry ?")
      nAction := ID_FILE_NEW

   ELSE
      nAction := ID_FILE_EDIT

      CalendarEvent     := CalendarViewEvent:GetProperty("Event")
      CalendarEventRecurrenceState := CalendarEvent:GetProperty("RecurrenceState")

      DO CASE
         CASE CalendarEventRecurrenceState = xtpCalendarRecurrenceNotRecurring
         CASE CalendarEventRecurrenceState = xtpCalendarRecurrenceMaster
         CASE CalendarEventRecurrenceState = xtpCalendarRecurrenceOccurrence
         CASE CalendarEventRecurrenceState = xtpCalendarRecurrenceException
      ENDCASE

      cBody                       := CalendarEvent:Body
      cCreationTime               := CalendarEvent:treatDateAsString(.T.):GetProperty("CreationTime")
      cEndTime                    := CalendarEvent:treatDateAsString(.T.):GetProperty("EndTime")
      cLastModificationTime       := CalendarEvent:treatDateAsString(.T.):GetProperty("LastModificationTime")
      nLabel                      := CalendarEvent:Label
      cLocation                   := CalendarEvent:Location
      lMeetingFlag                := CalendarEvent:MeetingFlag
      lPrivateFlag                := CalendarEvent:PrivateFlag
      lReminder                   := CalendarEvent:Reminder
      nReminderMinutesBeforeStart := CalendarEvent:ReminderMinutesBeforeStart
      cReminderSoundFile          := CalendarEvent:ReminderSoundFile
      nScheduleID                 := CalendarEvent:ScheduleID
      cStartTime                  := CalendarEvent:treatDateAsString(.T.):GetProperty("StartTime")
      cSubject                    := CalendarEvent:Subject
      nImportance                 := CalendarEvent:Importance

      MSGBOX("Body             "+Trim(cBody)             +CRLF+;
             "CreationTime     "+cCreationTime           +CRLF+;
             "EndTime          "+cEndTime                +CRLF+;
             "LastModification "+cLastModificationTime   +CRLF+;
             "Label            "+STR(nLabel)             +CRLF+;
             "Location         "+cLocation               +CRLF+;
             "MeetingFlag      "+IF(lMeetingFlag,"Y","N")+CRLF+;
             "PrivateFlag      "+IF(lPrivateFlag,"Y","N")+CRLF+;
             "Reminder            "+IF(lReminder   ,"Y","N")+CRLF+;
             "ReminderMinutes  "+STR(nReminderMinutesBeforeStart)+CRLF+;
             "ReminderSoundFile"+cReminderSoundFile      +CRLF+;
             "ScheduleID       "+STR(nScheduleID)        +CRLF+;
             "StartTime        "+cStartTime              +CRLF+;
             "Subject          "+cSubject                +CRLF+;
             "Importance       "+STR(nImportance) )

    DoMore(oHitInfo,nAction)

*** eof ***
so far so good, BUT ...

with Xbase++ we have WorkSpaceArea for each Thread
i do open a DBF in MAIN.

*** snip ***
PROCEDURE DoMore(oHitInfo,nAction)
 
 MsgBox("Alias is "+ALIAS() )

*** eof ***
Xbase++ does say NO ALIAS(), no open DBF ... ? where is it ?

While CJ Calender is a activeX ... does CJ Calender run as seperate Thread ?
... and to :open DataProvider is use a ConnectionString ... does CJ use a own Workspace(Area) so that i can not use it together with Xbase++ DBF ?

in DataProvider there are "buildin" datalink to Access
*** snip ***
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\events.mdb"
*** eof ***
while DBF can also used by "Microsoft.Jet.OLEDB.4.0" i like to ask if someone know Syntax and Structure to use a DBF ?

have a nice Xmas