Del op i ord..

At dele op er let i ASP, men der findes vist ingen ulovlige ord :-)

Nej det ved jeg godt, men jeg skal bruge et script der kan del en sætning op i ord.

Nåde med s = split("Hej med dig","=")
så skal den give mig

Hej
med
dig

hvad med split("Hej med dig", " ");
Det er det i php i hvert fald =)

Nej split er ikke php. Det er vb og asp..

Ej nu holder du, laver ikke andet end PHP....

Desuden (hvis du stadig ikke tror mig:) http://dk.php.net/manual/en/function.split.php

Højst sandsynligt er den det i mange sprog (de ligner jo hinanden en del)

=)

Jeg kan godt se, hvor du vil hen, men er det overhovedet nødvendigt for at checke ulovlige ord? Her er en funktion, der tager en hel streng, sammenligner den med en liste med forbudte ord, udskifter dem med *beeep*, hvis de findes, og returnerer den censurerede streng:


Function CleanMessage(strMess)
  Dim strTmp, arrBannedWords,Item
  strTmp = strMess
  arrBannedWords = Split("Microsoft;Bill;Gates;Windows",";")
  For Each Item In arrBannedWords
    strTmp = Replace(strTmp,Item,"*beeep*")
  Next
  CleanMessage = strTmp
End Function


Du bruger den sådan her:

  strTest = "Bill Gates præsenterede i dag den nye version af Microsoft Windows... osv."
  Response.Write CleanMessage(strTest)

Fx.

strStreng = "Hej med dig"
arrOrd = Split(strStreng, " ")
For i = 0 To UBound(arrOrd)
  strTxt = strTxt & arrOrd(i) & " "
Next

Response.Write(strTxt)

//>Rune

Du kan jo også bare lave en:

if inStr(string,"fuck") then
  Response.write "Du må ikke sige fuck i min børnechat"
end if

dragen >> Hvis det var php jeg søger ville jeg nok ikke skrive i asp vel !!!!
          Det gør ikke nåde man bruger den del af hjerne..

Thx 4 Poinz

//>Rune