Mirabilweb
a- a+

Creare un sistema per la gestione delle news (Parte III)

Pagina 3 di 8

Come è possibile notare nel precedente listato di codice asp, si inserisce per ogni news un link del tipo visualizza.asp?id=id_news, in tal modo nella pagina visualizza.asp, sarà possibile richiedere l’id della news e visualizzare quest’ultima…

 

Ecco il codice della pagina visualizza.asp:

 

<%

‘SI UTILIZZA PER PERMETTERE IL REINDIRIZZAMENTO IN UNA PAGINA:

response.buffer = true

%>

<html>

 

<head>

<title>Creazione Sistema per la gestione delle news</title>

</head>

 

<body>

 

<p align="center"><font size="2" face="Verdana"><b>Creazione Sistema per la

gestione delle news</b></font></p>

<p align="left"><font size="2" face="Verdana"><b>La news in dettaglio:</b></font></p>

<p align="left"><font size="2" face="Verdana">

<!-- #INCLUDE FILE="db.asp" -->

<!-- #include file="adovbs.inc" -->

<%

‘SI APRE LA CONNESSIONE AL DB E SI SELEZIONA LA NEWS

Set RecSet = Server.CreateObject("ADODB.Recordset")

News = "SELECT * FROM news where id = " & Request.QueryString("id") &""

RecSet.Open News, Connect, adOpenStatic, adLockOptimistic

%>

 

<%

‘SE LA NEWS NON ESISTE SI VIENE PORTATI NEL SOMMARIO DELLE NEWS

if RecSet.eof then

Response.Redirect "index.asp"

‘ALTRIMENTI SI VISUALIZZA IN DETTAGLIO LA NEWS

else

%>

   

 

<%=RecSet("Data")%> - <b><%=RecSet("Titolo")%></b> by <b><%=RecSet("autore")%></b></b><br><br>

 

<%=RecSet("news")%>

 

 

<%

‘ SI CHIUDE LA CONNESSIONE AL DB E SI METTE FINE ALLA PRECEDENTE CONDIZIONE…   

RecSet.Close

Connect.Close

End IF

%>

 

</font>

<p align="right"><a href="http://www.mirabilweb.tk"><font size="2" face="Verdana"><b>by

Mirabil Web Computer - Tutto sui PC!</b></font></a></p>

 

</body>

</html>



Ti potrebbe interessare anche

commenta la notizia

C'è 1 commento
Francesco
Hai dubbi su questo articolo?