AtNotes Übersicht Willkommen Gast. Bitte einloggen oder registrieren.
09.05.21 - 16:00:10
Übersicht Hilfe Regeln Glossar Suche Einloggen Registrieren
News:
Schnellsuche:
+  Das Notes Forum
|-+  Lotus Notes / Domino 9
| |-+  ND9: Entwicklung (Moderatoren: Axel, eknori, Thomas Schulte, koehlerbv, m3)
| | |-+  Frontentdoc -> RTF im Backend ändern, Frontend sichtbarkeit
« vorheriges nächstes »
Seiten: [1] Nach unten Drucken
Autor Thema: Frontentdoc -> RTF im Backend ändern, Frontend sichtbarkeit  (Gelesen 496 mal)
Schnubbel
Junior Mitglied
**
Offline Offline

Beiträge: 85


« am: 30.11.20 - 10:45:02 »

Hallo Ihr Lieben,

ich hänge gerade an einem Problem und komm nicht weiter:

Ich habe ein Dokument im Frontend offen. In diesem Dokument gibt es ein RTF. Ich drücke auf einen Button und will einen Bereich in dem RTF ändern.

Code:

Dim ws As New Notesuiworkspace
Dim uidoc As Notesuidocument
Dim frontdoc As Notesdocument

Set uidoc = ws.CurrentDocument
Set frontdoc = uidoc.Document

Dim i As Integer
Dim AlterWert As String
Dim NeuerWert As String

Dim AlteZeile As String
Dim NeueZeile As String


Dim rtitem As NotesRichTextItem
Dim rtrange As NotesRichTextRange

Set rtitem = frontdoc.Getfirstitem("RTF")

Set rtrange = rtitem.CreateRange

AlterWert  = frontdoc.Feldwert(0)

NeuerWert = Inputbox("Bitte geben Sie die neue Bezeichnung für " & AlterWert & " ein","Neue Bezeichnung",AlterWert)

Call uidoc.FieldSetText("Feldwert","")
Call uidoc.FieldSetText("SaveOptions","0")
Call uidoc.Close(True)

Print "Ausgetauscht:" & rtrange.findandReplace(AlterWert,NeuerWert)

Call frontdoc.save(1,1)

Call ws.EditDocument(True, frontdoc)

Set uidoc = ws.CurrentDocument
Call uidoc.FieldSetText("SaveOptions","1")

Ich habe hier im Forum die Funktion findandReplace gefunden und würde es gerne darüber machen.
Ich versuche also das Frontenddok zu schließen,
das RTF im Hintergrund zu ändern und dann wieder das Frontend zu öffnen.

Hat jemand einen kleinen Zaunpfahl mit dem er mich in die richtige Richtung schubsen mag?

Danke Smiley
« Letzte Änderung: 30.11.20 - 14:20:31 von Schnubbel » Gespeichert

Client -> Notesclient 8.5.3
Betriebssystem ->Windows 7
User-> Thorsten Smiley
Peter Klett
Gold Platin u.s.w. member:)
*****
Offline Offline

Geschlecht: Männlich
Beiträge: 2702



« Antworten #1 am: 30.11.20 - 13:06:46 »

Du musst Dir von dem Dokument die ID merken, dann das Dokument schließen und aus dem Speicher löschen

Delete uidoc
Delete frontdoc

dann über die ID das Dokument neu holen, das Richtextfeld ändern. Dokument speichern und zuletzt das Dokument neu öffnen
Gespeichert
Schnubbel
Junior Mitglied
**
Offline Offline

Beiträge: 85


« Antworten #2 am: 30.11.20 - 14:21:00 »

Vielen Dank! Jetzt tut der Code, was er soll  Grin
Gespeichert

Client -> Notesclient 8.5.3
Betriebssystem ->Windows 7
User-> Thorsten Smiley
Seiten: [1] Nach oben Drucken 
« vorheriges nächstes »
Gehe zu:  


Einloggen mit Benutzername, Passwort und Sitzungslänge

Powered by MySQL Powered by PHP Powered by SMF 1.1.21 | SMF © 2006, Simple Machines Prüfe XHTML 1.0 Prüfe CSS
Impressum Atnotes.de - Powered by Syslords Solutions - Datenschutz | Partner: