Radera från tabell

Det var meningen att denna kod skulle radera från tabellen central alla poster där namn+efternamn också finns i tabellen kat, alltså ta bort dubletter, men den funkar inte:

<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=C:\DATA\webdata\Spakundregister.mdb;"

[B]strSql = "DELETE from Central WHERE (Central.Namn = Kat.Namn) AND (Central.Efternamn = Kat.Efternamn)"[/B]

Conn.Execute strSql, lngUpdates
Response.Write lngUpdates & " st. poster raderades."
%>

Har en SELECT som funkar fint men DELETE funkar inte, här är SELECT:

SQL = "Select Central.Namn, Central.Efternamn, Central.Location, Kat.Namn, Kat.Efternamn, Kat.Location from Central, Kat WHERE (Central.Namn = Kat.Namn) AND (Central.Efternamn = Kat.Efternamn)"

Jag kanske vet varför DELETE inte funkar men jag tror om jag gör det så raderas informationen ur båda tabellerna, vilket inte ska hända, alltså såhär:

strSql = "DELETE from Central[B], Kat[/B] WHERE (Central.Namn = Kat.Namn) AND (Central.Efternamn = Kat.Efternamn)"

Nån som vet hur jag gör för att endast ta bort från en tabell?

DELETE from Central 
WHERE exists(
    select * from kat
   where Central.Namn = Kat.Namn
      and  Central.Efternamn = Kat.Efternamn)

Tackar, funkade fint :)