Domino 9 und frühere Versionen > Entwicklung
This operation is not allowed while a dialogbox is displayed
TMC:
Hi,
wenn ich in einer Dialogbox den Code
--- Zitat ---@Command([FileCloseWindow]);
@PostedCommand([ToolsRunMacro]; "(EditApproved)")
--- Ende Zitat ---
habe bringt Notes die o.g. Fehlermeldung.
Im Macro wird ein Code ausgeführt, bei dem die Dialogbox in der Tat wieder geschlossen sein muss, daher hab ich den Code ja in ein Makro ausgelagert.
Nur führt wohl Notes erst das Makro aus, bevor es die Box schließt.
Kennt wer einen Workaround?
TMC
koehlerbv:
Oh je, jetzt sind wieder die Hellseher gefragt ...
Wie wär's mit ein bißchen Code aus Deinem Agent ?
Leute, versetzt Euch doch endlich mal in die Lage derjenigen, von denen Ihr Antworten erwartet !!!
TMC:
Hi,
Das hier denke ich hat als Info gereicht:
--- Zitat ---Im Macro wird ein Code ausgeführt, bei dem die Dialogbox in der Tat wieder geschlossen sein muss
--- Ende Zitat ---
Aber ich bin kein Profi, hier mal der Code:
--- Zitat ---Dim uiws As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Dim newuidoc As NotesUIDocument
Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Dim newdoc As NotesDocument
Dim unid As String
Set uidoc = uiws.CurrentDocument
Set doc = uidoc.Document
Set db = session.CurrentDatabase
Set newdoc = doc.CopyToDatabase( db )
unid = doc.UniversalID
newdoc.IDapproved = unid
Dim rtitem As NotesRichTextitem
Set rtitem = New NotesRichTextItem( newdoc, "DocLinkA" )
Dim linkdoctest As NotesDocument
Set linkdoctest = db.GetDocumentByUNID(unid)
Call rtitem.AppendDocLink(linkdoctest,"Link to blabla")
newdoc.Status = "2"
Call newdoc.save(False, False)
Call uidoc.Close
Call uiws.viewrefresh()
Set newuidoc = uiws.editDocument(True, newdoc)
--- Ende Zitat ---
Jedenfalls schätze ich, kann man da die Box absolut nicht gebrauchen....
TMC
koehlerbv:
Mir geht es immer noch so: Ich muß viel zu viel nachdenken, was Du eigentlich machen willst. Deine Aussagen sind immer noch unklar.
- Von wo und wie rufst Du die Dialogbox auf?
- Worauf willst Du im Agent das NotesUIDocument beziehen?
- Was soll Deine Aktion bewirken ?
Klare Anfragen bewirken hier in diesem Forum nach meiner Erfahrung schnelle und i.d.R. kompetente Antworten. Ich helfe ja auch gerne, aber wenn ich erstmal 'ne halbe Stunde brauche, um den möglichen Sinn der Frage zu verstehen ...
Meist ist es ja auch so - und auch das ist ja der Wert dieses Forums - daß sich statt einem "workaround" oder "von hinten durch die Brust ins linke Auge" viel bessere Lösungsansätze des eigentlichen Problems ergeben.
Dein "Das hier denke ich hat als Info gereicht" war jedenfalls nicht gerade motivierend - immerhin suchst Du eine Lösung, kannst mir aber garantiert für meine offenen Notes-Probleme keine Lösung bieten - wirklich: Garantiert !
Ni sa schto, wie der Russe sagt: Mit ein paar mehr Infos mehr helfe ich gerne weiter. Mach's uns einfach ein bißchen einfacher, wie in Deinen letzten Postings ;-)
Bernhard (nur ein ganz klein wenig sauer)
TMC:
Sorry wenn ich in Unklarheiten poste.
Eigentlich mein Ziel wenn ich selber was poste / ne Frage habe:
-> so kurz wie nur möglich (keine seitenlangen Fragen...)
-> alle Infos drin die der Helfende braucht
Nur manchmal ist wohl (so wie in diesem Thread) der 2. Punkt überhaupt ned erfüllt.
Also sorry für die Lücken bei der Übermittlung meiner Anfrage!
Was will ich machen:
- User öffnet eine Maske/Dokument, und will dieses bearbeiten
- das Querymodechange sagt aber: Nö erst mal sagst Du mir was Du überhaupt machen willst -> Code im Querymodechange, welches die Dialogbox öffnet
- Wenn User auf "OK" klickt", dann wird der o.g. Code ausgeführt.
Der Code soll bewirken, dass u.a.
- das aktuelle Dok bearbeitet wird (welches der User eben z.Zt. ausgewählt hat)
- etc. (siehe Script, also Doc kopieren, ID altes Doc in neues Doc kopieren, altes Doc schließen, neues Doc öffnen etc.).
Ich hoffe nun ist es verständlich was ich will.
Grüße aus Niederbayern
TMC
** EDIT **:
Das Script klappt einwandfrei wenn es in einem Button der Maske steckt....
Navigation
[0] Themen-Index
[#] Nächste Seite
Zur normalen Ansicht wechseln