Script SQL permettant de trouver et d'éliminer les doublons d'un champ dans une table

Techniques

Cette section permet de regrouper un ensemble de techniques ou de scripts qui ont l'originalité d'arriver à résoudre une difficulté avec le moindre effort ou qui sont particulièrement efficaces...

•   Comment trouver le premier identifiant manquant d'une table:

Une des tâches récurrentes lors de la gestion d'information dans une base de données peut être la recherche et l'élimination des doublons.

Cette technique est basée sur l'exécution d'une seule requête permettant de trouver les doublons en regroupant les lignes de la table sur le champ susceptible d'être en double puis de ne retenir que les lignes comptabilisant plusieurs fois la même valeur pour ce champs.

Soit la structure de table suivante :

MA_table

Si l'on souhaite connaître les valeurs en doublons pour le champs ref_livre :

<%
'Cnx : connectionString
	
Set Con = server.createObject("ADODB.Connection")
Con.open Cnx
	
Sql =	"select count(ref_livre) nb, ref_livre"&_
	" from MA_table 		"&_
	" group by ref_livre	   	"&_
	" having count(ref_livre)>= 2   "
		
Set rs = Con.Execute(StrSql)
	
While not rs.EOF
	Response.write "La valeur " &_
	      rs.Fields("ref_livre") &_
		" apparait : " &_
	rs.Fields("nb") & " fois 
"
		
rs.MoveNext
wend
	
	
'Clean memory
Set rs = Nothing
Con.Close
Set Con = Nothing
%>