Domino 9 und frühere Versionen > ND6: Entwicklung
Dokument suchen und Daten ändern
lotus blue:
Das ist der Inhalt meiner CSV-Datei:
54321;Test;Robert
1234;Mustermann;Anton
Das ist der Inhalt der Ansicht "Alle Dokumente" mit einer sortierten 1.Spalte
Nummer Name
1234 Test Robert
54321 Mustermann Anton
und das ist der Code der im Agenten ausgeführt wird:
Sub Initialize
Dim session As New notessession
Dim db As notesdatabase
Dim doc As notesdocument
Dim fileNum As Integer, cells As Integer, k As Long
Dim fileName As String
Dim InputStr As String, delimiter As String
Dim FieldArray As Variant
Dim view As NotesView
Set db = session.currentdatabase
Set view = db.GetView ("Alle Dokumente")
fileNum% = Freefile()
'Dateipfad
fileName$ = "C:\Archiv.csv"
'Trennzeichen
delimiter = ";"
Open fileName$ For Input As fileNum%
Line Input #1, InputStr$
Do While Not Eof(fileNum%)
'Zeile für Zeile einlesen
Line Input #1, InputStr$
FieldArray = Split(InputStr$,delimiter, -1, 0)
If Not Isempty(FieldArray) Then
Set doc = view.GetDocumentByKey(FieldArray(0))
If Not doc Is Nothing Then
Call doc.ReplaceItemValue("Status", "erledigt")
Call doc.Save(True,True)
Else
Messagebox"Test Nachrichtenbox",0,"Test"
End If
End If
Loop
Close fileNum%
End Sub
klaussal:
Ist das Feld in der 1. Spalte der View ein Text oder Zahlenfeld ?
tks:
Wenn Du im Debugger bist und die FieldArray(0) anschaust, ist das dann vom Typ Text oder Zahl?
Evtl. macht ja Notes da eine Zahl draus.
Dann müsstest du im doc.GetDocumentByKey mit Cstr(FieldArray(0)) arbeiten.
lotus blue:
Das Feld der ersten Spalte ist ein Textfeld
Also im Debugger: FieldArray0 ist ein String
Was mir grad aufgefallen ist und wohl der Knackpunkt m.E. ist, dass der Rückgabewert von Array0 so aussieht: ""54321"
FieldArray [""54321","Mustermann","Anton""]
FieldArray 0 ""54321"
FieldArray 1 "Mustermann"
FieldArray 2 "Anton""
tks:
Da hast Du wohl absolut Recht.
Die Suchabfrage lautet dann auf "54321, statt auf 54321.
So kann Notes nichts finden.
Navigation
[0] Themen-Index
[#] Nächste Seite
[*] Vorherige Sete
Zur normalen Ansicht wechseln