Das Notes Forum
Domino 9 und frühere Versionen => ND7: Entwicklung => Thema gestartet von: skywook am 04.03.09 - 09:14:23
-
Hallo,
bräuchte mal wieder eure Hilfe.
Ich starte im Datenbankscript PostOpen eine Script-Bibliothek die mir in der DB ein Doc sucht (mit view.GetDocumentByKey) und dieses dann mit ws.EditDocument(true,doc) öffnet.
Das Doc wird zwar geöffnet, aber ich bekomme immer die Meldung:
Angegebener Befehl kann nicht ausgeführt werden.
Für einen Tipp wäre ich dankbar.
-
Hi.
Steht da noch mehr Code drin?
Hast Du da ein Fehlerhandling engebaut?
-
Hier der Code. Hab schon versucht den Fehler abzugreifen - leider vergebens.
Sub KundeOeffnen(key As String)
On Error Goto ErrorHandler
Dim ws As New NotesUIWorkspace
Dim session As New NotesSession
Dim doc As NotesDocument
Dim db As NotesDatabase
Set db = session.CurrentDatabase
'Lib öffnen und key für die Suche übergeben - Rückgabe ist ein doc
Set doc = AuswahlSuche(key)
'Gibt es das Doc wirds geöffnet ansonsten Meldung
If Not doc Is Nothing Then
Call ws.EditDocument(True, doc)
Else
Msgbox "Eingelesener Kunde nicht vorhanden!", 0+16, "Achtung"
Exit Sub
End If
Exit Sub
'Fehlerbehandlung
ErrorHandler:
'fehlertext1 = "Fehler-Nr.:" & Err & " — " & Error$ & " (line: " & Erl & " )"
'Msgbox fehlertext1
'Resume Next
End Sub
-
Probier mal bei ws.EditDocument
Set notesUIDocument = notesUIWorkspace.EditDocument( [editMode] , [notesDocument] , [notesDocumentReadOnly] , [documentAnchor$] , [returnNotesUIDocument] , [newInstance] )
den Parameter returnNotesUIDocument = False zu verwenden.
Thomas
-
Das liegt nicht am geposteten Code, sondern innerhalb der Maske, mit der das gefundene Dokument geöffnet wird. Bis wird darüber mehr wissen, können wir auch nichts dazu sagen.
Bernhard