Domino 9 und frühere Versionen > ND6: Entwicklung

Export nach Word, Dokumentenschutz in Word generieren

<< < (2/2)

Johnson:
@Sabine

Referenz für Word:
1. Öffne Word
2. Drücke Alt + F11 um den Visual Basic Editor zu öffnen
3. Drücke F2 um den Objektkatalog zu öffnen.

Dann kannst du nach der Funktion/Methode/Eigenschaft/Objekt.... suchen,
oder direkt über das Fenster "Klassen" das Objekt auswählen.

Alternativ über die MSDN-Library von Microsoft:
http://msdn2.microsoft.com/en-us/library/ms400535.aspx


koehlerbv hat aber nicht ganz unrecht:
Der Fehler "No Resume" wird wieder kommen, wenn dein Script einen Fehler wirft. Wenn du z.B. auf ein Word-Objekt nicht zugreifen kanns oder wenn eine Word-Funktion fehlschlägt.

Du wirst sicher ein "On Error Goto [lable]" in deinem Code haben.
Weiter unten in deinem Code wirst du dann wahrscheinlich das Errorhandling eingebaut haben. Leider ohne dem Errorhandling zu sagen, was nach der Fehlerbehandlung passieren soll.

Ein simples Beispiel


--- Code: ---Sub Initialize
Dim i as Integer
Dim v as Variant

On error Goto errorhandler
v = "alklkasdf"
i = v ' hier tritt ein "Type mismatch" auf
' die Anweisung "On Error Goto errorhandler"
' besagt, daß ab dem Lable "errorhandler" weitergemacht werden soll.

Print i

exitsub:
Exit Sub ' Prozedur wird verlassen

errorhandler: ' Ab hier wird im Fehlerfall weitergemacht.

Msgbox Error ' Gibt die Meldung "Type mismatch" aus

Resume Next ' Mach in der Zeile, in der der Fehler aufgetreten ist weiter
'Resume exitsub ' Spring zum Lable "exitsub"

End Sub
--- Ende Code ---

Würden hier beide Resume-Anweisungen "auskommentiert" werden kommt der Fehler "No Resume", weil das Script nicht weis, wo es weitermachen soll.

Sabine:
@Axel,

nochmals herzlichen Dank, hast mir wirklich toll weiter geholfen... jetzt habe ich wenigstens mal Anhaltspunkte. Das mit dem VBA Editor hatte ich mir schon fast gedacht und habe es auch ausprobiert, aber damit muß ich mich noch ein wenig mehr auseinandersetzen.


@Johnson,

auch Dir für Deine ausführliche Antwort ein großes Dankeschön.

Das mit der Fehlerroutine, wäre nun bei mir völlig unter den Tisch gefallen. Habe eine Fehlerabfang drin "On Error Goto Ende", aber dann kein Resume mehr  :( ... Schaue ich mir nochmal an...  ;)

Gruß Sabine

Axel:
Gern geschehen.


Hier findest du noch mehr Infos zum Thema Fehlerbehandlung:

Best Practices: Error Handling in Lotus Script


Axel

Navigation

[0] Themen-Index

[*] Vorherige Sete