Das Notes Forum
Domino 9 und frühere Versionen => ND6: Entwicklung => Thema gestartet von: Glombi am 08.10.04 - 13:50:30
-
*** ERLEDIGT ***
Ich möchte gerne via COM in LotusScript ein Word-Dokument speichern. Folgenden Code habe ich, aber das Speichern geht nicht:
Set application = CreateObject("Word.Application")
Call application.documents.add( filePath )
Set ActiveDocument = application.activedocument
...
ActiveDocument.Save 'Das geht nicht. es wird nicht gespeichert
Das geht auch nicht:
ActiveDocument.SaveAs filePath 'Das geht - danke Jens
Ich suche nich verzweifelt nach einer Doku der COM-Klassen...
Andreas
-
Oeffne Word
Gehe unter Extras - Marko
Rufe den Visual-Basic Editor auf
Rufe dort die Hilfe auf
Dadrin findest Du die Angaben.
Um Deine Anforderung zu finden, suche nach dem Document - Object
Dort findest Du die SaveAS Methode, die Du hier offenbar benutzen möchtest.
-
SaveAs muss es heissen, Andreas.
Und die Doku der Klassen findet sich in der Hilfe des jeweiligen VBA-Editors.
HTH,
Bernhard
-
Wer behauptet eigentlich immer den Blödsinn, die Berner wären so langsam ? ;D
-
Danke Jens,
ich war hier gelandet, aber das Save funktioniert nicht.
http://www.vba-programmer.com/Word_Code/File_Save_Variations.txt
Aber mit SaveAs geht es ja.
Andreas
-
Danke Bernhard,
ja der Jens war extrem schnell. Sorry, dass ich Euch mit Banalitäten belästige! Irgendwie stand ich gerade auf dem Schlauch...
Andreas
-
No Problem, Andreas, you are welcome :)
Save sollte eigentlich auch tun, aber nicht mit einem neuen Namen, sondern nur bei bestehender Datei, so wie unter Word "Speichern" und "Speichern unter", aber das war Dir ja klar, das steht hier mehr für andere .... ;)
-
Was dem ganzen die Krone aufsetzen würde: Ich speichere jetzt also das Worddokument schließe es und hänge es in ein Notes-Dokument.
Wie kann ich Notes jetzt dazu bringen, dass er das Attachment automatisch bearbeitet, nicht öffnet (also @Command([AttachmentLaunch]). ???
Dieses neue R6 Feature wird programmseitig weder durch @Formel noch durch Script unterstützt, oder?
Andreas
-
Wenn da nix neues dazu gekommen ist, dann ist das so, wie Du sagst, kein programmatischer Zugriff :(
-
No Problem, Andreas, you are welcome :)
Save sollte eigentlich auch tun, aber nicht mit einem neuen Namen, sondern nur bei bestehender Datei, so wie unter Word "Speichern" und "Speichern unter", aber das war Dir ja klar, das steht hier mehr für andere .... ;)
Nun eigentlich ist die Datei ja schon, da wegen
Set object = templ_doc.GetAttachment( attachmentName )
If object Is Nothing Then
Msgbox "Es ist kein Dateianhang vorhanden!",0+16,"Abbruch"
Goto Ende
End If
Call object.ExtractFile( filePath )
Aber egal...
Wegen Goto: bitte nicht hauen ;D
Andreas
-
Hier habe ich was gefunden
http://www-10.lotus.com/ldd/nd6forum.nsf/55c38d716d632d9b8525689b005ba1c0/f2eaabc9b6c049dd85256e90004f64ca?OpenDocument
Sieht nach Hacking aus, oder? Wie soll ich denn den Fokus bekommen?
Andreas
-
Dann sollte es aber auch funktionieren, wenn Du keine Parameter übergibst. Deine Klammer ist es wohl, die das verhindert
edit: das bezieht sich auf das Posting zu Save
-
Dieser LDD-Workaround ist ein Hack, Tastatureingabe imitiert und damit von der Sprachversion des Clients abhängig.