Das Notes Forum

Domino 9 und frühere Versionen => ND6: Entwicklung => Thema gestartet von: TomLudwig am 26.01.07 - 11:11:23

Titel: Gelöschte Maske wiederherstellen
Beitrag von: TomLudwig am 26.01.07 - 11:11:23
Mahlzeit.

ich kenne die Antwort wahrscheilich schon, aber gibt es irgendeinen Möglichkeit (Tool, oder sonstiges) eine im Design gelöschte Maske wiederherzustellen?

Repliken, Kopieren oder Sicherungen der Datenbank sind nicht vorhanden.

Danke für euer Hilfe

Tom
Titel: Re: Gelöschte Maske wiederherstellen
Beitrag von: koehlerbv am 26.01.07 - 11:18:35
Richtig - Du kennst die Antwort schon.
Bei Masken handelt es sich wie bei allen Design-Elementen letzutlich um ganz "normale" Dokumente, und diese lassen sich in Notes nach einer Löschung nicht wieder "hervorzaubern".

Bernhard
Titel: Re: Gelöschte Maske wiederherstellen
Beitrag von: TomLudwig am 26.01.07 - 11:22:02
danke....

:(
Titel: Re: Gelöschte Maske wiederherstellen
Beitrag von: LN4ever am 26.01.07 - 18:45:41
Wenn wiederherstellbare Löschungen aktiviert sind, kann man versuchen, eine Maske in einer speziellen Ansicht darstellen zu lassen, die
- Softdeletions darstellt
- Dokumente der $FormulaClass "4" darstellt (ich glaube, daß "4" Masken und Teilmasken sind)

Die Ansicht braucht eine Aktion, mit der man die $FormulaClass nach jeder Änderung der Ansicht im Designer wieder auf das gewählte Designelement zur Anzeige stellt. Also: Entwickeln - Öffnen - Aktion drücken - danach siehst du die Elemente.

Meine Aktion für die selektiven Replikationsformeln ("2048") z.B.
An die Stelle muß bei dir "4" rein.

Sub Initialize
'--This agent changes the $FormulaClass field of a view to "4" to show Forms and Subforms
   Dim session As New NotesSession
   Dim db As NotesDatabase
   Dim view As NotesView
   Dim doc As NotesDocument
   
   Set db = session.CurrentDatabase
'--CUSTOMIZE:Change the name of the view below to customize
   Set view= db.GetView("09DesignView")
'--You now have a handle on the design element of the view.
   
   Set doc = db.GetDocumentByUNID(view.UniversalID)
'--CUSTOMIZE: The code on the line below changes the $FormulaClass field.
'--See chart above for other values.
   Call doc.ReplaceItemValue("$FormulaClass", "2048")
   doc.Save True, True
End Sub
Titel: Re: Gelöschte Maske wiederherstellen
Beitrag von: TomLudwig am 29.01.07 - 08:57:11
Guten Morgen,

ich habs grad ausprobiert.

Maildatenbank -> Ansicht erstellt
Agent der die Ansicht (Feld $FormulaClass) ändert
Neue Maske erstellt und glöscht

Das Feld in der Ansicht (vorher Wert 1) wurde auf den Wert 4 geändert.
Zeigt aber keinerlei Dokument an.

Wär intressant zu wissen wies geht.... ;)