Set Recordset1_cmd = Server.CreateObject ("ADODB.Command")
Recordset1_cmd.ActiveConnection = MM_bibl_STRING
Recordset1_cmd.CommandText = "SELECT AUT.Nome,Titolo,Genere,Argomento,Anno FROM Biblio,(SELECT Id_Biblio,Id_Autore FROM AutBiblio WHERE Id_Autore=?) AS BIB,(SELECT Autore.Nome FROM Autore WHERE Autore.Id_Autore=?) AS AUT WHERE Biblio.Id=BIB.Id_Biblio" 
Recordset1_cmd.Prepared = true
Recordset1_cmd.Parameters.Append Recordset1_cmd.CreateParameter("param1", 200, 1, 250, 1) ' 1 sta per.... IdAutore 1
Recordset1_cmd.Parameters.Append Recordset1_cmd.CreateParameter("param2", 200, 1, 250, 1) ' 1 sta per.... IdAutore 1