<%@LANGUAGE = JScript%> <% var id = new String(Request.QueryString("id")); var Cn = new ActiveXObject("ADODB.Connection"); Cn.Open("driver={Microsoft Access Driver (*.mdb)};dbq=" + Server.MapPath("/mdb-database/database.mdb")); var MostraDomanda = Cn.Execute("SELECT * FROM messaggi2 WHERE id LIKE '" + id + "'"); var MostraRisposte = Cn.Execute("SELECT * FROM messaggi2 WHERE id_risposta = '" + id + "' ORDER BY data ASC, id"); %> <%=Server.HTMLEncode(MostraDomanda("titolo"))%>
ADIA - Forum di discussione

Torna alla Homepage - Inserisci un nuovo messaggio
<%=Server.HTMLEncode(MostraDomanda("titolo"))%>

Autore: <%MostraDomanda("email") != "" ? Response.Write("" + Server.HTMLEncode(MostraDomanda("nome")) + "") : Response.Write(Server.HTMLEncode(MostraDomanda("nome")))%>
Data: <%=Server.HTMLEncode(MostraDomanda("data"))%>
<%=Server.HTMLEncode(MostraDomanda("messaggio"))%>


<%while (!MostraRisposte.EOF) {%>
Autore: <%MostraRisposte("email") != "" ? Response.Write("" + Server.HTMLEncode(MostraRisposte("nome")) + "") : Response.Write(Server.HTMLEncode(MostraRisposte("nome")))%>
Data: <%=Server.HTMLEncode(MostraRisposte("data"))%>


<%=Server.HTMLEncode(MostraRisposte("messaggio"))%>


<% MostraRisposte.MoveNext(); } %>
<%Cn.Close()%>