regexp matches

Utan att ha rört VBScript på något drygt decennium så måste jag väl ändå anta att det finns någon `split()`-funktion i språket — Microsoft TechNet verkar referera till en sådan här. Använd den med `@` som avgränsare.

Edit: Just vad ovanstående demonstrerar.

Är det excelsnurror hos elkonstruktion på G nu? Svårt att inte känna igen namnen

/Styrare

…och plötsligt hade du två problem, liksom ordspråket gör gällande. Alternativt: när du har en hammare så ser allting ut som en spik (fritt översatt). Alternativt kan man säga att du ådrog dig en släng av Perlsjukan .

		Set re = New RegExp
		With re
			.Pattern = "\s+"
			.Global = True
		End With
		
		str = Trim(re.Replace(str, " "))
		
		
		
		str2=""
		str2= Split(str, "@")
		Output ubound(str2)

Du får n + 1 element för n avgränsare med `Split()`, vilket är naturligt. Du har tre stycken `@` i din sträng, vilket alltså ger fyra element. Det sista fältet tolkas vara tomt för att det inte finns något efter den sista avgränsaren.

Glöm reguljära uttryck även här, vilket är som att jaga älg med raketgevär.

Enklast är väl att bara ignorera det sista elementet, om du vet hur många fält det ska vara.

Näst enklast är att plocka bort ett tecken från höger i insträngen innan behandling (som då antas vara ett `@` — man kan även kontrollera att så verkligen är fallet, men se hur denna lösning redan börjar bli krånglig). `RTrim()` kan i VBScript tyvärr inte ta ett argument för att rensa ett visst tecken vad jag kan se, utan arbetar bara på mellanslag, men det går att emulera genom exempelvis:

str = Left(str, Len(str) - 1)

Men: det känns ändå enklare att bara skippa sista fältet som returneras av `Split()` om det är möjligt utifrån hur övrig data ser ut. Alternativt skippa alla tomma fält, men det kan möjligen ge större problem framöver (fast jag vet som sagt inte exakt hur din situation ser ut).