udskrive doubletter ?

Så kan du lave en count på den og tjekke...

SQL = "SELECT navn, count(navn) as antal FROM tabel GRUOP BY navn"
set rs = ConnecetionObj.Execute(SQL)
do while not rs.EOF
  if Int(rs("antal")) > 1 then
  'Flere dubletter
  response.write "<font color=""red"">"
  else
  'Navnet kun fundet en gang
  response.write "<font color=""blue"">"
  end if
  response.write rs("navn") & "</font>" & "<br>"
 
  rs.Movenext
loop

Det skal lige prøves af jeg vender tilbage med resultatet :o)

Men kan man ikke lave den sql inde i en allerede existerende loop da der skal udskrives mere end bare navnet ?

Jo kan man nok, hvad udskriver den? Skriver den alt ud fra tabellen selv om det er dubletter i navnet?

Lad os tage et eksempel. En person opretter et indlæg i f.eks et forum og han skriver sit navn, e-mail, tlf, osv han kommer til at trykke på send 2 gange og derved opstår der en doublette. En admin på sitet logger på for at tjekke efter doubletter og her er det så at der på en liste skal vises doubletter i rød skrift så det er lidt lettere at finde frem til dem. Var det en bedre forklaring ?

Ja ok, ja så skulle det vist være muligt at tilføje dette
count(navn) as antal
som en kolonne og dette til sidst:
GRUOP BY navn

Eller skal du lave en ny SQL som du bruger hvor hver navn inde i dit loop

SQL = "SELECT count(navn) as antal FROM table WHERE navn = '" & rs("navn") & "'"

Jeg er dessvære nød til at smutte nu..

Ok jeg prøver at lege lidt med det første her så kan vi se om ikke det kommer til at virke :o)

I selve MSAccess kan du lave en query for at finde dubletter i din tabel. Brug Forspørgelse---> valg ny ---> find Dubletter efter det brug queryen. Her er et query som finder dubletter i en af min tabeller hvor tjekker assigned_dt feltet for dubletter:

SELECT First(Assignment.assigned_dt) AS [assigned_dt Felt], Count(Assignment.assigned_dt) AS AntalDubletter
FROM Assignment
GROUP BY Assignment.assigned_dt
HAVING (((Count(Assignment.assigned_dt))>1))