@Contains in Lotus Script

[Hedwig14]

Hallo zusammen,

Wie kann ich diese Formel in LS anwenden ?


FIELD tmp := ZDP_Ablage_Bezugsfeld;
no_special_char:="<":">":"@":"€":"§":"%":"=":"#":"?":"{":"}":"[":"]";
@If(@Contains(tmp ; no_special_char);
    @Failure("Das Feld 'Bezugfeld' enthält aktuell nicht zugelassene Sonderzeichen!");
@Success)

Vielenm

[eknori]

Cross Reference zu @Contains

https://www.ibm.com/support/knowledgecenter/en/SSVRGU_9.0.1/basic/LSAZ_INSTR_FUNCTION.html

[ronka]

z.B. kannst du einen ReplaceSubString in Lotusscript abbilden und deine String damit "kürzen", wenn der gekürzte version dann nicht gleich ist mit den Original version, dann waren diesen Zeichen drin, und kannst du die Fehlermeldung bringen. Nennen wir den funktion mal "Rauswerfen".

Wenn mann ein Einzelnes Zeichen findet steht in den Posting vom Eknori, wie mann ein einzelnes Zeichen ersetzt wäre dann etwa so:

left ( String , Position-1) + mid ( string, Pos + 1 , length (String) )

Wenn du das in einen Loop machst für alle zeichen, dann hast du dein "endergebnis", welches du dann einfach mit einen statement wie

if not ( String = rauswerfen ( String ) )  then Print Fehlermeldung

Kontrollieren kannst

[FrankLU]

Hallo!

In einem Feld, in dem eine Datei benannt werden muss, prüfe ich den eingegebenen Dateinamen immer so:

Code

If uiDoc.FieldGetText("DocZusatz") Like "*[/:\>*<?|,;]*" Then
	Messagebox"Feld 'Zusatz' bzw. 'neuer Dateiname' enthält ungültige(s) Zeichen.", 0+48, "Falsches Zeichen"
	Call uiDoc.GotoField("DocZusatz")
End If

Grüße
Frank