Domino 9 und frühere Versionen > ND6: Entwicklung

Variable mit einem Wert vergleichen

(1/3) > >>

Manolo:
Hallo Leute!!!!

Ich habe da ein kleine Lotusscript problem, wenn ich den Inhalt vom Feld "StrPartNr" mit dem string inhalt vergleiche macht er immer ein "End If"

Nun gibt es eine anderen weg ein feld mit dem stringinhalt zu vergleichen.

Nun ein muss ich noch sagen in dem string sind die Werte mit "$" getrennt.

Set db2 = New notesdatabase(db1.server,doc.DbName(IdxDb))
Set view2 = db2.GetView(doc.ViewNameKey(0))
Set doc2 = view2.GetFirstDocument
Set item = doc2.Item( "PMailingssearch" )
      
If item.Contains(StrPartNr) Then
Goto Addtabelle
End If

danke im voraus.
Manolo

Glombi:
Es muss so heissen:
Set item = doc2.GetFirstItem( "PMailingssearch" )


Was meinst Du mit "er macht ein End If" ?

Andreas

Semeaphoros:
Du scheinst eine Stringliste verwenden zu wollen? Das geht aber so nicht. Da musst Du die Werte in einen Array oder eine Liste geben und ich weiss jetzt nicht auswendig, ob notesitem.contains damit umgehen kann (dafür gibts aber die Designer-Hilfe :) )

und ... mit einem Goto aus einem If-Block herausspringen? Ich nehme mal an, dass der Compiler schlau genug ist, diesen Strukturfehler zu korrigieren und keine Reste auf dem Stack zurückzulassen.

Manolo:
Hi merci für die schnelle Antwort!!

Sorry war ein tipp fehler von mit
"Set item = doc2.GetFirstItem( "PMailingssearch" )"

Das heisst das wenn der String(Item) z.b:
"item=400$sdfgs$sdgf$sdgf$sdfg" und das Feld "StrPartNr=400"

dann gibt es false das heisst er macht das if fertig = "End If"

Auch wenn der wert 400 im string vorhanden ist sollte es doch true sein oder sehe ich das falsch?

Glombi:
Wenn das Feld keine Mehrfachwerte hat, kannst Du es so machen (das mit dem Goto lasse ich mal)

Set db2 = New notesdatabase(db1.server,doc.DbName(IdxDb))
Set view2 = db2.GetView(doc.ViewNameKey(0))
Set doc2 = view2.GetFirstDocument
     
if Instr(doc.PMailingssearch(0),StrPartNr) > 0 then
 Goto Addtabelle
End If

Besser wäre evtl:
if strleft(doc.PMailingssearch(0),"$") = StrPartNr then
 Goto Addtabelle
End If

Dann vergleicht er nur den Teil bis zum ersten "$".

Andreas

Navigation

[0] Themen-Index

[#] Nächste Seite