webForumDet fria alternativet

<br><p>

6 svar · 232 visningar · startad av kaktusen

kaktusenMedlem sedan juni 2002139 inlägg
#1

När jag ska skriva ett inlägg använder jag mig av koden som finns nedanför...men jag måste själv skriva <br> el. <p> för radbrytning.

Var och vad ska jag lägga in för att det ska sköta sig automatiskt genom att man klickar på Enter?

Tack!

Mvh

<%
If Request.Querystring("action") = "ny" AND Session("add") = "yes" Then

Set RecSet = Server.CreateObject("ADODB.Recordset")
Oppna = "SELECT * FROM Nyheter"
RecSet.Open Oppna, Connect %>
<form method="post" action="admin.asp?ad=in&action=laggin">
Rubrik:<br>
<input type="text" name="rubrik" size="20">
<p>
Nyhet:<br><textarea rows="5" cols="30" name="nyhet"></textarea>
<p>
<input type="submit" value="Lägg in">
</form>
<%End If
If Request.Querystring("action") = "laggin" AND Session("add") = "yes" Then

Rubrik = Request.Form("rubrik")
Nyhet = Request.Form("nyhet")

Connect.Execute("Insert Into Nyheter(Rubrik,Nyhet) values('" & Rubrik & "','" & Nyhet & "')")
Response.Redirect "admin.asp?ad=in"
End If

Set RecSet = Server.CreateObject("ADODB.Recordset")
Visa = "SELECT * FROM Nyheter ORDER BY ID Desc"

RecSet.Open Visa, Connect

If Request.Querystring("action") = "redigera" AND Session("add") = "yes" Then

Set RecSet = Server.CreateObject("ADODB.Recordset")
Visa = "SELECT * FROM Nyheter WHERE ID =" & Trim (Request.Querystring("ID")) &" "

RecSet.Open Visa, Connect
%>

@ndersMedlem sedan juni 200032 969 inlägg
#2

Du bör inte spara html-taggar i databasen. När du skriver ut informationen igen gör du en replace.

Response.write replace(rs("fältet"), vbCrLf, "<br>")

mvh,

kaktusenMedlem sedan juni 2002139 inlägg
#3

@nders...

ursäkta min okunnighet men detta är inte hämtat från en databas utan en ASP-fil.

Därav har jag html i ASP-filen!

solbulleMedlem sedan mars 20015 287 inlägg
#4

Han menar att när du plockar ut datan från din databas, där den hamnar i och med koden du visar ovan, så använder du koden @nders skrev när du sen visar datan/nyheten.

Typ.

Nyhet:
<br>
<% 
Response.write replace(rs("nyhet"), vbCrLf, "<br>")
%>
kaktusenMedlem sedan juni 2002139 inlägg
#5

Hejsan,

Det funkar ej.

Såhär ser koden jag använder för att visa nyheten:

<%=RecSet("Nyhet")%>

Mvh

@ndersMedlem sedan juni 200032 969 inlägg
#6

Och detta fungerar inte?

<% 
Response.write replace(RecSet("nyhet"), vbCrLf, "<br>")
%>
kaktusenMedlem sedan juni 2002139 inlägg
#7

Jo det funkade @nders, man tackar och bockar!

133 ms totalt · 3 externa anrop · v20260731065814-full.30151723
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
130 ms — hämta tråd, inlägg och bilagor (db)