Das Notes Forum

Domino 9 und frühere Versionen => Administration & Userprobleme => Thema gestartet von: Myron am 19.11.02 - 10:03:44

Titel: Received Feld ansprechen
Beitrag von: Myron am 19.11.02 - 10:03:44
Hallo!

Eine Frage.. wenn ein Mail ankommt, sind im Dokument mehrere Received Felder vorhanden. Nun, wie kann ich jetzt mit dem Script jedes einzelne Feld ansprechen und mir die Informationen rausholen?
Mit GetItemValue(0) bekomme ich nur eines auch wenn ich es mit Set item = doc.GetFirstItem( "Received" ) Forall v In item.Values ... mache bekomme ich nur eines! .. hmm was gibts da noch??
Hat jemand eine Idee??

Grüße
Titel: Re:Received Feld ansprechen
Beitrag von: Lossa am 19.11.02 - 22:08:19
Hallo,
versuch es mal so:

Forall item In doc.Items
     If item.Name = "Received" Then
          ' Hier passiert etwas mit dem Item
     End If
End Forall

Dann erhälst du alle Items die 'Received' heissen.
Titel: Re:Received Feld ansprechen
Beitrag von: wflamme am 19.11.02 - 23:48:57
Forall item In doc.Items
     If item.Name = "Received" Then
          ' Hier passiert etwas mit dem Item
     End If
End Forall

Dann erhälst du alle Items die 'Received' heissen.

Nee, stimmt leider nicht für items vom Typ RFC822 Text...
Du must das gerade gelesene Item löschen und dann das nächste lesen AFAIR.
Titel: Re:Received Feld ansprechen
Beitrag von: Myron am 20.11.02 - 09:06:36
Hallo!

Danke für dir Tips!
Ich werde das mal ausprobieren... wenn ich das Item gelesen habe, kann ich ja den text in ein neues umkopieren!?

Soo.. gemacht! Aber wenn ich das Item lösche und das nächst lesen will, ist es leer oder ich bekomme einen Fehler weil es das Item nicht mehr gibt.. hmmm

Grüße
  Mack
Titel: Re:Received Feld ansprechen
Beitrag von: wflamme am 20.11.02 - 10:45:46
HTH (s.Anlage)
Titel: Re:Received Feld ansprechen
Beitrag von: Myron am 20.11.02 - 14:58:16
Hi!

Danke für den Agent..
Muss mich mal orientieren,, mit Java hatte ich bis jetzt noch nichts zu tun.. ist aber interessant wie das funktioniert

Grüße
  Markus
Titel: Re:Received Feld ansprechen
Beitrag von: Myron am 20.11.02 - 15:37:19
Hallo!

Ja, so funktionierts

anz = 0
Set items = doc.GetFirstItem( "Received" )
While Not items Is Nothing
  anz = anz + 1
  Set itemsn = items.CopyItemToDocument( doc, "Received#" & Cstr (anz))
  Call items.Remove()
  Set items = doc.GetFirstItem( "Received" )
Wend
Call doc.Save(True, True)

Danke!
Grüße
  Markus