Allora.....santino, ti posto i risultati....Non funziona!!
ovvero, il testo della tabella non va a capo..
cerco di spiegarmi meglio....
Stò creando un guestbook....allora ricevo in input da un forma(textarea) il testo ovvero il messaggio, e lo inserisco nel mio database di access. fino a qui tutto a posto, poi....creo una tabella dove andrà inserito il testo contenuto nel database......il testo all'interno della tabella si vede....ma tutto su un'unica riga, ovvero non và a capo in automatico all'interno della cella!!
Per curiosità, ti mando tutto il codice che ho scritto, se puoi dacci un'occhiata e vediamo se puoi darmi una mano!! help
<html>
<title>Guestbook</title>
<style type="text/css">
<!--
.Stile3 {font-family: Arial, Helvetica, sans-serif; font-weight: bold; color: #FFFFFF; }
body {
background-color: #000000;
}
.Stile5 {
font-family: Arial, Helvetica, sans-serif;
font-weight: bold;
color: #FFFFFF;
font-size: 36px;
font-style: italic;
}
.Stile6 {
font-size: 14px;
font-family: Verdana, Arial, Helvetica, sans-serif;
}
.Stile8 {font-family: Verdana, Arial, Helvetica, sans-serif}
.Stile10 {
font-family: Arial, Helvetica, sans-serif;
color: #FFFFFF;
font-size: 14px;
font-weight: bold;
}
.Stile16 {
font-family: Arial, Helvetica, sans-serif;
color: #FFFFFF;
}
-->
</style>
<body>
<form name="uao" method="post" action="default.asp">
<table width="725" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="725" height="100" align="center" valign="middle"><span class="Stile5">Guestbook<span class="Stile6"><sub> Powered by Fabrizio Alongi</sub></span><span class="Stile8"></sub></span></span></td>
</tr>
</table>
<table width="727" height="180" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="21" colspan="3" align="right" valign="bottom">
<div align="right"> </div></td>
<td colspan="2" align="center" valign="middle"><span class="Stile3">Text Message</span></td>
</tr>
<tr>
<td height="106" colspan="3" align="left" valign="top"><table width="340" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="135" height="31"><span class="Stile3">Name:</span></td>
<td width="205"><input name="nome" type="text" value="" size="30"></td>
</tr>
<tr>
<td height="29"><span class="Stile3">City:</span></td>
<td height="29"><input name="city" type="text" id="city" size="30"></td>
</tr>
<tr>
<td height="30"><span class="Stile3">Object Message:</span></td>
<td height="30"><input name="objmessage" type="text" id="objmessage" size="30"></td>
</tr>
</table></td>
<td height="152" colspan="2" rowspan="2" align="right" valign="top"><div align="left">
<textarea name="messaggio" cols="40" rows="8" wrap="PHYSICAL" maxlenght="2600">Inserisci messaggio</textarea>
</div></td>
</tr>
<tr>
<td width="161" height="53" align="right" valign="top"><input type="submit" value="Send Message"> </td>
<td width="52" align="left" valign="top"></td>
<td width="162" align="left" valign="top"><input type="reset" name="Submit" value=" Reset "></td>
</tr>
</table>
</form>
<%
Set objConn = Server.CreateObject("ADODB.Connection")
perc=Server.MapPath("messaggi.mdb")
objConn.Open("Provider = Microsoft.Jet.OLEDB.4.0; Data Source = "&perc&"")
Set objRs = Server.CreateObject("ADODB.Recordset")
set objRs = objConn.Execute("SELECT * from guest")
tempo=Time()
data=date()
%><font color="#FFFFFF"><%=tempo%>
<%=data%></font><%
Do while NOT objRs.EOF
%><table width="732" order="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="67" height="22"><span class="Stile10">Nome:</span></td>
<td width="665" height="22"><div align="left"><font color="#FFFFFF"><% response.write ("" & objRs("nome") & "") %></font></div></td>
</tr>
<tr>
<td height="23"><span class="Stile10">City:</span></td>
<td height="22"><div align="left"><font color="#FFFFFF"><% response.write ("" & objRs("city") & "") %></font></div></td>
</tr>
<tr>
<td height="22"><span class="Stile10">Object:</span></td>
<td height="22"><div align="left"><font color="#FFFFFF"><% response.write ("" & objRs("objmess") & "") %></font></div></td>
</tr>
<tr>
<td height="22"></td>
<td height="22"><div align="left"></div></td>
</tr>
<table width="735" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="735" height="42" valign="top">
<font color="#FFFFFF">
' IL PROBLEMA RISIEDE QUI!!!!
<% response.write replace(objRs("messaggio"), vbcrlf, "
") %>
</font>
</td>
</tr>
</table>
<%
objRs.Movenext
Loop
nomea=request.form("nome")
message=request.form("messaggio")
citta=request.form("city")
objm=request.form("objmessage")
if nomea<>"" then
objconn.execute "insert into guest(nome, messaggio, city, objmess) values ('" & nomea &"','"& message &"', '" & citta &"', '"& objm &"')"
%><script language="javascript">location.href="default.asp"</script><%
end if
objRs.Close
Set objRs = Nothing
objConn.Close
Set objConn = Nothing
%>
</body>
</html>
Rispondi quotando