Array mit Schwierigkeiten

[rafke]

Hallo erstmal!

Ich bin langsam am durchdrehen.Mein Problem ist ein Array

Ich belege ein array mit mehreren Werten und will im
nachhinein die einzelnen Werte des Arrays wieder auswerten

reDim Array(4)
Array(0) = Wert1
Array(1) = Wert2
Array(2) = Wert3
Array(3) = Wert3

for i = 0 to 4
if array(i) = "Wert2" then
response.write "treffer"
end if
next

soweit so gut - funktioniert auch alles prima wenn der gesuchte Wert
gleich der erste Wert im Array ist, sobald aber der Wert im Array
weiter hinten liegt ist Sense mit gute Laune. Und mir will einfach
nicht in den Kopf warum ??

[Axel Richter]

Hallo,

Ich bin langsam am durchdrehen.Mein Problem ist ein Array

Ich belege ein array mit mehreren Werten und will im
nachhinein die einzelnen Werte des Arrays wieder auswerten

reDim Array(4)

Array ist ein reserviertes Wort. Du kannstes nicht als Variablennamen verwenden.

Array(0) = Wert1

Was steht in der Variable Wert1? Oder willst Du den String "Wert1" übergeben? Dann sollest Du das auch tun.

Array(1) = Wert2
Array(2) = Wert3
Array(3) = Wert3

»»

for i = 0 to 4

Das Array hat die Länge 4. das heißt die Elemente [0..3].

if array(i) = "Wert2" then
response.write "treffer"
end if
next

Sub test()
 Dim Feld() As String

ReDim Feld(4)
 Feld(0) = "Wert1"
 Feld(1) = "Wert2"
 Feld(2) = "Wert3"
 Feld(3) = "Wert3"

For i = 0 To 4
  If Feld(i) = "Wert1" Then
   MsgBox ("treffer")
  End If
 Next
End Sub

*RTFM*

viele Grüße

Axel