Domino 9 und frühere Versionen > ND6: Entwicklung

RenderToRTItem

(1/2) > >>

reraru:
Mahlzeit allerseits!

Ich habe hier im Forum ein Post gefunden (http://atnotes.de/index.php?topic=9503.0), in dem Versucht wird aus einer Maske heraus ein Dokument über den Befehl "RenderToRTItem" in eine andere Datenbank zu "kopieren".

Was ich möchte:

Ich möchte gerne unser Mailschablone anpassen, indem ich einen neuen Aktions-Button einfüge.

Wenn ich ein Notes-Memo öffne, dann möchte ich die geöffnete Mail per o.g. Befehl in ein Dokument einer anderen DB kopieren.

Den Code aus dem Forum habe ich mal ein wenig angepasst:


--- Code: ---Sub Click(Source As Button)
Dim session As New NotesSession
Dim session2 As New NotesSession
Dim workspace As New NotesUIWorkspace
Dim db As NotesDatabase
Dim db2 As NotesDatabase
Dim uidoc As NotesUIDocument
Dim docA As NotesDocument
Dim docB As NotesDocument
Dim rtitem As NotesRichTextItem
Dim success As Variant
Set db = session.CurrentDatabase
Set db2 = session2.GetDatabase("domino", "IT")
Set uidoc = workspace.CurrentDocument
Set docA = uidoc.Document
If Not(db2.IsOpen) Then Call db2.Open("", "")
[b]Set docB = New NotesDocument( db2 )[/b]
Set rtitem = New NotesRichTextItem( docB, "mail_body" )
docB.Form = "edv_mail"
docB.mail_thema = "It's a picture of the document"
Call docB.Save( True, True )
success = docA.RenderToRTItem( rtitem )
Call docB.Save( True, True )
End Sub

--- Ende Code ---

Es scheitert an der Fehlermeldung:

"Database has not been opened yet"

an dieser Stelle:

--- Code: ---Set docB = New NotesDocument( db2 )
--- Ende Code ---

Um dies zu verhinden habe ich auch hier im Forum einen Hinweis gefunden:

--- Code: ---If Not(db2.IsOpen) Then Call db2.Open("", "")
--- Ende Code ---

Leider kommt die Fehlermeldung noch immer, und im Debugger ist der Status
von DB2 (ISOPEN = False).

Hat jemand evtl. eine Erklärung dafür ???

Vielen Dank.

Gruß René

Axel:
Hi,

ist die DB an der entsprechenden Stelle auf dem angegebenen Server auch vorhanden? Hast du ausreichende Zugriffsrechte?


Axel

reraru:
Arghhh!

Ich bin ja so selten dämlich!

Natürlich vergesse ich das die DB nicht direkt im Data Verzeichnis ist, sondern in einem Unterodner.
Klappt jetzt wunderbar.

Ich sollte wohl besser erstmal nen starken Kaffe kochen... ;-)

Vielleicht aber noch eine Frage:

Das Dokument in meiner DB ist ein Antwortdokument.

Ich möchte beim Betätigen des Aktions-Buttons natürlich das zu erstellende Dokument dem übergeordneten Dokument zuweisen. Wie könnte ich das realisieren?

Vielen Dank!

Gruß René

ghost:
Call notesDocument.MakeResponse( document )

reraru:

--- Zitat ---Call notesDocument.MakeResponse( document )
--- Ende Zitat ---
?

Danke für den Hinweis. Hilft mir leider aber nicht so.

Ich sollte das vielleicht noch genauer beschreiben:

Also ich öffnen ein Notes Memo. Dieses Dokument möchte ich dann einem bestimmten
Dokument in meiner anderen DB zuordnen.

Bei der anderen DB geht es um EDV-Aufträge, denen ich zugehörige Mails anheften möchte.
Dazu habe ich zu der Maske "EDV Aufträge" eine Maske (Antwort-Dokument) "Mails" in die ich per RenderToRTItem den Inhalt der NotesMail kopieren möchte.

Ich müsste also eine Möglichkeit schaffen nach dem Klick auf den besagten Button: erstmal den zugehörigen EDV-Auftrag zu wählen. Am besten über eine Ansicht.

Wie wär das machbar?

Navigation

[0] Themen-Index

[#] Nächste Seite