Lezione 16: Lettura di Dati da un Database

Una funzione molto utilizzata delle Active Server Pages è l'abilità di creare, cancellare, recuperare e aggiornare informazioni all'interno dei databse. In questo corso utilizzeremo database di tipo Microsoft Access come sorgente di dati, perciò sarà importante che comprendiate alcuni fondamenti sui database.

Fausto Marinsalta

 

Form

Utilizzeremo nuovamente la form illustrata nella Figura 6.4 nella Lezione 6.

 

Figura 6.4 – La Form di Informazioni Studente

 

Per riempire questa form con i dati, dobbiamo creare una query SQL di tipo SELECT, aprire la connessione, eseguire la query, e poi assegnare i risultati ai valori di default degli elementi della form. Qui vediamo un frammento del codice che crea la query:

Listato 8.1 – Creazione Query

<%

sql = "SELECT * FROM Studenti"

openCN

rs.Open sql, cn

%>

 

Ora dobbiamo assegnare i valori restituiti ai valori di default degli elementi della form. Qui vi è un frammento di codice per fare ciò:

 

<input type="text" name="txtFName" value=" <%=rs("FName")%> " size="20">

 

Se immettiamo i dati tutti insieme, il risultato che otteniamo dovrebbe essere quello che si vede qui sotto:

 

Figura 8.1 – Form con i campi riempiti

Listato 8.2 – Visualizza Tabella

<form>

<%

OpenCN

sql = "SELECT * FROM Studenti"

rs.Open sql, cn

%>

<table width="325" border="2" cellpadding="2">

<tr>

<td align="left" width="334">Informazioni Studente</td>

</tr>

<tr>

<td align="right" width="334"><table border="0" width="324" cellspacing="1">

<tr>

<td width="108" align="right">Numero ID Studente:</td>

<td width="208"><input type="text" name="txtSID" size="8" value=" <%=rs("sid")%> "></td>

</tr>

<tr>

<td width="108" align="right">Nome:</td>

<td width="208"><input type="text" name="txtFName" size="15" value=" <%=rs("NOME")%> "></td>

</tr>

<tr>

<td width="108" align="right">Cognome:</td>

<td width="208"><input type="text" name="txtLName" size="20" value=" <%=rs("COGNOME")%> "></td>

</tr>

<tr>

<td width="108" align="right">Indirizzo:</td>

<td width="208"><input type="text" name="txtAddress" size="20" value=" <%=rs("INDIRIZZO")%> "></td>

</tr>

<tr>

<td width="108" align="right">Città:</td>

<td width="208"><input type="text" name="txtCity" size="15" value=" <%=rs("CITTà")%> "></td>

</tr>

<tr>

<td width="108" align="right">ST:</td>

<td width="208"><input type="text" name="txtST" size="2" value=" <%=rs("STATO")%> "></td>

</tr>

<tr>

<td width="108" align="right">CAP:</td>

<td width="208"><input type="text" name="txtZipcode" size="10" value=" <%=rs("CAP")%> "></td>

</tr>

</table>

</td>

</tr>

<tr>

<td align="center"><input type="reset" value="Clear" name="B1"> <input type="submit"

value="Submit" name="btnSubmit"></td>

</tr>

</table>

<%

rs.Close

CloseCN

%>

</form>

Applicate ciò che avete appreso

Usate la form che avete creato nella Lezione 14 e riempitela con un record dalla tabella Valutazioni. Quando costruite la vostra query, utilizzate il numero ID studente 00000001.

 

 


i