Come faccio a recuperare i dati da un database?
Proviamo a creare un semplice file (che chiameremo "rubrica.asp") in grado di connettersi ad un database contenente una tabella chiamata "TABELLARUBRICA" con i seguenti campi:
- ID (numero univoco di ogni record)
- NOME
- TELEFONO
La funzione del file "rubrica.asp" sarà quello di recuperare i dati di un contatto specifico richiamato per ID.
In sostanza quello che dovremo fare sarà digitare sul nostro browser l‘indirizzo sul web del nostro nuovo file in questo modo:
http://www.sito.it/rubrica.asp?id=X
dove "X" dovrà essere sostituito dal numero dell‘id che vogliamo recuperare.
Iniziamo a scrivere il file "rubrica.asp".
Prima cosa da fare è impostare la connessione al database:
<%
Dim oConn
Set oConn = Server.CreateObject("ADO.Connection")
oConn.ConnectionString = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("cartella/nomedb.mdb")
oConn.Open
%>
A questo punto sarà necessario definire la query che vogliamo eseguire, creare un oggetto recordset, abbinarlo alla connessione creata e dargli la query da eseguire.
<%
Dim oRs
Set oRs = Server.CreateObject("ADODB.Recordset")
oRs.ActiveConnection = oConn
oRs.Execute "Select * from TABELLARUBRICA where ID =" & Request.form("id")
%>
Ora recuperiamo i risultati:
Il contatto n. <%=oRs("ID")%> si chiama <%=oRs("NOME")%> e risponde al numero di telefono <%=oRs("TELEFONO")%>
Ultima cosa da fare è chiudere oRs e oConn.
<%
oRs.close
oConn.close
Set conn= Nothing
%>
