Hallo!
Ich habe in der Maske "Kalendereintrag" der Mailschablone den Button "Bewirtung" eingefügt, hinter dem sich folgender Code verbirgt:
Sub Click(Source As Button)
Dim s As New NotesSession
Dim ws As New NotesUIWorkspace
Dim doc As NotesDocument
Set doc = ws.CurrentDocument.Document
If Not ws.DialogBox( "DialogBewirtung" , False , False, False, False, False, False, "Ort der Besprechung", doc ) Then
Exit Sub
End If
Call doc.Save(False,False)
End Sub
Wenn ich im eigenen Kalender mittels "Besprechung planen" ein Dokument öffne und den Button klicke, funktioniert alles wie gewünscht.
Erstelle ich aber den Eintrag in einem fremden Kalender kommt die Fehlermeldung:
"DialogBox kann nicht in diesem Kontext verwendet werden. Es muss ein Dokument ausgewählt werden."
Ich hab mir die Variablen im Debugger angesehen, das doc ist gesetzt.
Wo liegt hier mein Fehler?
Bille
EDIT: Auf erledigt gesetzt!
Ja, die Dialogbox ist als eigene Maske in der Mailschablone vorhanden.
Ich hab die Validierung im Code eingefügt. Es erscheint aber immer noch der gleiche Fehler.
Der Fehler tritt beim Öffnen der Dialogbox auf, also in der Zeile
If Not ws.DialogBox( "DialogBewirtung" , False , False, False, False, False, False, "Ort der Besprechung", doc ) Then
An dem nicht vorhandenen doc dürfte es nicht liegen, zum einen wird es nun ja vorher abgefragt und zum anderen kann ich im Debugger das doc (samt Items usw.) auch sehen.
Auch sonst kann ich keinen Unterschied entdecken.
Kann es evtl. doch noch mit irgendwelchen Rechten zu tun haben?
Bille