Jump to Date in Calendar View

HCL Domino Domino Forum
1

Hi There,

What I have is a frameset with a form in the top frame and a calendar view in the lower frame.

What i would like to do is when i change the date field in the form and the calendar view in the lower frame jumps to that date.

Here is the code i have so far :

Sub Exiting(Source As Field)

Dim ws As New NotesUIWorkspace

Dim uidb As NotesUIDatabase

Dim uidoc As NotesUIDocument

Dim Venue As String

Dim uiview As NotesUIView

Dim doc As NotesDocument



Set uidb = ws.CurrentDatabase

Set uidoc = ws.CurrentDocument

Set doc = uidoc.document



Venue = uidoc.FieldGetText("Venue")



ws.SetTargetFrame("Calendar")

Set uiview = ws.CurrentView

Evaluate(|@Command( [CheckCalendar]; s_date ) ,doc|)

ws.SetTargetFrame("Booking Form")

End Sub

The only reference to this that i have found is in Formula language (hence the reason for the EVALUATE statement)

Any help would be great.

Thanks

Jamie.