Formattare il testo di un response.write

**elbahari** · 05-02-2009, 21:04

Ciao a tutti. Vi riporto questo problema :

ho questo codice

Response.Write "News Inserita Da " & rNews.Fields("NickName") & "
"
Response.Write "Con Email " & rNews.Fields("Email") & "
"
Response.Write "IL Titolo è " & rNews.Fields("Titolo") & "
"
Response.Write "IL Testo è il Seguente " & rNews.Fields("Testo") & "
"
Response.Write "--------------------------------------------------" & "
"

e vorrei formattarlo in una tabella larga 400 px formata da 4 righe, con un carattere Tahoma da 10 px, un colore rosso ..... sostanzialmente vorrei formattare il testo risultante.

Potete aiutarmi ?? Grazie anticipatamente, Antonella.

**ubbicom** · 05-02-2009, 22:14

Non è ASP ma HTML.

codice:

Response.Write "<div align=""center"">
Response.Write "<table border=""0"" width=""400"" id=""table1"">"
Response.Write "<tr>"
Response.Write "<td>News Inserita Da " & rNews.Fields("NickName") & "</td>"
Response.Write "</tr>"
Response.Write "<tr>"
Response.Write "<td>Con Email " & rNews.Fields("Email") & "</td>"
Response.Write "</tr>"
Response.Write "<tr>"
Response.Write "<td>IL Titolo è " & rNews.Fields("Titolo") & "</td>"
Response.Write "</tr>"
Response.Write "<tr>"
Response.Write "<td>IL Testo è il Seguente " & rNews.Fields("Testo") & "</td>"
Response.Write "</tr>"
Response.Write "</table>"
Response.Write "</div>"

**elbahari** · 06-02-2009, 10:24

Grazie per la risposta velocissima, ma con queste modifiche il browser risponde :

"impossibile visualizzare la pagina"
http 500 - errore interno

Scuramente sono io a sbagliare qualcosa, ma non riesco a capire dove.
Per completezza spedisco tutto il codice

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>Documento senza titolo</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body>
<h5>News dal sito</h5>
<%
Dim ConnessioneDB, rNews, strConn
Set ConnessioneDB = Server.CreateObject("ADODB.Connection")
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("dbase/database2.mdb")&";Persist Security Info=False"
ConnessioneDB.Open strConn
Set rNews = ConnessioneDB.Execute("SELECT * FROM News;") %>
<% If rNews.BOF=True And rNews.EOF=True Then %>
<h5>Non ci sono news</h5>
<% Else %>
<% Do Until rNews.EOF=True %>
<%
Response.Write("<div align=""center"">")
Response.Write("<table border=""0"" width=""400"" id=""table1"">")
Response.Write("<tr>")
Response.Write("<td bgcolor=red><font color=red>")
Response.Write("<td>News Inserita Da " & rNews.Fields("NickName") & "</td>")
Response.Write("<td>Con Email " & rNews.Fields("Email") & "<td>")
Response.Write("<td>IL Titolo è " & rNews.Fields("Titolo") & "<td>")
Response.Write("<td>IL Testo è il Seguente " & rNews.Fields("Testo") & "<td>")
Response.Write("<td>--------------------------------------------------" & "<td>")
Response.Write("</font></td>")
Response.Write("</tr>")
Response.Write("</table>")
Response.Write("</div>")%>
<% rNews.MoveNext %>
<% Loop %>
<%End IF%>
<% rNews.Close : Set rNews = Nothing
ConnessioneDB.Close : Set ConnessioneDB = Nothing %>

</body>

</html>

Grazie ancora per la cortesia. Anto.

**Roby140569** · 06-02-2009, 13:02

Per capire qualcosa di più sull'errore, dovresti fare in modo che il tuo browser mostri i messaggi di errore per esteso.

Su IE, fai così:
1. Menu Strumenti -> Opzioni Internet
2. Scheda Avanzate
3. Sezione Esplorazione delle Impostazioni
4. Togli il flag da "Mostra Messaggi di Errore HTTP Brevi"

In questo modo vedrai i dettagli dell'errore e l'indicazione della riga dove c'è l'errore.

Discussione: Formattare il testo di un response.write

Strumenti discussione

Ricerca discussione

Visualizza

Formattare il testo di un response.write

Permessi di invio