Exportiertes DatenbankScript wird nicht ausgeführt

[DatenDuck]

Hallo Forum,

kennt jemand das Problem, dass das DatenbankScript nicht ausgeführt wird, wenn es exportiert und per %INCLUDE "bla.lss" eingebunden ist?
Bei mir ist das leider der Fall...
Sobald ich den Quellcode wieder importiere, wird er auch wieder ausgeführt..
Hat jemand hierzu Tipps?

Vielen Dank!

[DatenDuck]

Hierzu habe ich inzwischen weiteres herausgefunden.

In der LSS Datei habe ich im PostOpen folgendes hinzugefügt:
Dim uiws As New NotesUIWorkspace
Set Source = uiws.CurrentDatabase

Das hat leider nichts verändert.. PostOpen wird nicht ausgeführt
Dann habe ich im Initialize folgendes eingebaut (also eigentlich direkt in der LSS)

Sub Initialize
Dim uiws As New NotesUIWorkspace
Dim Source As NotesUIDatabase
Set Source = uiws.CurrentDatabase
   Call PostOpen(Source)
End Sub

"Source" war im Initialize nothing (könnt ich noch verstehen, weil die DB ja noch nicht im UI ist oder?!), aber immerhin hat er "Call PostOpen(Source)" ausgeführt.
Da im PostOpen Source ja noch mal gesetzt werden sollte, sollte das ja eigentlich glattgehen.
Leider war aber auch im PostOpen Source immer noch leer (es kommt aber immerhin eine "Variable not set" Meldung)... Das verstehe ich nicht...

Wie schon erwähnt, treten keinerlei Probleme auf, wenn der Code importiert ist...

Hat hierzu wirklich niemand eine Idee?!

Vielen Dank schon mal!
-Moritz

[klaussal]

Aus der Hilfe:

%Include directives must be placed in the (Declarations) event for an object. Do not place %Include directives in the event containing the execution code.

[DatenDuck]

Hallo klauss,

übersetzt heisst das doch nur dass man %INCLUDE immer in (Declarations) anstatt in die Subs/Functions schreiben soll!?
Das habe ich (immer) so gemacht, da ich alle Objekte des DatabaseScript in eine LSS exportiert habe.

Ich habe aber inzwischen einen Umweg gefunden lol

Initialize sieht nun so aus:

Sub Initialize
Dim uiws As New NotesUIWorkspace
Dim Source As NotesUIDatabase
Set Source = uiws.CurrentDatabase
   Call PostOpen(Source)
End Sub
Source ist leer, macht aber nix.. Immerhin wird so PostOpen angeschmissen

Im PostOpen muss ich auf die DB zugreiffen, nur setze ich sie nicht mit "Source.Database" sondern jetzt mit "Set db = uiws.CurrentDocument.Document.ParentDatabase"...

Das funktioniert aus irgend einem Grund...

Bis dann,
-Moritz

[klaussal]

Das funktioniert aus irgend einem Grund...

Nicht nachdenken, sondern freu Dich, dass es geht.....