True : False

Titler = Split("Formand,Næstformand,Personale,Supplant,Alm. medlem,Sekretær", ",")

Nææ... prøv lige følgende:


a = "Findes  i mit array"
b = "Findes IKKE! i mit array"

TempString = "ARGHhhh!!"
Titler = Split("Formand,Næstformand,Personale,Supplant,Alm. medlem,Sekretær", ",")

TempStatus = False

Function TjekTitel()
For t = 0 To ubound(Titler)

If TempString <> Titler(t) Then
TempStatus = True
End If
  Next

If TempStatus = False Then
TempString = b
Else TempString = a
End IF
 
Response.Write TempString
End Function


Så vidt jeg kan se, tildeler du TempString forskellige værdier hele tiden.

Hmmm...... Desværre det virker heller ikke... Det retunere stadig a

Sådan ville jeg selv lave det:




Titler = "Formand,Næstformand,Personale,Supplant,Alm. medlem,Sekretær"

Function TjekTitel(TempString)
  If InStr(LCase(Titler), LCase(TempString)) Then
      TjekTitel = "Findes  i mit array"
  Else
      TjekTitel = "Findes IKKE! i mit array"
  End If
End Function



Response.Write TjekTitel("ARGHhhh!!")

Du overskriver også dine variable et par gange og enda bruger den samme variable til to forskellige formål. Her tænker jeg på TempString som bruges til at afgøre om indholdet at vaiablen TempString er i arrayet....

Så har du et forkert tjek i en if sætning du sætter "Findes i mit array" hvis TempSting er forskellig fra det som er i arrayet:

  If TempString <> Titler(t) Then

Det skal være = sådan her:

  If TempString = Titler(t) Then

Så prøv me dette kode:

<%
a = "Findes  i mit array"
b = "Findes IKKE! i mit array"

TempString = "ARGHhhh!!"
Titler = Array("Formand", "Næstformand", "Personale", "Supplant", "Alm. medlem", "Sekretær")

fundet = False

Function TjekTitel()

  For t = 0 To ubound(Titler)
    If TempString = Titler(t) Then
      fundet = True
    End If
  Next

If fundet = False Then
  TempString = b
Else
  TempString = a
End IF
 
Response.Write TempString
End Function

call TjekTitel
%>

enig med eagleeye :-)

Thx Boyz
Begge funktioner virker .... Jeg må se at få noget mere søvn om natten ;)