Toon posts:

[ASP] layout detail pagina in dreamweaver

Pagina: 1
Acties:

Verwijderd

Topicstarter
Hallo.

Ik heb een probleempje, ik ben bezig met het ontwikkelen van een intranet site voor onze organisatie. Dit gaat aardig goed. Ik maak het met macromedia Dreamweaver MX 2004, ik gebruik ASP.

Nu heb ik een master detail page gemaakt, en deze werkt, zogauw je op de links klikt word er een detail page geopend met de details van het record. (detail.asp)
Op die pagina staan 3 velden, (datum_nwsber, kop_nwsber en nwsbericht)
In het veld nwsbericht staat dus het bericht zelf. Maar nu zet hij alle tekst achterelkaar, kortom er is geen opmaak.

Ik heb overal al gezocht (search, google, nieuwsgroepen!) niks kunnen vinden?!?

Is er iemand die mij kan helpen?

  • André
  • Registratie: Maart 2002
  • Laatst online: 26-05 00:33

André

Analytics dude

Heb je de code waar het in fout gaat? Staan er wel <br />'s tussen?

  • Xion
  • Registratie: November 2000
  • Laatst online: 07:38
Idd, als je iets direct vanuit de database Responsedwrite dan gaat de opmaak verloren, doe eens een:
ASP:
1
2
3
4
5
<%=replace(rs("veld"), chr(13) & chr(10), "<br>")%>

of

Response.Write(replace(rs("veld"), chr(13) & chr(10), "<br>"))
Ik denk dat dit je probleem wel oplost.

O ja, van RS("Veld") moet je wel je eigen db + veldnaam van maken ;)

Verwijderd

Topicstarter
waar moet ik precies die code invullen?

Dit is de code van de pagina:

code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="1252"%>
<!--#include file="Connections/Intranet.asp" -->

<%
var nieuwshp__MMColParam = "1";
if (String(Request.QueryString("Niieuwsid")) != "undefined" && 
    String(Request.QueryString("Niieuwsid")) != "") { 
  nieuwshp__MMColParam = String(Request.QueryString("Niieuwsid"));
}
%>

<%
var nieuwshp = Server.CreateObject("ADODB.Recordset");
nieuwshp.ActiveConnection = MM_Intranet_STRING;
nieuwshp.Source = "SELECT * FROM nieuws WHERE Niieuwsid = "+ nieuwshp__MMColParam.replace(/'/g, "''") + "";
nieuwshp.CursorType = 0;
nieuwshp.CursorLocation = 2;
nieuwshp.LockType = 3;
nieuwshp.Open();
var nieuwshp_numRows = 0;
%>

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<style type="text/css">
<!--
body {
    background-color: #E0F1FF;
}
.style3 {font-size: 12px; font-family: Verdana; }
.style5 {font-size: 12px; font-family: Verdana; font-weight: bold; }
-->
</style></head>

<body>
  <table width="92%" border="0" align="left">
  <tr>
    <td align="left" width="20%"><span class="style5">Datum</span></td>
    <td align="left" width="80%"><span class="style3"><%=(nieuwshp.Fields.Item("Datum").Value)%></span></td>
  </tr>
  <tr>
    <td width="20%" height="38" align="left"><span class="style5">Nieuwkop</span></td>
    <td align="left" width="80%"><span class="style3"><%=(nieuwshp.Fields.Item("Nieuwkop").Value)%></span></td>
  </tr>
  <tr>
    <td width="20%" height="16" align="left"><span class="style5">Nieuwsbericht</span></td>
    <td width="80%" rowspan="2" align="left" valign="top"><p align="left" class="style3"><%= Server.HTMLEncode((nieuwshp.Fields.Item("Nieuwsbericht").Value)) %></p></td>
  </tr>
  <tr>
    <td height="317" align="left">&nbsp;</td>
  </tr>
</table>
</body>
</html>
<%
nieuwshp.Close();
%>

  • bigbeng
  • Registratie: Augustus 2000
  • Laatst online: 26-11-2021
Dit probleem lijkt een kant op te gaan die thuishoort bij de buren van P&W.

Maak een functie die in een lap tekst de chr(10)&chr(13) combinatie omzet naar <br> tags.

BV:
code:
1
2
3
4
5
<SCRIPT Language="VBScript" Runat="Server">
Function FromReturns2Breaks( sInput )
   FromReturns2Breaks = Replace(sInput, Chr(10)&Chr(13), "<br>")
End Functions
</SCRIPT>

Deze code kun je bijvoorbeeld onderaan je pagina kwijt.

De aanroep van deze functie zet je neer op die punten waar de teksten uit de database worden gelezen.
Nu staat er Server.HTMLEncode(rs(...)), dat wordt dan
Server.HTMLEncode( FromReturn2Breaks(rs(..)) )

Zoals je ziet heb ik het met VBScript opgelost, dit kan ook met serverside javascript, maar dat ken ik niet zo goed.

[ Voor 22% gewijzigd door bigbeng op 30-01-2004 15:22 ]


Verwijderd

Topicstarter
Hij werkt nu wel maar nog niet zoals ik wil!

hij geeft nu de <br> als tekst weer, niet als code?
dus dit krijg je als men het nieuwsbericht bekijkt <br> er tussen te staan.

  • bigbeng
  • Registratie: Augustus 2000
  • Laatst online: 26-11-2021
Verwijderd schreef op 30 januari 2004 @ 16:27:
Hij werkt nu wel maar nog niet zoals ik wil!

hij geeft nu de <br> als tekst weer, niet als code?
dus dit krijg je als men het nieuwsbericht bekijkt <br> er tussen te staan.
Oeps! Die fout maak ik nou altijd...
Het moet zijn FromReturns2Breaks(Server.HtmlEncode(RS(..)))

Sowwy

Verwijderd

Topicstarter
Gaaf!T werkt! Super!!!!


Bedankt!!!! Ik kan weer verder!
Pagina: 1