tillad all html kode

Så gør man vel egentligt ikke noget. Der ville være noget andet hvis du spørger om hvordan man FORHINDRER HTML-kode. Eller har jeg ikke forstået dit spørgsmål......?

Det mente jeg også, men den smider ikke koden ned i db. her er noget af koden hvor man skriver nyheden:

<%
if request("mode") = "send" then

Const adOpenKeyset = 1
Const adLockOptimistic = 3

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "PROVIDER=MSDASQL;DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("../mailing.mdb") & ";UID=admin;PWD=;"

   
            Set rs = Server.CreateObject("ADODB.RecordSet")
            strSQL = "Select * From nyheder"
            rs.Open strSQL, Conn, adOpenKeyset, adLockOptimistic

          rs.AddNew
          rs("overskrift") = Request("overskrift")
          rs("tekst") = Request("tekst")
          rs("dato") = now
            rs.Update
           
                Set rs2 = Server.CreateObject("ADODB.RecordSet")
            strSQL2 = "Select top 1 * From nyheder order by id DESC"
            rs2.Open strSQL2, Conn, adOpenKeyset, adLockOptimistic
           
    SQL = "SELECT * from mailingliste"
    set send = conn.execute( SQL )
    do while not send.eof
    on error resume next

Det lyder sært....!

Får du overhovedet det rigtige html-kode med over i siden ?

Prøv

response.write Request("tekst")
response.end

- i toppen af siden og se om der kommer det forventede ud.

det var min fejl, den skriver det i DB, men den viser koden i stedet for at lave den

eks: <b>hejsa</b> skulle blive bold men den skriver; <b>hejsa</b> i nyheden

jeg har denne øverst på min default side:

<%
function makeLink(str)
    '*** Make the reqular expr object
    Set objRegExp = New RegExp
    objRegExp.IgnoreCase = True
    objRegExp.Global = True

    '***Make html links
    objRegExp.Pattern = "(\bhttp\:\/\/)?(\bw{3}\.\S+\.[a-z][a-z]+\b)(\/\S+\b)?(\?\S+\b)?"
    str = objRegExp.Replace(str, "<a href="&chr(34)&"http://$2$3$4"&chr(34)&">$1$2$3$4</a>")

    '***Make html mailto
    objRegExp.Pattern = "(\S+@{1}\S+\.[a-z][a-z]+\b)"
    str = objRegExp.Replace(str, "<a href="&chr(34)&"mailto:$1"&chr(34)&">$1</a>")
    Set objRegExp = Nothing
    makelink = str
end function
%>

vil bare have denne til at vise klik her:
<a href="http://www.domain.dk" target="_blank" >klik her</a>

i stedet for <a href="http://www.domain.dk" target="_blank" >klik her</a> som den skriver nu, samt at den så ikke åbner som den skal, da nogle siderne skal åbnes på forskellige måder

Hvilken slags attribut gemmer du din tekst i på databasen ??
txt format
notat
varchar
char ??

Gemmes værdierne i et notat, txt format kan du skrive hvad som helst..

/arno

arno--> det kigger jeg lige på

i db står den til notat

noen der kan hjælpe eller skal jeg lukke

.