Autor Thema: Gelöschte Maske wiederherstellen  (Gelesen 1755 mal)

TomLudwig

  • Gast
Gelöschte Maske wiederherstellen
« 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

Offline koehlerbv

  • Moderator
  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 20.460
  • Geschlecht: Männlich
Re: Gelöschte Maske wiederherstellen
« Antwort #1 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

TomLudwig

  • Gast
Re: Gelöschte Maske wiederherstellen
« Antwort #2 am: 26.01.07 - 11:22:02 »
danke....

:(

Offline LN4ever

  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 505
  • Geschlecht: Männlich
Re: Gelöschte Maske wiederherstellen
« Antwort #3 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
Situs vilate in isse tabernit.

TomLudwig

  • Gast
Re: Gelöschte Maske wiederherstellen
« Antwort #4 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.... ;)

 

Impressum Atnotes.de  -  Powered by Syslords Solutions  -  Datenschutz