Das Notes Forum
Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: Gerardo50 am 06.10.05 - 11:18:18
-
Hallo Leute,
wieder einmal die Bitte um Eure Hilfe :P
Ich habe einen Script Agenten der die Anzahl der Dokumente in einer Datenbank überwachen soll, basierend auf die Std. Mailbox.
Dieser Agent läuft in einer Test Datenbank (erstellt leer ohne Template) wunderbar rund um die Uhr ohne jemals stehenzubleiben. (periodisch, mehrmals am Tag, beliebiger Server).
Kopiere ich nun diesen Agent in meine Produktivdatenbank läuft er wunderbar, aber kurz vor Mitternacht bleibt er stehen und ich muß ihn am nächsten Morgen manuell neu starten!?? ???
Der Designtask kann es nicht sein, der mir da dazwischenfunkt, ich hab die Verbindung zum Template rausgenommen.
Jemand eine Idee wo dieses seltsame Verhalten herkommt? Ich bin mittlerweile echt ratlos.
Dank Euch im voraus und lieben Gruß,
Gerhard
-
Wie sieht es mit den Servereinstellungen für Agenten aus? ist da eine Beschränkung eingestellt (z.B. dass zu bestimmten Uhrzeiten die Laufzeit eingeschränkt ist)?
-
Was meinst Du mit mailbox ? Läuft der Agent in der mail.box ? Der Router-Task räumt standardmäßig nachts auf in der Box, dann dürften auch die Agents gestoppt werden.
-
Hallo,
dank Euch für die schnelle Antwort.
Also ganz konkret, es geht um die Exchange.box, eine mailbox die erstellt werden muß um den Lotus Notes Exchange connector zu installieren. Diese Exchange.box muß auf Basis des Std Mails erstellt werden.
Das Problem war bis jetzt immer wieder dass dieser Bridgehead Server auf der Microsoft Seite plötzlich abschmiert, und dann haben sich natürlich rasend schnell emails in dieser Datenbank angesammelt. Ich habe nun versucht einen Agenten zu schreiben der mich warnt sobald da mehr als 50 emails auf den Transport Richtung Exchange Server warten.
Wenn jetzt der Router task da mitmischt, was kann ich denn dagegen tun um den Agenten weiterlaufen zu lassen?
Lieben Dank im voraus ;)
Gerhard
-
Von einer anderen Datenbank aus (gleicher Server - da R5) die Anzahl der Mails checken lassen. Auf der anderen Datenbank macht der Router ja nichts...
-
..ach ja klar... aber zu meiner Schande muß ich gestehen dass meine Script Kenntnisse nur sehr rudimentär vorhanden sind :-[
...warum funktioniert also der folgende Code nicht um von einer anderen Datenbank aus die view "Mail" der Exchange.box zu öffnen ???
Dim db As NotesDatabase
Dim db1 As New NotesDatabase( "", "" )
Dim view As NotesView
Dim col As notesdocumentcollection
Dim doc As notesdocument
Dim vc As NotesViewEntryCollection
Dim session As New NotesSession
Dim anz As Integer ' # of docs in view
Set db1 = New NotesDatabase( "", "Exchange.box" )
Call db1.Open( "", "" )
Set db = session.CurrentDatabase
Set view = db1.GetView("Mail") ' get view from Exchange.box
bei der letzten Zeile steigt der Agent mit einer Fehlermeldung aus (Database Exchange.box has not been opened yet)
Sorry für mein Unwissen, ich gelobe zu üben....
Gerhard
-
Schau Dir im Debugger mal an, ob db1 gefunden wurde. An sich sieht das Script sauber aus.
Von wo startest Du das Script: Wenn Du es vom Client startest musst Du natürlich den Server angeben - sonst sucht er lokal nach exchange.box.
-
:) Danke, das war´s :)
Für alle die es mal brauchen können hier also das Script:
Dim db As NotesDatabase
Dim db1 As New NotesDatabase( "", "" )
Dim view As NotesView
Dim col As notesdocumentcollection
Dim doc As notesdocument
Dim vc As NotesViewEntryCollection
Dim session As New NotesSession
Dim anz As Integer ' # of docs in view
Set db1 = New NotesDatabase( "Graz1/AT/UCB", "Exchange.box" )
Set db = session.CurrentDatabase
Dim LogObj As New NotesLog("Report record")
Call LogObj.OpenNotesLog( db.server, "Exch-Log.nsf" ) ' open log file
Set view = db1.GetView("Mail") ' get view from Exchange.box
Set vc = view.AllEntries ' all documents in view
anz=vc.count ' count documents in view
If (anz > 49 And anz < 55) Then
Dim mail As NotesDocument
Set mail = New NotesDocument( db )
.......
Nochmals lieben Dank für die prompte Unterstützung und einen schönen Tag! :D
Gerhard
-
Im Querysave ein uidoc.gototop und ein uidoc.gotobottom einfügen - dann springt er vor dem Speichern auf jeden Fall aus dem Feld.