Das Notes Forum
Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: mh70220 am 24.01.04 - 21:58:30
-
Hallo alle zusammen,
hier ist mein Agent:
Dim workspace As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Set uidoc = workspace.CurrentDocument
Dim object As NotesEmbeddedObject
Dim heute As New notesdatetime ("heute")
Dim word As Variant
Dim wordoc As Variant
Dim Person As String
'Zusammensetzung von Dienstgrad, Vorname, Name
Person = uidoc.FieldGetText("Dienstgrad") + " " + uidoc.FieldGetText("Vorname") + " " + uidoc.FieldGetText("Name")
'Starten von Word und Auswahl von Dokumentenvorlage
Set word = CreateObject("Word.Application")
Call word.documents.add("E:\Datenbanken\Entwicklung\Vorlagen\LetterSoldat.dot")
Set worddoc = word.activedocument
'Befuellen der Felder vom ausgewaehlten Dokument
worddoc.FormFields("TXTANREDE").result = uidoc.FieldGetText("Anrede")
worddoc.FormFields("TXTPERSON").result = Person
worddoc.FormFields("TXTDIENSTSTELLE").result = uidoc.FieldGetText("Dienststelle")
'Word sichtbar machen
word.visible = True
End Sub
Wenn ich diesen Agenten ausfuehre, dann bekomme ich die Meldung, das das Dokument nicht gespeichert ist. Gibt es eine Moeglichkeit am Anfang einen Speicherbefehl einzubauen?
-
kommt die Meldung von Word oder von Notes?
Wenn sie von Notes kommt -> welche Zeile deines Scripts verursacht die Meldung?
-
kommt von Notes. Welche Zeile.... keine Ahnung. ich weis nur, wenn ich vorher auf den Seicherbutton druecke und dann auf den, der den Agenten startet, dann geht es ohne Probleme
-
Problem geloest. habe das gesamte script direkt in den Button gesetzt. nun geht es.
-
Call uidoc.Save
speichert Dein Dokument. Aber wie es ausschaut, greifst Du auf ein existierendes Dokument zu ... Vielleicht geht uns hier noch ein bisschen von den Rahmenbedingungen ab ? Sag mal an ;-)
Und irgendwie habe ich das Gefühl, das Forum entwickelt sich gerade zur "Heimatfront" - immer wieder Anfragen vom Bund ... Aber ich hab' nix dagegen ! ;)
Bernhard (Leutnant d.R.) ;D
-
mach mal im Menü File->Tools->Debug LotusScript (weiß nicht, wie das auf deutsch heißt. irgendwas im Datei Menü) und schau nach, wo der Fehler auftritt.
-
Welche Zeile.... keine Ahnung
Hierzu bitte den Debugger bemühen - der sagt Dir genau an, wo es "kracht". Oder einen ErrorHandler einbauen. Die Suche in diesem Forum zum Thema "ErrorHandler" oder "ErrorRoutine" führt Dich zu Beispielen.
HTH,
Bernhard
-
Auf Deutsch: Datei - Extras - Debug LotusScript. Wer ernsthaft programmiert (mit deutschem Designer): Alt-D-X-D ;D
Bernhard
-
Und irgendwie habe ich das Gefühl, das Forum entwickelt sich gerade zur "Heimatfront" - immer wieder Anfragen vom Bund ... Aber ich hab' nix dagegen ! ;)
Bernhard (Leutnant d.R.) ;D
;D ;D ;D
Ich helfe den Jungs gerne (die Mädels werden ja leider meist nur für den Sani-Bereich eingeteilt).
gez. OG Matthias
-
OK, Sie können rühren, Obergefreiter ;D
-
Das liegt vermutlich daran, wie man in einem anderen Thread gesehen hat (Bereich R5-Entwicklung) das es dort so viele Nutzer gibt, die schön verteilt auf verdammt vielen Servern liegen. Und damit ist (logische Entwicklung) auch die Zahl der "Eigenentwickler" stark vertreten.
Und irgendwie habe ich das Gefühl, das Forum entwickelt sich gerade zur "Heimatfront" - immer wieder Anfragen vom Bund ... Aber ich hab' nix dagegen ! ;)
Bernhard (Leutnant d.R.) ;D