Avatar billede Slettet bruger
10. juli 2004 - 13:36 Der er 7 kommentarer og
1 løsning

Strip HTML plus ekstra

Jeg har et script der Stripper teksten hvis den bliver for lang, her må den være 20 tegn fx.

<%
function stripHTML(html)
    if isNull(html) then
        stripHTML = ""
        exit function
    end if
    html = left(html, 20)
    html = replace(html, "<", "&#171;")
    stripHTML = replace(html, ">", "&#187;")
end function
%>

Jeg vil så have den til at hvis den stripper noget så skal den efter de 20 tegn sætte tre prikker ...
Hvordan får jeg den lige til det, nogen der kan hjælpe??
Avatar billede Slettet bruger
10. juli 2004 - 13:37 #1
Det skal lige siges at vhis den ikke stripper noget fra, skal de tre prikker selvfølgelig ikke indsættes.
Avatar billede roenving Novice
10. juli 2004 - 13:39 #2
Det'r da vbscipt, skal du have lavet det om til at det sker på klienten ?-)
Avatar billede ullesan Nybegynder
10. juli 2004 - 13:41 #3
ja, dertil laver du tjeck på hvor langt strengen er...

if len(html) > 20
  html = left(html, 20) + "..."
Avatar billede Slettet bruger
10. juli 2004 - 13:53 #4
og hvor gør jeg det i scriptet her eller der hvor jeg indsætter strip funktionen

<% Response.Write(stripHTML(rspriser("Navn")) %>
Avatar billede ullesan Nybegynder
10. juli 2004 - 13:58 #5
<%
function stripHTML(html)
    if isNull(html) then
        stripHTML = ""
        exit function
    end if

    if len(html) > 20    ' hvis den er over 20 tegn, så...
      html = left(html, 20) + "..."  ' cut det ned til 20 tegn + læg de 3 prikker til

    html = replace(html, "<", "&#171;")
    stripHTML = replace(html, ">", "&#187;")
end function
%>

så kan du kalde

<%= stripHTML(rspriser("Navn")) %>  ' "<%=" svarer til "<% Response.Write"
Avatar billede Slettet bruger
10. juli 2004 - 14:42 #6
Jep nu har jeg fået det til at virke, tak for hjælpen, det endelige blev sådan:

<%
function stripHTML(html)
    if isNull(html) then
        stripHTML = ""
        exit function
    end if

    if len(html) > 20 then
    html = left(html, 20) + "..."
    end if

    html = replace(html, "<", "&#171;")
    stripHTML = replace(html, ">", "&#187;")
end function
%>
Avatar billede Slettet bruger
10. juli 2004 - 14:42 #7
Så kom med et svar ullesan, så får du point
Avatar billede ullesan Nybegynder
10. juli 2004 - 14:44 #8
rgr
Avatar billede Ny bruger Nybegynder

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.

Loading billede Opret Preview
Kategori
Vi tilbyder markedets bedste kurser inden for webudvikling

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester