Jaja liebe Gemeinde es hört sich so banal an, <B>ABER</B> es geht mal wieder nicht.
Folgendes: Ich möchte wenn ich ein Dokument einer Form öffne , dass nicht das Dokument, dass in der View angezeigt wird geöffnet wird sondern, das Dokument , dass in dem Dokument mit der dazugehörigen DocumentuniqueID geöffnet wird.
Also in dem in der View angezeigten Dokument, sind alle Informationen zu einem anderem Dokument in einer anderen DB vorhande. Beim öffnen des Dokumentes in der View soll das eigetnliche öffnen verhindert werden , und anhand der Informationen in dem Dokument das richtige geöffnet werden.Habe dazu in meiner kindlichen Naivität folgenden code entwickelt.
| Sub Queryopen(Source As Notesuidocument, Mode As Integer, Isnewdoc As Variant, Continue As Variant) |
| |
| Dim ws As New NotesUIWorkspace |
| Dim session As New NotesSession |
| |
| Dim dbOpen As NotesDatabase |
| |
| Dim opendoc As NotesDocument |
| Dim uidoc As NotesuiDocument |
| |
| Dim id As String |
| Dim server As String |
| Dim db As String |
| |
| server = {dev01/acceptit/DE} |
| db = {acceptit/rkreutzer/preDocHouse} |
| id = {CC83F46975AEA02EC125727C00547650} |
| |
| |
| Set dbOpen = session.GetDatabase(server,db) |
| Set opendoc = dbopen.GetDocumentByID(id) |
| Call ws.EditDocument(False, opendoc) |
| |
| |
| Continue = False |
| |
| End Sub |
Bevor bescwerden kommen. ich weiss , dass das Dokument vorerst fest verankert ist , aber wir stehen ja noch am anfang des Projektes.
mein Debugger hat auf jedenfall was gegen die Zeile
Call ws.EditDocument(False, opendoc)
. er sagt mir dass diese Methode in im Queryopen nicht verfügbar ist, aber ich kenne andere Methode um ein Dokument mit Skript zu öffnen.
<B>Bitte helft mir </B>