Das Notes Forum
Domino 9 und frühere Versionen => ND8: Entwicklung => Thema gestartet von: Milamber am 12.11.10 - 14:30:22
-
Hallo zusammen, ich bin gerade am verzweifeln.
Mein code lief bis gestern. Heute habe ich etwas geändert und jetz läuft es nicht mehr.
Nun habe ich den Code auf ein minimum reduziert um den Fehler zu finden.
Das ganze wird aus dem web aufgerufen, über den event: WebQuerySave. Es wird ein Agent aufgerunfen der das offnen Dokument in eine andere DB kopieren soll.
Dim s As New NotesSession
Dim DBTarget As notesdatabase
Dim DocCurrent As NotesDocument
Dim DocNew As Notesdocument
Set DBTarget = s.GetDatabase("XXX" , "YYY" )
' If DBTarget.IsOpen Then Print "error" ERGENINS: Print kommt. also db wird geöffnet.
Set DocCurrent = s.DocumentContext
'If Not DocCurrent Is Nothing Then Print "error" ERGEBNIS: Print kommt, also wird doc gefunden
Set DocNew = DocCurrent.CopyToDatabase(DBTarget)
Print "error" 'ERGEBNIS: Kein print, kein Fehler, kein copiertes Document
Nachtrag:
Call DocCurrent.CopyToDatabase(DBTarget)
erschafft auch kein neues Dok in der DBTarget.
Jetzt erstmal WE. wünsch euch allen ein schönes :)
Grüße
Hristos
-
Bau Dir doch einen ErrorHandler ein - das sollte das erste sein, was in einer Routine an Code entsteht. Dieser wird dann vermutlich auf ein ungültiges oder nicht vorhandenes Dokument verweisen - da Dein Frontend-Dokument noch gar nicht gespeichert ist.
Bernhard
-
Dieser wird dann vermutlich auf ein ungültiges oder nicht vorhandenes Dokument verweisen
Bernhard
Danke für den Hinweis, 2 Zeilen angepasst und nun flutscht es :-)
Hristos