@Formula -> csv-Datei auslesen

Ich denke ohne LS wirst du nicht allzu weit kommen. Notes kann ja nur Structured Text, Tabbed Text und 123 Files von Hause aus verarbeiten und mit @Formeln hast Du keinen direkten Dateizugriff.....

Parsen...
Du könntest z.B. mit Split() den String aufteilen in ein Array und dann die einzelnen Elemente in die entsprechenden Felder speichern. (geht natürlich nur, wenn die Feldwerte keine Trennzeichen enthalten).
oder sieh mal unter
periodischer Agent

Hier ein Beispiel wie du mit LotusScript CSV-Files parsen kannst:

intAnzahl =0
impfile = "C:\test.csv"
intNum = Freefile()

Open impfile For Input As intNum

Do While Not Eof(intNum)
Line Input #intNum, strZeile
strOrder = Strtoken(strZeile, "|",1)
strStatus = Strtoken(strZeile, "|",2)
Print "Bestellung " & strOrder & " Status: " & strStatus
Loop

Meine CSV ist wie folgt aufgebaut:
13245|2
45678|4

lg,
ayhan

Super! Freut mich.

lg,
ghostxxl

Sicher:

Dim ws As New NotesUIWorkspace

v_ReturnValue = ws.OpenFileDialog(False, "Wählen Sie eine CSV-Datei aus", "CSV Files|*.CSV", "C:\")
If Not Isarray(v_ReturnValue) Then Exit Sub
'If v_ReturnValue(0) = "" Then Exit Sub
fileName = v_ReturnValue(0)

Au ja:
Da hier die Frontend-Klasse (NotesUIWorkspace) verwendet wird, ist auch klar, dass der Agent nicht periodisch laufen kann. Muss also manuell ausgeführt werden - nur so zur Info...

lg,
ghostxxl

Einfacher als du denkst,
es wird nur überprüft, ob der Benutzer in diesem Dialog auch eine CSV-Datei ausgewählt hat (er könnte ja auch nur auf abbrechen gehen und dann würde das - wenn es nicht abgefangen wird - zu fehlern in deinem code führen).

Einfache Erklärung ohne kompliziert zu werden:
"If Not Isarray(v_ReturnValue) Then Exit Sub"
Da v_ReturnValue vom Typ Constant definiert wird und eigentlich nur den kompletten Pfad der CSV zurückgeben soll, wird überprüft, ob die Variable belegt ist. Wenn nein, soll die Ausführung des Codes abgebrochen "Exit Sub" werden.

"fileName = v_ReturnValue(0)"
Wenn die Variable nicht leer ist, wird die Variable fileName mit der Variable v_ReturnValue (1. Element des Arrays v_ReturnValue --> v_ReturnValue(0)) belegt.

Es ist die einfachste Erklärung, hoffe das hilft dir.

lg,
ghostxxl

Hy,

ftsearch dauert doch immer so lang. Ich würde folgendes machen:

1. Erstelle eine Ansicht. Die erste Spalte sollte kategorisiert sein. Der Wert für diese Spalte sollte die Kundennummer beinhalten. Zeige in der Ansicht alle Dokumente an, die du später über deinen Script auch bearbeiten möchtest.

2. In deinem Script gehst du dann wie folgt vor:
Dim coll As NotesDocumentCollection
Dim view As NotesView

Set view = db.GetView("deineansicht")
Set coll = view.GetAllDocumentsByKey("12345", True) 'alle Dokumente mit dieser Kundennummer in coll holen

If coll.Count > 0 Then
Set doc = coll.GetFirstDocument
For i = 0 To (coll.Count - 1)
<aktion>
Set doc = coll.GetNextDocument(doc)
End Forall
End If

usw.

Das geht dann viel viel schneller und auch einfacher zum Programmieren. Hoffe, das hilft dir.

P.S. Den Code habe ich hier einfach runtergeschreiben. Evtl. sind rechtschreibfehler drin bzw. nicht alle variablen initialisiert..

lg,
ghostxxl

Um gottes willen schreib diese routine um von GetNthDocument auf einen GetFirstDocument & GetNextDocument kombination, der GetNthDocument ist der umproduktivste aufruf die mann sich nur vorstellen kann. Der macht folgendes, JEDESMAL.. greif das erste dokument in der Kollection, und zähle solange durch den einzelne dokumente bis du beim Nth angekommen bist. KEIN SCHERZ.
Diese routine ist schon messbar langsamer wenn der collection 10 Dokumente beinhaltet, auf dem moment würde den GetFirt/Next 55 dokumente in den gleichen zeit verarbeiten. Bei 50 Dokumente schon über 1200 mit First/Next

Entweder du entfernst unnötige Leerzeichen bereits vor dem Export (ist vielleicht einfacher) oder eben erst nach dem Einlesen. Da es sich hier um binäres Lesen von Daten handelt werden immer alle Leerzeichen mitgelesen und du mußt die Behandlung selbst durchführen, also innerhalb der Variablen.