hi, hab mal wieder �n kleines problem...
text = Request.Form("GBautortext")
TextSplit = Split(text, " ")
myrec.source="SELECT * from BadWords"
myrec.open
do while not myrec.eof
for i=0 to UBound(TextSplit)
if LCase(Trim(TextSplit(i))) = LCase(myrec("BWname")) THEN
Laenge = Len(TextSplit(i))
TextSplit(i) = String(aenge, "*")
end if
next
myrec.movenext
loop
das nimmt er nicht wirklich... naja, brauch auch 2 �berpr�fungen *g*
einmal nach einem " " und einmal nach einem zeilenumbruch (Chr(10))
wie l�s ich das am besten?
gru�,
Rene
-------
www.fastrun.at
Oesterreichs Suchmaschine
Wussten Sie, dass Sie die FastRun Web-E-Mail
Oberflaeche auch fuer Ihre Seite oder Ihre
Domain ab EUR 90,- pro Jahr mieten koennen ?
Anfragen bitte an [EMAIL PROTECTED]
| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
