Vinzenz Mai: vbscript find im array

Beitrag lesen

Hallo

Ich suche in vbscript eine Möglichkeit einen String in einem Array zu finden und weiß nicht was ich falsch mache.

erster Versuch:

richtiger Ansatz, aber ...

vNom = "Z073"

Dim arrSuche, arrGefunden
string1 = "seppel"
arrSuche = Array("fritz","heinz","schorsch","seppel","franz")
arrGefunden = Filter(arrSuche, string1)

... Du überprüfst hier überhaupt nicht, ob die Suche erfolgreich war.
Wenn die Zeichenkette im Array nicht enthalten war, gibt Filter() ein leeres Array zurück.

Überprüfe zuerst, ob es Suchergebnisse gibt. Das heißt: prüfe die Anzahl der Elemente im Array arrGefunden.

If vNom = "Z073" And string1= arrGefunden(0) Then
    @include beispiel1.txt
Else
    @include beispiel2.txt
End If

Dies funktiniert leider nur, wenn in string1 ein Wert enthalten ist der auch im Array enthalten ist. Sonst Laufzeitfehler.

Logisch: Du greifst in diesem Fall auf ein nicht existierendes Arrayelement zu. Kein Wunder, dass es zu einem Laufzeitfehler kommt.

Freundliche Grüße

Vinzenz