Backend Agenten testen

[RvM]

Wie kann ich einen Agenten tesetn, der nur auf dem Server läuft?
Ich habe hier einen Agenten, der im Backend auf dem Server ein Textfile erstellt.
Wenn ich aber im Desinger diesen Agenten starte, gibts eine Fehlermeldung, läuft er aber automatisch per "Zeitschaltuhr" funzt er ohne Probs.

[koehlerbv]

Was für eine Fehlermeldung ?

[RvM]

Der Agent sieht wie folgt aus:

Sub Initialize
   Dim session As New NotesSession
   Dim db As NotesDatabase
   Dim view As NotesView
   Dim doc As NotesDocument  
   Dim filenum As Integer
   Set db = session.CurrentDatabase
   Set view=session.CurrentDataBase.GetView("Sprueche")   
     'erstellt+überschreibt datei-->output
   filenum=Freefile()
   Open "\local\notesdata\provis\spruch.txt" For Output As filenum            'auch "C:\test\spruch.txt"
   Set doc = view.GetFirstDocument
   Print #filenum, doc.webspruch(0)+"</br>"
   Print #filenum,doc.verfasser(0)
   Close filenum
End Sub

Wenn ich ihn manuell starte, bekomme ich die Fehlermeldung:

Unable to open file

Aber wie gesagt, im Hintergrund läuft er richtig.

[koehlerbv]

Das Verzeichnis, in dem Du das File erstellen willst, muss bereits existieren - Verzeichnisse werden nicht automatisch angelegt.
Vielleicht ist es ja das schon ?

Bernhard

[RvM]

 
Nee, das Verzeichnis und auch das textfile existiert schon - das wars leider nicht

[koehlerbv]

Bei Dir lokal ? Und kannst Du dort mit anderen Mitteln schreibend zugreifen ?

[RvM]

Nee auf dem Server - nicht lokal.
Muss ich denn zum testen das ganze auch lokal anlegen? kann ic h das nicht nur auf dem Server testen?

[koehlerbv]

Du führst den Agent lokal aus, daher gelten auch diese File-Bezüge für Deine Box, nicht den Server.

Bernhard