Slette headings?

-- du har da paranteser i overskud, når du ikke skal replace dele af det, men ikke at det burde betyde nogen forskel ...

-- men jeg ville bruge sådan en, hvis jeg skulle gøre det (men jeg bruger ikke vbscript, så der kan være nogle små-detaljer, som er anderledes !-)

"<h[1-7].+?<\/h[1-7]>"

Umiddelbart skal du vel erstatte
  \/
med
  /

Kan den lave problemer med regExps i vbscript, erik ?-)

Argh, selvfølgelig skal den dobbeltescapes, hvis man escaper i en tekststreng:

"<h[1-7].+?<\\/h[1-7]>"

-- eller som erik skriver uden !-)

Begge virker ikke hos mig:

<%

strString= "<h1 class=text><span>Featured Artists</span></h1>"

response.write StripHeadings(strString)

Function StripHeadings (ByRef asHTML)
    Set regEx = New RegExp
    regEx.IgnoreCase = True
    regEx.Global = True
    regEx.Pattern = "<h[1-7].+?<\\/h[1-7]>"
    'regEx.Pattern = "(<h1[^<]+</h1>)"
    StripHeadings = regEx.Replace(asHTML, "")   
    Set regEx = Nothing
End Function

%>

Kan I hjælpe?

Ja, det vi har foreslået er alt tilstrækkeligt. Dette virker helt uden problemer:

    asHTML="hjesam <h1>hedjkdadh</h1> ...."
    Set regEx = New RegExp
    regEx.IgnoreCase = True
    regEx.Global = True
    regEx.Pattern = "(<h1>.*?</h1>)"
    StripHeadings = regEx.Replace(asHTML, "") 
    Set regEx = Nothing
    response.write server.htmlencode(StripHeadings)

og hvis du vil generalisere:

    regEx.Pattern = "(<h[1-7]>.*?</h[1-7]>)"

Jo, men det skal også kunne virke på:

<h1 class=text><span>Featured Artists</span></h1>

Og ikke blot på et tag uden parameter.

Hrm, du kan jo bare fjerne starttag-slut-tegnet:

    regEx.Pattern = "(<h[1-7].*?</h[1-7]>)"

Så gør du bare som foreslået:
  regEx.Pattern = "<h[1-7].*?</h[1-7]>"

Takker - nu virker det. Tryk svar :-)

Ingen point til mig, tak.

Og / er ikke spor magisk i regulære udtryk, derfor skal der ikke \ foran. Det er kun
når det regulære udtryk i visse sprog er omgivet af /..../ at man skal gøre det.

Og
  <h1[^<]+</h1>
virker jo ikke når der er andre tags end lige <h1> og </h1> i linien, da [^<] stopper ved det først forekommende < - og så matcher det jo ikke.

-- nej, nej, en skråstreg er bare en skråstreg, men jeg spurgte mere til, om en escaping af noget kunne skade nogen steder, for det gør det mig bekendt ikke i de sprog jeg har fat i det i !-)

-- hvad har du gjort anderledes fra de første udgaver, så det nu virker ?-)

-- og velbekomme '-)

Tak for point ;~}

Selv tak - jeg ville også gerne have form-tagget væk, men jeg kan ikke finde ud af det med hverken    

regEx.Pattern = "(<form[^<]+<\/form>)"

eller

regEx.Pattern = "(<form.*?</form>)"

Nej, jeg må hellere oprette et nyt spg.: http://www.eksperten.dk/spm/605905

Umiddelbart ville jeg da sige at
  regEx.Pattern = "<form.+?</form>"
ville virke. Har du et eksempel, der ikke virker??

Okay, måske er det mellemrum. Jeg ved ikke nok om regexp i MS's verden, men et simpelt hack er

  regEx.Pattern = "<form(.|[\r\n])+?</form>"

Ok, erstat lige "mellemrum" med "linieskift"

regEx.MultiLine = True måske ?-)

Ja, Rønving - det er da et forsøg værd. MS's udgaver er så verbal - det er nemmere i Perl.

Takker, jeg kan dog ikke lige pt. om det virker, da jeg er kommet til at pille ved min script-tag-funktion, så den sletter alt.

Hvad er fejlen?? Det ser da rigtigt ud! ;)

Function StripScript(ByRef asHTML)
    Set regEx = New RegExp
    regEx.IgnoreCase = True
    regEx.Global = True
    regEx.Pattern = "(<script[^\¨]*\<\/script>)"
    StripScript = regEx.Replace(asHTML, "")
    Set regEx = Nothing
End Function

Brug den samme algoritme:

    regEx.Pattern = "(<script.+?</script>)"

Den sletter desværre intet.

Sikkert linieskift igen. Har du prøvet 02/04-2005 20:50:59

Har prøvet - intet virker:

Function StripScript(ByRef asHTML)
    Set regEx = New RegExp
    regEx.IgnoreCase = True
    regEx.Global = True
    regEx.MultiLine = True
    'regEx.Pattern = "(<script[^\¨]*\<\/script>)"
    'regEx.Pattern = "(<script.*?<\/script>)"   
    'regEx.Pattern = "(<script.+?<\/script>)"
    'regEx.Pattern = "(<script.+?</script>)"
    'regEx.Pattern = "(<script[^<]+<\/script>)"
   
    StripScript = regEx.Replace(asHTML, "*")
    Set regEx = Nothing
End Function

Eller rettere, det slet kun nogle af script-taggene... ikke dem alle.

Sikkert linieskift igen. Har du prøvet 02/04-2005 20:50:59

ja, se "regEx.MultiLine = True" ovenstående.

Nå, sorry, nej det har jeg ikke prøvet. Hvordan skal kode så se ud?

Du kunne prøve med det der står 02/04-2005 20:50:59  ;)

Mht. form-tag-funktionen kan jeg ikke teste den, før jeg får rettet min pille fejl i script-tag-funktionen. Men jeg finder lige en backup....

Ookaay, men det er vel nok at skifte "form" ud med "script"

Kørte restoren og fandt mit gamle script-tag-script frem, som jeg også kunne bruge form-tagget og nu kører det hele. Takker for hjælpen.

Function StripScript(ByRef asHTML)
    Set regEx = New RegExp
    regEx.IgnoreCase = True
    regEx.Global = True

    'SKOD-KODNING
    asHTML = replace(asHTML, "</script>", "¨")
    regEx.Pattern = "(<script[^\¨]*\¨)"
    StripScript = regEx.Replace(asHTML, "")
    Set regEx = Nothing
End Function

Function StripForm(ByRef asHTML)
    Set regEx = New RegExp
    regEx.IgnoreCase = True
    regEx.Global = True

    'SKOD-KODNING
    asHTML = replace(asHTML, "</form>", "¨")
    regEx.Pattern = "(<form[^\¨]*\¨)"
    StripForm = regEx.Replace(asHTML, "")
    Set regEx = Nothing
End Function

Jeg har prøvet at komme uden om min skod-kodning med replacen "replace(asHTML, "</form>", "¨")" men jeg kan ikke indbygge det direkte i sætningen - kan I?

Jeg har prøvet med:
  regEx.Pattern = "(<form[^</script>]*</script>)"
og
  regEx.Pattern = "(<form[^\</script>]*\</script>)"
og
  regEx.Pattern = "(<form[^\<\/script>]*\<\/script>)"

Men det virker ikke.

Hvis du får lyst til at prøve det jeg skrev, så siger du bare til ;)

Jeg har prøvet det, men det virker ikke, men det gør det, som jeg lige har postet :-)

Så alt er fint ok, blot vil jeg gerne optimere koden, så min skodkodning forsvinder.

Med andre ord, det virker, dog er jeg kræsen og vil gerne indbygge "</script>" direkte i pattern, men selvom I ikke kan hjælp mig med det ;-) så gør den stadig det, som den skal.