codice:
Set cn = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")

cn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & _
         Server.MapPath("My-db.mdb") 

//definisco la stringa sql
sql = "SELECT Scheda_Cliente.nome, Scheda_Cliente.cognome, Scheda_Cliente.natoil FROM Scheda_Cliente WHERE Scheda_Cliente.nome=' " & nome & " ' And Scheda_Cliente.cognome=' " & cognome & " ' And Scheda_Cliente.natoil= " & natoil & ""

rs.Open sql,cn	

If not rs.Eof Then
rs.MoveFirst