TXT Export via Agent

[manu2003]

  :)Hallo Leute

So ich habe mal so eine kleine sache, ich habe eine Form wo die dokumente reingeschrieben werden, und da drin hat es ein Datum wenn es erstellt wir.
Dann habe ich eine View die die alle dokumente nach datum sortiert hat und das neueste  als erste.

Nun ich möchte gerne ein Agent schreiben der in diese view geht und dann das erste Dokument nimmt und das Datum merkt und das ganze in ein TXT schreibt und das auf dem server in einem Verzeichnis schreibt.

nun habe ich leider keine ahnung wie ich das machen soll, hat irgend jemand eine ahnung wie man das anstellen könnete.

gruss manu

[Gandhi]

Warum ein Agent? Du kannst doch auch Dokumente aus dem Menü heraus nach txt exportieren.
Wenn Du aber doch einen Grund hast:
Mit Lotus Script kann man das recht einfach realisieren - und in der Designer Hilfe steht auch sehr ausführlich, wie das geht.
Wenn das File auf dem Server liegen soll muss der Agent dann aber entweder auf dem Backend laufen (dann brauchst Du die entsprechenden Rechte auf dem Server - werden im Serverdokument eingetragen) oder Du hast das Laufwerk als share gemappt.

[manu2003]

Hallo

ich brauche ein Agent, wieso==> die user generieren die dokumente und habe somit keine rechte auf dem server, aber ich habe in der hilfe nachgeschaut und nicht gefunden wo so was macht, wenn du mir helfen könntest wäre das super.

den ich weiss auch nicht weiter

gruss manu

[Gandhi]

Das steht nicht in der normalen Hilfe, sondern in der Designer Hilfe.

[eknori]

guckst du

http://eknori.dyndns.org/knowledge/devidea.nsf/Alpha/A0BBD3E337532765802568810028F27F?OpenDocument

[manu2003]

Danke dir viel mal es ist mega, aber jetzt kommt das aber.

wenn ich jetzt aber auf ein date zugreiffen will und das auslesen will?

[eknori]

Frisch aus der designer hilfe

  1.   This script prints a message about the Subject item in a document.
Dim doc As NotesDocument
'...set value of doc...
Dim item As NotesItem
Set item = doc.GetFirstItem( "Subject" )
If ( item Is Nothing ) Then
  Messagebox( "No Subject item on the document." )
Else
  Messagebox(  _
  "The Subject item on the document has the value: " _
  + item.Text )
End If