/ Forside / Teknologi / Udvikling / ASP / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
ASP
#NavnPoint
smorch 9259
Harlekin 1866
molokyle 1040
Steffanst.. 758
gandalf 657
smilly 564
gibson 560
cumano 530
MouseKeep.. 480
10  Random 410
formularfelt
Fra : bo


Dato : 06-11-06 19:42

Når man opretter et formulardelt som man kan indsætte nyheder på
et site - hvordan for man det så til at accp. de linjeskift som
ens bruger laver?

Når brugerne skriver i mit formularfelt og laver linjesfift vises
det bar som en lang række.

PFH tak for hjælpen.

Bo

--
Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials

 
 
Thrane (06-11-2006)
Kommentar
Fra : Thrane


Dato : 06-11-06 21:48


"bo" <bobo@dbmail.dk> wrote in message
news:454f81f5$0$49196$14726298@news.sunsite.dk...
> Når man opretter et formulardelt som man kan indsætte nyheder på
> et site - hvordan for man det så til at accp. de linjeskift som
> ens bruger laver?
>
> Når brugerne skriver i mit formularfelt og laver linjesfift vises
> det bar som en lang række.
>
> PFH tak for hjælpen.
>
> Bo
>
> --
> Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
> - Pædagogiske tutorials på dansk
> - Kom godt i gang med koderne
> KLIK HER! => http://www.html.dk/tutorials

Skal da lige love for at du får lavet nogle emner!!!

Du skal lave noget REPLACE...

Selv benytter jeg denne:

<%
Function replaceSpecialChars(ByVal strText)
Dim strTemp
strTemp = Replace(strText,"'","&#39;")
strTemp = Replace(strTemp,"&","&amp;")
strTemp = Replace(strTemp,vbcrlf,"<br>")
replaceSpecialChars = strTemp
End Function
%>

<% = replaceSpecialChars(CONTENT) %>

Du kan selv indsætte flere tegn der skal erstattes, hvis du har brug for
det...

/Thrane




Thrane (06-11-2006)
Kommentar
Fra : Thrane


Dato : 06-11-06 21:53


"bo" <bobo@dbmail.dk> wrote in message
news:454f81f5$0$49196$14726298@news.sunsite.dk...
> Når man opretter et formulardelt som man kan indsætte nyheder på
> et site - hvordan for man det så til at accp. de linjeskift som
> ens bruger laver?
>
> Når brugerne skriver i mit formularfelt og laver linjesfift vises
> det bar som en lang række.
>
> PFH tak for hjælpen.
>
> Bo
>
> --
> Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
> - Pædagogiske tutorials på dansk
> - Kom godt i gang med koderne
> KLIK HER! => http://www.html.dk/tutorials

Hvis du ikke vil have en Function, så blot sæt dette om indholdet:

Replace(CONTENT, vbcrlf, "<br>")

/Thrane



bo (06-11-2006)
Kommentar
Fra : bo


Dato : 06-11-06 22:42

Thrane wrote in dk.edb.internet.webdesign.serverside.asp:
> "bo" <bobo@dbmail.dk> wrote in message
> news:454f81f5$0$49196$14726298@news.sunsite.dk...
> > Når man opretter et formulardelt som man kan indsætte nyheder på
> > et site - hvordan for man det så til at accp. de linjeskift som
> > ens bruger laver?
> >
> > Når brugerne skriver i mit formularfelt og laver linjesfift vises
> > det bar som en lang række.
> >
> > PFH tak for hjælpen.
> >
> > Bo
> >
> > --
> > Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
> > - Pædagogiske tutorials på dansk
> > - Kom godt i gang med koderne
> > KLIK HER! => http://www.html.dk/tutorials
>
> Hvis du ikke vil have en Function, så blot sæt dette om indholdet:
>
> Replace(CONTENT, vbcrlf, "<br>")
>
> /Thrane
>
> Men hvor skal jeg placere denne?



--
Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials

Jørn Andersen (07-11-2006)
Kommentar
Fra : Jørn Andersen


Dato : 07-11-06 07:06

On 06 Nov 2006 21:41:30 GMT, bo <bobo@dbmail.dk> wrote:


>> Replace(CONTENT, vbcrlf, "<br>")

> Men hvor skal jeg placere denne?

Når du har hentet indholdet af dit felt:
strFelt = Request.Form("feltnavn")
strFeltSkriv = Replace(strFelt, vbcrlf, "<br>")


PS: Gider du tage et kig på:
<url: http://www.usenet.dk/netikette/citatteknik.html>

--
Jørn Andersen,
Brønshøj

bo (07-11-2006)
Kommentar
Fra : bo


Dato : 07-11-06 19:13

Jørn Andersen wrote in dk.edb.internet.webdesign.serverside.asp:
> On 06 Nov 2006 21:41:30 GMT, bo <bobo@dbmail.dk> wrote:
>
>
> >> Replace(CONTENT, vbcrlf, "<br>")
>
> > Men hvor skal jeg placere denne?
>
> Når du har hentet indholdet af dit felt:
> strFelt = Request.Form("feltnavn")
> strFeltSkriv = Replace(strFelt, vbcrlf, "<br>")
>
>
> PS: Gider du tage et kig på:
> <url: http://www.usenet.dk/netikette/citatteknik.html>
>
> --
> Jørn Andersen,
> Brønshøj

Jeg kan ikke få det til at virke.
Har sat det ind her:
<%

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" &
server.MapPath("db1.mdb")

'SQLstmt = "INSERT INTO adresse (overskrift,tekst)
'SQLstmt = SQLstmt & " VALUES (" & request.form("overskrift") &
",'" & request.form("tekst")"
SQLstmt = "SELECT * FROM t1"
'
'response.write SQLstmt

Conn.Execute (SQLstmt)

Set rs = conn.Execute(SQLstmt)
%>

<%
DO WHILE NOT rs.EOF
overskrift = rs("overskrift")
tekst = rs("tekst")
tekstskriv = Replace(tekst,vbcrlf,"<br>")

%>


<%=overskrift%><br>
<%=tekst%><br><br>



<%
rs.MoveNext
LOOP
RS.Close
Response.Write "</TABLE>"

conn.Close
Set conn = nothing
Set SQLstmt = nothing
%>

--
Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials

bo (07-11-2006)
Kommentar
Fra : bo


Dato : 07-11-06 19:18

bo wrote in dk.edb.internet.webdesign.serverside.asp:
> Jørn Andersen wrote in
dk.edb.internet.webdesign.serverside.asp:
> > On 06 Nov 2006 21:41:30 GMT, bo <bobo@dbmail.dk> wrote:
> >
> >
> > >> Replace(CONTENT, vbcrlf, "<br>")
> >
> > > Men hvor skal jeg placere denne?
> >
> > Når du har hentet indholdet af dit felt:
> > strFelt = Request.Form("feltnavn")
> > strFeltSkriv = Replace(strFelt, vbcrlf, "<br>")
> >
> >
> > PS: Gider du tage et kig på:
> > <url: http://www.usenet.dk/netikette/citatteknik.html>
> >
> > --
> > Jørn Andersen,
> > Brønshøj
>
> Jeg kan ikke få det til at virke.
> Har sat det ind her:
> <%
&gt;
&gt; Set Conn = Server.CreateObject("ADODB.Connection")
&gt; Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" &
&gt; server.MapPath("db1.mdb")
&gt;
&gt; 'SQLstmt = "INSERT INTO adresse (overskrift,tekst)
&gt; 'SQLstmt = SQLstmt & " VALUES (" &
request.form("overskrift") &
&gt; ",'" & request.form("tekst")"
&gt; SQLstmt = "SELECT * FROM t1"
&gt; '
&gt; 'response.write SQLstmt
&gt;
&gt; Conn.Execute (SQLstmt)
&gt;
&gt; Set rs = conn.Execute(SQLstmt)
&gt; %>
>
> <%
&gt; DO WHILE NOT rs.EOF
&gt; overskrift = rs("overskrift")
&gt; tekst = rs("tekst")
&gt; tekstskriv = Replace(tekst,vbcrlf,"<br>")
&gt;
&gt; %>
>
>
> <%=overskrift%><br>
> <%=tekst%><br><br>
>
>
>
> <%
&gt; rs.MoveNext
&gt; LOOP
&gt; RS.Close
&gt; Response.Write "</TABLE>"
&gt;
&gt; conn.Close
&gt; Set conn = nothing
&gt; Set SQLstmt = nothing
&gt; %>
>
> --
> Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
> - Pædagogiske tutorials på dansk
> - Kom godt i gang med koderne
> KLIK HER! => http://www.html.dk/tutorials

Har fundet ud af det

Stor tak til Jørn & Thrane

--
Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials

Jørn Andersen (08-11-2006)
Kommentar
Fra : Jørn Andersen


Dato : 08-11-06 05:11

On 07 Nov 2006 18:17:36 GMT, bo <bobo@dbmail.dk> wrote:

>bo wrote in dk.edb.internet.webdesign.serverside.asp:

>Har fundet ud af det
>
>Stor tak til Jørn & Thrane

Velbekomme.

Hvis du vil gøre lidt gengæld, må du gerne beskære dine svar - der er
jo ingen grund til at sende 83 linier, når din meddelelse rellet kun
indeholder 3.

PS: Gider du tage et kig på:
<url: http://www.usenet.dk/netikette/citatteknik.html>

--
Jørn Andersen,
Brønshøj

Søg
Reklame
Statistik
Spørgsmål : 177558
Tips : 31968
Nyheder : 719565
Indlæg : 6408924
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste