Hallo,
Nachfrage: Warum bekommen ich beim folgenden Script die Fehlermeldung "Not a member" für den View-Aufruf?
Sub Queryopen(Source As Notesuidocument, Mode As Integer, Isnewdoc As Variant, Continue As Variant)
Dim ws As NotesUIWorkspace
Dim uidb As NotesDatabase
Set uidb = ws.currentDatabase
Set ws = notesUIWorkspace.CurrentDatabase
Call ws.OpenFrameSet( "MainFrameset" )
Call ws.SetTargetFrame( "SubTopMenu" )
Call ws.OpenPage( "Überschrift" )
Call ws.SetTargetFrame( "ApplicationContent")
Call uidb.OpenView( "Zielverfolgung",,True)
End Sub
Alexis