Das Notes Forum

Domino 9 und frühere Versionen => ND8: Entwicklung => Thema gestartet von: Hedwig14 am 07.12.11 - 09:28:27

Titel: Fulltrim
Beitrag von: Hedwig14 am 07.12.11 - 09:28:27

Hallo !
warum klappt mein Fulltrim-Script nicht ?

Feld im Dokument "MA_kundenbetreuendeOE" = Textfeld, Beispiel "142 00 01"
Wunschergebnis = "1420001"

Dim kbo As Variant
kbo = doc.MA_kundenbetreuendeOE(0)
doc.MA_ISP_OE = Fulltrim(kbo)

Kann mir jemand helfen ?

Titel: Re: Fulltrim
Beitrag von: ghostmw am 07.12.11 - 09:36:36

Hi Hedwig14,

FullTrim entfernt doppelte, führende und abschließende Leerzeichen in Strings und noch einiges mehr in Arrays, das kannst du auch in der Hilfe nachlesen.

Zitat

Given an array, eliminates "empty" entries and eliminates duplicate, trailing and leading whitespace within entries; and given a string, eliminates duplicate, trailing and leading whitespace in the string.

Das was du machen möchtest, ist das komplette Entfernen von Leerzeichen.

Das kannst machen, indem du den String in ein Array verwandelst (mit Leerzeichen als Trenner).
Danach kommt der Fulltrim zum Einsatz, der entfernt auch leere Array-Einträge.
Erst danach wieder zurück in einen String wandeln , mit einen Leerstring ("") as Trenner.

Und fertig ... die Befehle kannst du dir aus der Hilfe holen.

Das ist nur ein Ansatz, wie man das machen kann, man könnte auch ein Ersetzen in Script benutzen um die Leerzeichen loszuwerden.

Grüße
Marco W.

Titel: Re: Fulltrim
Beitrag von: tower am 07.12.11 - 09:52:19

Ganz einfach:

text = Replace(text, " ", "")

Titel: Re: Fulltrim
Beitrag von: Hedwig14 am 07.12.11 - 10:02:04

Hallo !
viele Wege führen nach Rom !
Vielen Dank für die Idee mit dem Replace !