Returnere linieskift fra database

<%=Replace(rs(\"BroedText\"), vbCrLf, \"<br>\")%>

<%=Replace(rs(\"BroedText\"), vbCrLf, \"<br>\")%>

1 sek.!!!!!!

men de ligner hinanden RIGTIG godt :)

Ja .. personligt synes jeg bedst om min ;o)

hehe :)

Tak skal i da lige ha\'!!!

Det må være det man kalder \"synkron\" svar....ny OL diciplin?

/Anne

tjaaa men vi fik 6 i karakter vi var 1 sek. fra hinanden :)

hvis ikke det lige var 1 sek efter ville jeg nok have anklaget tpiil for at kopiere mit svar *LÅÅL*

Se nu er jeg jo pludselig gået hen og fået nye ideer....hvad nu hvis jeg skriver en mailadresse, eller en webadresse. Hvordan bliver det automatisk til links, er det lidt på samme måde?

/Anne

Det er *lidt* mere besværligt da der skal bruges regular expressions ..

Meeen nu da jeg lige har en function til netop samme formål kan du da godt lige få den gratis :o)

Function LinkString(strInput)
    Set objRegExpHTTP1 = New RegExp
    Set objRegExpHTTP2 = New RegExp   
    Set objRegExpEMail = New RegExp

    objRegExpHTTP1.Pattern = \"(http|ftp)(:\\/\\/[\\w\\._-]+\\.[\\w\\._-]+\\S*)\"
    objRegExpHTTP2.Pattern = \"(^|[^\\/])(www[^\\.\\s]?\\.[\\w\\._-]+\\.[A-Za-z]{2,3}\\S*)\"
    objRegExpEMail.Pattern = \"([\\w\\._-]+@[\\w\\._-]+\\.[A-Za-z]{2,3}\\S*)\"

    objRegExpHTTP1.Global = True
    objRegExpHTTP2.Global = True
    objRegExpEMail.Global = True

    objRegExpHTTP1.IgnoreCase = True
    objRegExpHTTP2.IgnoreCase = True
    objRegExpEMail.IgnoreCase = True

    strOutput = objRegExpEMail.Replace(strInput, \" <a href=\'mailto:$1\'>$1</a> \")
    strOutput = objRegExpHTTP1.Replace(strOutput, \" <a href=\'$1$2\' target=\'_blank\'>$1$2</a> \")
    strOutput = objRegExpHTTP2.Replace(strOutput, \" <a href=\'http://$2\' target=\'_blank\'>$2</a> \")
       
    Set objRegExpHTTP2 = Nothing
    set objRegExpHTTP1 = Nothing
    Set objRegExpEMail = Nothing

    LinkString = strOutput
End Function

smid den øverst i dit ASP script og brug den sådan her:

<%
    strTxt = Replace(rs(\"BroedText\"), vbCrLf, \"<br>\")
    strTxt = LinkString(strTxt)
    Response.Write strTxt
%>

istedet for det tpill og jeg skrev..

tdaugaard eller rettere tdaugud.....det var lige det fantastisk..... !

Jeg opretter lige et spørgsmål så du kan få nogle flere point

/Anne