Array. Indeholdes værdi > nr i array

Dim objMyArray : objMyArray = Array("1","2","3","5","6","8","10")
Dim strFindString : strFindString = "6"
Dim intFoundIndex : intFoundIndex = -1

if( InStr( "," & Join( objMyArray, "," ) & ",", "," & strFindString & "," ) > 0 ) Then
    For i = 0 To UBound( objMyArray ) step 1
        if( CStr( objMyArray( i ) ) = strFindString ) then
            intFoundIndex = i
            Exit For
        end if
    Next
    Response.Write( """" & strFindString & """ blev fundet ved index: " & intFoundIndex )
Else
    Response.Write( """" & strFindString & """ blev fundet ikke fundet" )
End if

/nute

Det var det jeg mente. Tak for det! Du kan bare lægge et svar.

fino ... svar

Det er ikke fordi, jeg ikke ønsker at give dig point, men når jeg trykker på knappen, får du dem ikke......mystisk.....jeg har forsøgt gentagne gange, siden du svarede, men lige lidt hjælper det. Jeg prøver igen om noget tid :(

jeg har fået dem :-)

takker ...

/nute