Domino 9 und frühere Versionen > ND6: Entwicklung

Aufruf Dokument mit Maskenwechsel

<< < (3/5) > >>

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