Das Notes Forum
Domino 9 und frühere Versionen => ND7: Entwicklung => Thema gestartet von: Blackraven am 26.03.07 - 16:36:26
-
Hallo,
ich möchte in ner Dok-Collection über nen Stampall ein paar Felder setzen.
Dies klappt auch soweit.
NUR: komischerweise kommt dabei auch gleich nen Popup mit dem "gestampten" Feldnamen hoch.
Kennt das jemand?
-
Nein, Du hast sicher irgendwo eine Msgbox.
Durchsuche den Code nach "Msgbix" oder "Messagbox".
Matthias
-
negativ, keine Messagebox in der gesamten Maske
-
Wie in der Maske?
Hast Du den Code in der Maske irgendwo?
Das muss so sein, dass eine Messagbox aufgerufen wird.
Wir nutzen das StampAll auch sehr oft und haben keine Messabox. Das wäre ja mehr als fatal, wenn IMMER eine Messagbox angezeigt wird.
Eine Ausgabe erfolgt nunmal nur über eine Messagebox... :-:
Matthias
-
den Code hab ich im Querysave, und beim Aufruf des Stampall kommt dann komischerweise dieses Popup
-
komischerweise dieses Popup
Kein Programm macht irgendetwas aus freien Stücken. Also muss in deinem Coding etwas vorhanden sein, was das Popup erzeugt.
Im Debugger sollte die Stelle ganz schnell gefunden sein
-
....klingt komisch, ist aber so :(
Hab schon ganz oft "Ent-Käfert", aber ich bekomm definitiv das Popup beim Ausführen des "Stampall", und ja, es ist definitiv keine Messagebox irgendwo im Code.
-
Screenshot!
-
wovon möchtest du denn gerne einen Screenshot, vom Popup, oder vom Code?
-
Vom Popup natürlich. :)
-
das isser....
"RestrictedReaders" ist das Feld, welches ich mit dem Stampall setze.
-
100% Msgbox o.ä. !
-
ok, dann geb ich das auf.
und noch Mal: ich habe keine Messagbox in der Maske !!!!!!!
Ich habe zum Test nochmal eine neue jungfräuliche Maske erstellt, nur mit dem Code im Querysave..und wieder kommt beim Ausführen des Stampall der Popup.
Mein Code im Querysave:
Dim note As NotesDocument
Set note = Source.Document
Dim Session As New NotesSession
Dim db As NotesDatabase
Set db = session.CurrentDatabase
'Suche alle Dokumente die zu diesem Bereich gehören und aktualisiere Leserfeld
Dim searchformula As String
searchformula = {(Form="Stelle" | Form="Document") & Bereich="}+ note.Stammdatenbereich &{"}
Dim collStelle As NotesDocumentCollection
Set collStelle = db.search(searchformula,Nothing,0)
Call collStelle.StampAll("Tescht",note.BereichLeser)
Und als letztes Wunder: Es tritt auf beim 7.0.2. aber nicht bei 6.5.5 :(