Das Notes Forum

Domino 9 und frühere Versionen => Administration & Userprobleme => Thema gestartet von: klaussal am 23.09.03 - 10:11:12

Titel: prob bei agent
Beitrag von: klaussal am 23.09.03 - 10:11:12

moin zusammen,

wenn ich nachfolgenden agenten per hand starte, funzt er, läuft er auf dem server, tut er nix.
es handelt sich um die log.nsf

frage : WARUM ?

Sub Initialize
Dim db As notesdatabase
Dim dbshow As notesdatabase
Dim docNew As Notesdocument
Dim view As NotesView
Dim session As New notessession
Dim docdbshow As notesdocument
   
Set db = session.currentdatabase
Set dbshow = session.GetDatabase( "HERDS121", "log.nsf" )
Set view = dbshow.GetView( "Database\Sizes" )
Set docdbshow = view.getfirstdocument

Do Until docdbshow Is Nothing
If docdbshow.form(0) = "Activity" Then
   Set docNew = db.createDocument
   docNew.form = "m_db_reads"
   docNew.title = docdbshow.Pathname(0)
                docNew.number_of_reads = docdbshow.WeekReads(0)
   Call docNew.Save(True, True)         
End If

Machweiter:
Set docdbshow = view.getnextdocument(docdbshow)   
Loop
   
End Sub

Titel: Re:prob bei agent
Beitrag von: eknori am 23.09.03 - 10:20:29

würde vermuten er kommt mit dem

Set view = dbshow.GetView( "Database\Sizes" )

nicht klar. Linux Server ??

nimm mal den AliasNamen DataBaseSizes

Ulrich

Titel: Re:prob bei agent
Beitrag von: klaussal am 23.09.03 - 10:22:21

..danke,
das könnte es gewesen sein, hatte mir leider die ansicht nicht GENAU angesehn. asche auf mein haupt...   ;D

Titel: Re:prob bei agent
Beitrag von: klaussal am 23.09.03 - 13:39:34

... das war der fehler:
Set dbshow = session.GetDatabase( "MeinServer", "log.nsf" )

muss lauten:

Set dbshow = session.GetDatabase( "", "log.nsf" )  ;D