Sammenligne to kommasep. tekststrenge

maaske kan noget i denne stil goere det du vil:

function erTilmeldt(nr)
  PersonTilmeldt = "1,44,X"
  ptArray = split(PersonTilmeldt, ",")
  for i = lbound(ptArray) to ubound(ptArray)
    if ptArray(i) = nr then
        return true
  next
  return false
end function

Tilmeldt = "1,23,44,46,X"
tArray = split(Tilmeldt, ",")
for i = lbound(tArray) to ubound(tArray) 
  if erTilmeldt(tArray(i))
      Response.write "Person: " & tArray(i) & " er tilmeldt"
next

det udskriver numrene paa alle de personer, i tilmeldt som ogsaa eksisterer i persontilmeldt.

jeg har ikke testet scriptet selv, saa der kan vaere smaafejl...

Der er en "smaafejl" som reslutere i at det ikke virker - og jeg kan ikke finde den :-(

sorry, jeg fandt et par fejl, men er ikke helt faerdig med debuggingen. Jeg bliver noedt til at smutte nu i et par timer, men her er de foreloebige rettelser:
<%
function erTilmeldt(nr)
  erTilmeldt = false
  PersonTilmeldt = "1,44,X"
  ptArray = split(PersonTilmeldt, ",")
  for i = lbound(ptArray) to ubound(ptArray)
    if ptArray(i) = nr then
        erTilmeldt = true
    end if
  next
end function

Tilmeldt = "1,23,44,46,X"
tArray = split(Tilmeldt, ",")
for i = lbound(tArray) to ubound(tArray) 
  if erTilmeldt(tArray(i)) then
      Response.write "Person: " & tArray(i) & " er tilmeldt"
  end if
next
%>

Takker for hjælpen - Som det kom til at se ud...

<%
function erTilmeldt(nr)
  erTilmeldt = false
  PersonTilmeldt = "1,3,22,34,44,X"
  ptArray = split(PersonTilmeldt, ",")
  for a = lbound(ptArray) to ubound(ptArray)
    if ptArray(a) = nr then erTilmeldt = true
  next

end function

Tilmeldt = "1,34"
  tArray = split(Tilmeldt, ",")
  for i = lbound(tArray) to ubound(tArray) 
  if erTilmeldt(tArray(i)) then Response.write "Person: " & tArray(i) & " er tilmeldt"
next
%>

godt nok, og tak for point :-)

/David