Domino 9 und frühere Versionen > Entwicklung

Backend Agent lauft nicht scheduled

<< < (4/4)

TMC:
Danke für Eure Antworten.

DB ist auf'm selben Server.


--- Zitat ---Ersetze das mal durch
if session.IsOnServer then
Dim arcdb As New NotesDatabase("" , "IchBinEinDir/IchBinDieDB.nsf")
else
Dim arcdb As New NotesDatabase("IchBinServer" , "IchBinEinDir/IchBinDieDB.nsf")
end if

--- Ende Zitat ---
Theoretisch wäre das i.O., praktisch lässt sich dann aber der Agent nicht speichern, weil Notes mault, dass 2 mal Dim arcdb vorkommt.

Hätte jetzt auch noch arcdb2 etc. einbauen können, war mir aber zu umständlich.

Die Lösung ist aber:
Dim arcdb As New NotesDatabase ("" , "IchBinEinDir/IchBinDieDB.nsf")

Nun läuft der Agent sauber  :)

Grüße,
TMC

Semeaphoros:
Nana, das mit dem Maulen ist zwar unschön (und zeigt, dass der Compiler nicht besonders weit übern Tellerrand rausschaut), lässt sich aber sehr einfach beheben:


--- Code: ---Dim arcdb As New NotesDatabase
if session.IsOnServer then
  Set arcdb = New NotesDatabase("" , "IchBinEinDir/IchBinDieDB.nsf")
else
  Set arcdb = New NotesDatabase("IchBinServer" , "IchBinEinDir/IchBinDieDB.nsf")
end if

--- Ende Code ---


... und so ganz nebenbei auch wenns hier nicht zutrifft, Zugriff auf einen anderen Server geht in R5 tatsächlich nicht, dazu braucht es das Notes-Domino Sixpack

Glombi:
Notes ist manchmal eigenartig.
Bei new NotesDatabase muss man als Server "" eingeben,
bei GetDatabase darf es dann auch der "richtige" Server sein.

Aber egal, schön dass es geht.
Und der Notesträger war mal wieder schneller, sonst hätte ich meinen Fauxpax auch ausbügeln können  ;)

Andreas

Semeaphoros:
 :)

TMC:
danke für die Hinweise.
Werde sicherheitshalber noch die if-Abfrage einbauen...

cu,
TMC

Navigation

[0] Themen-Index

[*] Vorherige Sete