Corsi di Cultura - ASP e PHP ed. 2002

	Corsi di Cultura Informatica (edizione 2002) CICAIA Centro Interdipartimentale di Calcolo Automatico e Informatica Applicata dell'Università di Modena e Reggio Emilia CEDOC Centro Documentazione della Provincia di Modena
ASP e PHP

argomenti ASP

Modifica-Cancellazione dati

Cenni di configurazione IIS e ODBC

Bibliografia e siti web

Informazioni generali

Lettura di dati

Nella lettura dati dell'esempio precedente abbiamo utilizzato:

tabfac.open "facolta", dbconn
Non abbiamo eseguito nessuna operazione di selezione sui dati presenti nella tabella "Facolta". Per eseguire ricerche più accurate si utilizza il linguaggio di interrogazione SQL.

Esempio di lettura dati attraverso SQL

ES22
Utilizzo degli oggetti ADODB.Connection e ADODB.Recordset.
nome del file: es22.asp

<html>
<head> <title> La mia pagina ASP 22 </title>
</head>
<body>
Questa è la mia pagina ASP 22
<br>
<pre>
<% 
'
'connessione al data base definito °guida° nei DSN-ODBC del server
'
 dim dbconn
 set dbconn = Server.CreateObject("ADODB.Connection")
 dbconn.ConnectionString = ("DSN=guida")
 dbconn.Open
 '
 'interrogazione dati
 '
 dim tabfac
 set tabfac = Server.CreateObject("ADODB.Recordset")
 '
 'preparazione della stringa SQL
 '
 sqlstr="SELECT nome, sede, preside FROM facolta ORDER BY nome"
 tabfac.open sqlstr, dbconn
 '
 ' visualizzazione dati
 '
 do while not tabfac.eof 
 response.write "<li>" & tabfac.fields("nome") & "  " & tabfac.fields ("sede")
 response.write  "  "&  tabfac.fields("preside")
 tabfac.movenext
 loop
 '
 ' chisura connessione e cancellazione oggetti ADO
 '
 tabfac.close
 set tabfac=nothing
 dbconn.close
 set dbconn=nothing
%>
</pre>
</body>
</html>

Visualizza l'esempio

ES23
Utilizzo delle clausola WHERE (selezione su righe)
nome del file: es23.asp

<html>
<head> <title> La mia pagina ASP 23 </title>
</head>
<body>
Questa è la mia pagina ASP 23
<br>
<pre>
<% 
'
'connessione al data base definito °guida°  nei DSN-ODBC del server
'
 dim dbconn
 set dbconn = Server.CreateObject("ADODB.Connection")
 dbconn.ConnectionString = ("DSN=guida")
 dbconn.Open
 '
 'interrogazione dati
 '
 dim tabfac
 set tabfac = Server.CreateObject("ADODB.Recordset")
 '
 'preparazione della stringa SQL
 '
 sqlstr="SELECT nome, sede, preside FROM facolta WHERE sede='Modena' ORDER BY nome"
 tabfac.open sqlstr, dbconn
 '
 ' visualizzazione dati
 '
 do while not tabfac.eof 
 response.write "<li>" & tabfac.fields("nome") & "  " & tabfac.fields ("sede")
 response.write  "  "&  tabfac.fields("preside")
 tabfac.movenext
 loop
 '
 ' chisura connessione e cancellazione oggetti ADO
 '
 tabfac.close
 set tabfac=nothing
 dbconn.close
 set dbconn=nothing
%>
</pre>
</body>
</html>

Visualizza l'esempio

ES23_S
Ancora sulla clausola WHERE (seleziona una sola riga)
nome del file: es23_S.asp

<html>
<head> <title> La mia pagina ASP 23_S </title>
</head>
<body>
Questa è la mia pagina ASP 23 S
<br>
<pre>
<% 
'
'connessione al data base definito °guida°  nei DSN-ODBC del server
'
 dim dbconn
 set dbconn = Server.CreateObject("ADODB.Connection")
 dbconn.ConnectionString = ("DSN=guida")
 dbconn.Open
 '
 'interrogazione dati
 '
 dim tabfac
 set tabfac = Server.CreateObject("ADODB.Recordset")
 '
 'preparazione della stringa SQL
 '
 sqlstr="SELECT * FROM facolta WHERE nome='Economia'"
 tabfac.open sqlstr, dbconn
 '
 ' visualizzazione dati
 '
 document.write "Facoltà di " & tabfac.fields("nome") 
 document.write "Indirizzo " & tabfac.fields("indirizzo") & "- " & tabfac.fields("sede") 
 document.write "Preside " & tabfac.fields("preside") 
 document.write "Sito web " & tabfac.fields("HomePage") 
 '
 '
 ' chisura connessione e cancellazione oggetti ADO
 '
 tabfac.close
 set tabfac=nothing
 dbconn.close
 set dbconn=nothing
%>
</pre>
</body>
</html>

Visualizza l'esempio