Db udtræk vis kun tekst

Hej Funstuff :)

Det er faktisk ikke så svært endda..

Placer denne funktion, hvor du har lyst, eksempelvis efter body.

<%
Function ReplaceTest(tekst,patrn, replStr)
  Dim regEx, str1
  Set regEx = New RegExp
  regEx.Pattern = patrn
  regEx.global = true
  regEx.IgnoreCase = True
  ReplaceTest = regEx.Replace(tekst, replStr)
End Function
%>

Når du udskriver dine variabler fra din database skal du bare bruge følgende:

<%
strTekst = Record("dintabel")
udenHTML = ReplaceTest(strTekst,"(<[^><]*>)"," ")
response.write udenHTML
%>

God 1. jule aften :)

får denne fejl:

Microsoft VBScript compilation error '800a03ea'

Syntax error

/nyheder.asp, line 49

Function ReplaceTest(tekst, patrn, replStr)
^


Men er der ikke en nemmere måde? Mener jeg har brugt en anden måde en gang før hvor den bare soteret alt html fra. Men kan bare ikk finde den kode.

God 1 juledag til dig også :o)

Du får højest sandsynlig den fejl fordi du har placeret din funktion med anden kode.. Prøv eksempelvis at at placere den som sagt lige efter body tagget.

Og jeg vil mene, at det er den absolut bedste metode til fjerning af html tags :)

Øhh... Burde ikke have noget med det at gøre.
Men nu vil HTML-kode jo sådan set aldrig blive vist?!

Hmm nu virker det.. lækkert nok.. Tak for det.

Er det svært og lave det sådan at noget html godt må vises? fx <b> ??

Hej Funstuff!

Ja det er det. Funktionen fjerner alt html. I modsatte tilfælde skulle du fjerne hver enkelt tag (der er mange) i en funktion, men i denne undlade b i u osv. Men da jeg ikke har lavet funktionen kan jeg ikke hjælpe desværre.. :)

Oki. men tak for hjælpen.

Æhm... Der er faktisk en let måde at gøre det på...
Du kan skrive at dine brugere skal bruge [b]-tags i stedet for og så bare replace dem...