Domino 9 und frühere Versionen > ND6: Entwicklung
Aufruf Dokument mit Maskenwechsel
BigWim:
--- Zitat von: Wiesel am 04.06.09 - 09:33:20 ---Das kannte ich noch gar nicht.
Hab das jetzt in die Aktion eingebaut. Leider verweigert mir Notes aber den Befehl. Kriege die Fehlermeldung "Angegebener Befehl kann nicht ausgeführt werden".
Habe jetzt einfach
@Command( [ViewSwitchForm] )
in die Aktion gepackt.
Und ich möchte das auf jeden Fall in eine Aktion packen und nicht in eine Maskenformel.
--- Ende Zitat ---
Da fall ich auch immer wieder drauf rein!
Der Wechsel funktioniert nur im Bearbeitungsmodus des Dokuments. Versuch es so:
--- Code: ---@Command([EditDocument];1);
@Command( [ViewSwitchForm];"(DruckVorlage)")
--- Ende Code ---
Markus
Wiesel:
Zu Andreas: Notes stürzt mir trotzdem ab.
Zu Markus: Da bekomme ich die Fehlermeldung: Angegebene Rahmengruppe nicht vorhanden, oder so ähnlich)
TRO:
@Andreas
--- Zitat von: ascabg am 04.06.09 - 11:25:02 ---@Thomas,
Dann kann man doch auch gleich auf die UIView-Klasse losgehen.
--- Code: ---Set doc = ses.CurrentDatabase.GetDocumentByID(uivw.CaretNoteID)
--- Ende Code ---
Andreas
--- Ende Zitat ---
Da kann man sich streiten, was sinnvoller ist.
CaretNoteID wirkt ja nur auf das Dok die Zeile, auf der ich im Moment stehe. Sind da auch Häkchen in der Ansicht führt das m.E. nur zur Verwirrung der User.
UnprocessedDocuments wirkt auf alle ausgewählten, also entweder auf alle "Häkchen-Doc" oder wenn keine Häkchen vorhanden, auf das, auf dem ich aktuell stehe. (das wäre dann in diesem Fall = Caret).
Mit UnprocessedDocuments kann dann auch schön alle Häkchen-Doc in einer Schleife abarbeiten.
Wie gesagt, alles Geschmackssache bzw. vom konkreten Einsatzfall abhängig.
@Wiesel:
--- Zitat von: Wiesel am 04.06.09 - 11:56:58 ---Zu Andreas: Notes stürzt mir trotzdem ab.
--- Ende Zitat ---
Dann poste mal den kompletten, jetzt aktuellen Code.
Thomas
Wiesel:
Letzter Versuch war der hier:
Sub Click(Source As Button)
Dim workspace As New NotesUIWorkspace
Dim session As New NotesSession
Dim doc As NotesDocument
Dim uidoc As NotesUIDocument
Set doc = session.DocumentContext
If doc.form(0) = "Vorlage" Then
doc.form = "(DruckVorlage)"
Call notesUIWorkspace.EditDocument( False, doc, True,, False )
End If
End Sub
ascabg:
Dann versuch doch mal
--- Code: ---Set uidoc = workspace.EditDocument(False, doc)
--- Ende Code ---
anstatt von
--- Code: ---Call notesUIWorkspace.EditDocument( False, doc, True,, False )
--- Ende Code ---
wobei ich mich hier frage, woher kommt notesUIWorkspace.
Andreas
Navigation
[0] Themen-Index
[#] Nächste Seite
[*] Vorherige Sete
Zur normalen Ansicht wechseln