Hallo liebes Forum,
Ich habe ein Problem mit LotusSrcipt und hoffe, ihr könnt mir dabei helfen.
Wenn ich ein Dokument abspeichern möchte, wird vorher geprüft, ob es den Inhalt des Feldes schon gibt. Genauer: Ich habe eine Datenbank mit allen PCs im Unternehmen, wobei ein Feld das Feld Monitor ist. Hier wird eine Inventurnummer eingetragen, die entweder leer sein muß oder wenn etwas eingetragen wird, soll eine Prüfung erfolgen, ob es diese nur einmal gibt.
Hierbei stehe ich vor einem Problem:
Ich habe eine 2. Ansicht erstellt (versteckt), in der alle Monitor-Nummern aufgelistet sind.
Frage ich diese mit
If myArray(1, 1) <> uidoc.FieldGetText("Monitor") Then
Set view = db.GetView("By Monitor")
If uidoc.FieldGetText("Monitor") <> "" Then
Set vc = view.GetAllEntriesByKey(uidoc.FieldGetText("Monitor") , False)
If vc.Count = 0 Then
mo = 0
Else
mo = 1
End If
Else
mo = 0
End If
End If
ab, wobei mo ein Merker sein soll ob ein Fehler aufgetreten ist, also es diese Nummer schon einmal gibt (mo = 1), ist alles OK, ist mo = 0.
Ich habe es ausprobiert, und der vs.count steht auf 1, obwohl es diesen Eintrag definitiv in der 2. versteckten Ansicht By Monitor nicht gibt.
Vielen Dank für eure Hilfe,
woki