aggiungi la riga sottolineata in rosso:
codice:
function selsezione(opzione)
select case opzione
  case "1"
    sql = "SELECT * FROM archivio WHERE nome AND genere AND cont_alt LIKE '%"&ricerca&"%' ORDER BY nome ASC"
  case "2"
    sql = "SELECT * FROM archivio WHERE nome LIKE '%"&ricerca&"%' ORDER BY nome ASC"
  case "3"
    sql = "SELECT * FROM archivio WHERE genere LIKE '%"&ricerca&"%' ORDER BY nome ASC"
  case "4"
    sql = "SELECT * FROM archivio WHERE cont_alt LIKE '%"&ricerca&"%' ORDER BY nome ASC"
end select
selselezione = sql 
end function