Come accennato nella pagina precedente, ora vedremo il codice Asp integrato con l'html. La spiegazione avverrà successivamente.
<html>
<head>
<title>Mostra Dati Presenti</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head><body bgcolor="#FFFFFF" text="#000000">
<center>
<TABLE border="0" width="400">
<TR bgcolor="#000000">
<TD width="20%"><center><strong><font
color="#FFFFFF">Id</font></strong></center></TD>
<TD width="20%"><center><strong><font
color="#FFFFFF">Titolo</font></strong></center></TD>
<TD width="20%"><center><strong><font
color="#FFFFFF">Autore</font></strong></center></TD>
<TD width="20%"><center><strong><font
color="#FFFFFF">Genere</font></strong></center></TD>
<TD width="20%"><center><strong><font
color="#FFFFFF"> </font></strong></center></TD>
</TR>
<%
dim strCode
strCode="innovatel"
dim intVolta
intVolta="0"
Set Conn=Server.CreateObject("ADODB.Connection")
strConn="driver={Microsoft Access Driver (*.mdb)}; "
strConn=strConn & " DBQ=" & Server.MapPath("libreria.mdb")
strConn=strConn & ";pwd=" & strCode
Conn.Open strConn
sql = "SELECT * FROM libri"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn ,3,3
do while not(rs.eof)
if intVolta="1" then
intVolta="0"
intTesto="#00FF99"
intSfondo="#FFFF00"
else
intVolta="1"
intTesto="#FFFF99"
intSfondo="#33CCFF"
end if
%>
<TR bgcolor="<%=intSfondo%>">
<TD width="20%"><%=rs(0)%></TD>
<TD width="20%"><%=rs(1)%></TD>
<TD width="20%"><%=rs(2)%></TD>
<TD width="20%"><%=rs(3)%></TD>
<TD width="20%"><a
href="modifica2.asp?Id=<%=rs(0)%>">Modifica</a></TD>
</TR>
<%
rs.movenext
loop
rs.Close
set rs = Nothing
conn.Close
set conn = Nothing
%>
</TABLE>
</center>
</body>
</html>
Se siete interessati alla spiegazione dello script in modo completo,vi basterà consultare la parte riguardante la visualizzazione dei dati contenuti nella nostra banca dati.
La sintassi usata per creare il link è la seguente:
<a href="modifica2.asp?Id=<%=rs(0)%>">Modifica</a>
Come si può osservare il link sfrutta il passaggio di un parametro. Questo parametro corrisponde al valore contenuto in posizione 0 del nostro recordset. Esiste un semplicissimo motivo per ci utilizziamo questo valore: In fase di definizione del nostro tracciato record lo abbiamo definito come PK (Primary Key tradotto in italiano Chiave Primaria) e quindi abbiamo l'assoluta certezza che il suo valore NON sia duplicato in altri record.
