Linieskift i formularfelt

er det et textarea ?
så skal du bare lave et alm. linieskift i din html-kode

eks.
<textarea>her er noget tekst - nu kommer der et linieskift
linieksiftet er nu foretaget</textarea>

Det er et felt med rullemenu, magen til det vi skriver i her på Eksperten, men det er et ASP udtræk jeg skal ha vist i feltet, problemet er vis jeg bruger <br> i min response.write så står der bare <br> i feltet i stedet for et linieskift?

så skal du lave en replace:

replace(rs("dit-feltnavn"),"<br>",chr(13))

ok, hvad betyder den kode 13?

det betyder linieskift, eller <br>
- det er ASCII-tegnet

eller CR (Carriage Return) om man vil...
se også: http://www.asciitable.com/

hm, okay
men jeg får det ikke til at virker, jeg sætter det ind således:

response.write (""&replace(rs("notat"),"<br>",chr(13))&"")

response.write (replace(rs("notat"),"<br>",chr(13))

Når jeg indsætter
response.write (replace(rs("notat"),"<br>",chr(13))

får jeg denne fejl:

Der opstod en Microsoft VBScript-kompileringsfejl (0x800A03EE)
Tegnet ')' var ventet

øv.. det er fordi jeg skrev forkert....
response.write replace(rs("notat"),"<br>",chr(13))

der skal ikke være ( foran replace

Så er der ingen fejl, men jeg får ikke noget linieskift :-(

Hvis jeg smider formularen her, gider du så kigge på det?

jeps

er der linieskift i din database ? ... står der <br> der ?

Nej, der er ikke noget linieskift i databasen.
Her er formularfeltet:


<textarea rows="20" name="S1" readonly cols="30" style="font-size: 10 pt"><%

connStr = "driver={MySQL ODBC 3.51 Driver};DATABASE=xxx;SERVER=localhost;UID=xxx;PWD=xxx;OPTION=16834;"
        Set Conn = Server.CreateObject("ADODB.Connection")
        Conn.Open ConnStr
Set rs = Conn.Execute("SELECT * FROM beskeder WHERE email = '"&replace(session("email"), "'", "''")&"' ORDER BY id DESC")
if not rs.EOF then

do while not rs.EOF

response.write("Beskeder " & replace(rs("notat"),"<br>",chr(13)) & "','" & replace(rs("notat4"),"<br>",chr(13)) & "")

rs.MoveNext
loop

  else
   
    response.write("Der er ikke nogen notater")
    end if
   
      Conn.Close
    Set Conn = Nothing
    Set rs = Nothing
 
  %></textarea>

punkt 1: Hvis der ikke er noget linieskift i databasen, bliver det jo heller ikke vist ;)

punkt 2: Der ser fint nok ud, som du har lavet det !

ok, hvordan sætter jeg så et linieskift ind i databasen?

Når du taster noget ind i dit textarea og laver et linieskift der, så skal du lave en modsvarende replace i dit insert.

Lad os sige at dit textarea hedder "test", så før insert skal du lave en replace
temptekst = request.form("test")  <- henter indholdet af textarea "test"
tekst = replace(temptekst,chr(13),"<br>")  <- erstatter linieskift med <br>

Så kommer der en <br> i stedet for linieskift i din DB

Da er jeg ikke med :-(
Jeg forstår ikke at man ikke kan indsætte <br> i response.write
det må da gi det samme, eller har jeg helt misforstået det?

det kan du også -- men så har jeg misforstået dig eller også har du forklaret dig forkert .. hvor vil du have din break ind ?

jeg har forstået at du ville have et linieskift ind i det tekst du kalder fra databasen, hvis der er et linieskift i teksten...

Ok, det jeg ønsker, er følgende:

Jeg har 3 kolonner i min database, kaldet "notat1" "notat2" "notat3"
Dem vil jeg kalde i en response.write i formularfeltet, hvor udtrækket skal stå under hianden, eks.

notat1
notat2
notat3

response.write (""& rs("notat1") &"<br>"& rs("notat2") &"<br>"& rs("notat3") &"<br>")

Nej det virker ikke...
men jeg forsøgte med "&VbCrLf&" istedet for <br> det virker :-)
Men jeg takker mange gange for din hjælp

det skulle ellers gerne virke - men bare du kom frem til det du skulle bruge :D

Det er også lidt underligt, for <br> virker fint så længe det er udenfor formularfeltet, kommer response.writen ind, er det galt?

nåååeh!
Du kan ikke bruge html-kode (som <br> er) *inde* i et textarea - så skal du have fat i VbCrLF i stedet, som du rigtigt nok har gjort

Ok :-) helt fint