Das Notes Forum
Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: maiko am 07.01.03 - 11:27:59
-
Hallo,
ich drehe gerade wieder etwas durch.
Was ich brauche ist einen Agenenten mit einer Schleife über alle $FILE Felder.
Falls die Attachments dann mit "STG" beginnen, dann raus damit.
Wobei diese beim debuggen garkein Value haben, daher hab ich die auf "" gecheckt. Wo dieser herkommen weiss ich selbst nicht, scheinen doppelte uploads zu sein.
Soweit bin ich, komme aber nicht weiter, da er mir immer nur das erste Attachment anzeigt.
Wie bekommen ich denn in der inneren Schleife die Werte des x-ten $FILE angezeigt ?
Kann mir da jemand helfen ?
MfG
Maiko
-------------------
Dim db As NotesDatabase
Dim doc As NotesDocument
Dim session As New NotesSession
Dim view As NotesView
Set db = session.CurrentDatabase
Set view = db.getView("stgsloeschen")
Set doc = view.GetFirstDocument
Forall i In doc.Items
If (i.name = "$FILE") Then
If doc.getItemValue("$File")(0) = "" Then
Msgbox ("FileName: ")
' HIer soll mal das Remove rein
End If
End If
End Forall
-
gehe ueber die EmbeddedObjects Eigenschaft der NotesDocument-Class !
Darueber eine schleife
in etwa so
Forall o In doc.EmbeddedObjects
if o.name="STR" then
'hier loeschen
end if
End Forall
gruss till
-
hallo,
sollte so funktionieren, danke soweit.
Maiko