Das Notes Forum

Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: shiraz am 31.03.04 - 10:03:02

Titel: Compare ???
Beitrag von: shiraz am 31.03.04 - 10:03:02

Hi Leute,
warum "Ucase(Assi) = Ucase(ListMember)" in mein script funkt net?

......

   Set db =Session.CurrentDataBase
   
   Set profildoc = db.GetProfileDocument("Vorgaben")
   For k = 0 To Ubound(profildoc.P_Secretary)
      Set View = db.GetView("Wiedervorlage")   
      Set doc = view.GetFirstDocument
      Assi = doc.P_Secretary(0)
      ListMember = profildoc.P_Secretary(k)
      While Not Doc Is Nothing
         If Ucase(Assi) = Ucase(ListMember) Then
            
            Set item = doc.GetFirstItem( "Wvtermin_Date" )
            .....
......

profildoc.P_Secretary ist ein Feld mit mehrere Einträge
doc.P_Secretary ist ein feld mit 1 Eintrag


dnake

Titel: Re:Compare ???
Beitrag von: koehlerbv am 31.03.04 - 10:13:14

Ein paar mehr Erläuterungen wären gar nicht so schlecht ... Fehlermeldung ?

Der Code hat ein paar logische Ungereimheiten:
view wird in der Schleife instantiiert. Das ist unnötig.
Nach zwei Bezügen auf doc wird gefragt, ob doc eventuell Nothing ist - zu dem Zeitpunkt ist aber der Krieg längst vorbei !

Bernhard

Titel: Re:Compare ???
Beitrag von: Glombi am 31.03.04 - 10:18:25

Was steht denn so in den Feldern drin? Common Name, Abbreviated oder Canonicalized?
Was sagt der Debugger?

Titel: Re:Compare ???
Beitrag von: shiraz am 31.03.04 - 10:40:01

hi,
die Felder sind vom Typ Text und Textliste

debuger gibt keine Fehlermeldung zurück!
Die beide werte sehen identisch aus ("STRING") aber das Ergebnis ist false.

Ich will per agnet alle wiedervorlagen von versch. Personen finden, und per Person (nur) ein Mail mit alle Wiedervorlagen senden.

Alle Personen findet man in der Vorlage!
Pro Dokument gibt es nur ein Bearbeiter!