<%
'--- richiamo l'oggetto che mi da la funzionalitą di connessione ai database
Set Conn=Server.CreateObject("ADODB.Connection")
'--- mi collego al database che mi serve
Conn.Open "PROVIDER=MSDASQL;" & "DRIVER={Microsoft Access Driver (*.mdb)};" & "DBQ=" & Server.mapPath ("database/ussofu.mdb")
'--- creo un nuovo recordset
Set rs=Server.CreateObject("ADODB.Recordset")
'---seleziono tutti I record della tabella
rs.Open " SELECT* FROM usasoul Order by autore, anno ", conn, 1, 3
%>