02. november 2001 - 13:32Der er
21 kommentarer og 1 løsning
Lille Reg.Exp.
Jeg skal have lavet en funktion der begrænser valget af fonte,fontfarver og fontstørrelse. Dvs lige meget hvilken size eller face der er valgt skal det laves om til: \"<font face=arial>tekst</font>
Det her er hvad jeg har lavet, men som ikke virker. Kan nogen rette funktionen til så den virker efter hensigten?
Function fontchanger(body,font) Dim regEx If body = \"\" Then Exit Function Set regEx = New RegExp regEx.Global = True regEx.IgnoreCase = True regEx.Pattern = server.HTMLEncode(font) fontchanger = regEx.Replace(body, \"<font face=arial\") End Function
Hmm jeg ahr nu haft den til at viker så mund ikke vi kan sige den ikke virker til dit formål. Har jeg forståret det rigtig at du vil lave <font size=... face=... > om til <font face=\"arial\"> ?
sterng = \"Hej <font size=\"8\">er det her stort</font> eller areal?\"
Den skal virke sådan at uanset hvad der står mellem <font.... or > så skal det laves om til fx: <font face=\"arial\" size=\"8\">. Det skal bruges til at begrænse brugerens muligheder for at vælge farver og størrelser fx i artikler.
Når jeg laver en response.write på : objRegPath.Pattern, får jeg et 0 retur. Jeg kan ikke lige gennemskue hvorfor, men mon ikke det er her fejlen opstår?
Jo din funktion virker fint hvis jeg bruger den som du skriver. Desværre virker det ikke i den sammenhæng jeg bruger den. Hvis jeg fx copy paster en tabel med noget tekst fra word eller finder et eller andet på nettet og smider det ind i mit tekstfelt. Laver en request på indholdet, kører det gennem din funktion, smider det i en database og viser det igen, så er det som før. Jeg tror stadig det er i Pattern det går galt. Hvis jeg tar en view source, er fx mine < lavet om til &lgt. har du en ide til hvad jeg kan gøre. Det må efterhånden være 60 point værd hvis du kan hjælpe mig.
Juhuu, det ser ud til at virke. Der mangler blot at der godt kan være noget tekst inden fonttagget. Lige nu virker det kun hvis det står som det første på linien.
Sorry du har helt ret. Det virker som det skal. Problemet er et andet. Jeg har udvidet funktionen som nu også gerne skal fjerne span tags. Mit problem er bare at har jeg:
<font size> sdfsdf </font>
<span size> sfsd </span>
som input, er det kun enten span eller font tagget der bliver ændret, alt efter hvilken pattern der står først.
Function fontChange(strInput) Set objRegPath = New RegExp objRegPath.Global = true objRegPath.IgnoreCase = True
Tak for hjælpen. Jeg opretter et spørgsmål til med de ekstra point du skal have for din hjælp.
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
