<code>
<%
Set MinCon = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.RecordSet")

MinCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data source=" & Server.MapPath("db\ra3cup.mdb")
SQL = "SELECT * From clans ORDER BY clan ASC"
rs.Open SQL, MinCon, 1, 2

If rs.EOF Then
Response.write "<font face='Verdana, Arial, Helvetica, sans-serif' size='1' color='#FFFFFF'>Inga klaner i databasen.</font>"
Else
Do While Not rs.EOF
%>
<table width="50%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="38%" valign="top"> <font color="#FFFFFF" size="1" face="Verdana">">Delete</font>
- <img src="flags/<%=rs("country")%>.gif" width="18" height="12"> <%=rs("clan")%></td>
</tr>
</table>

<%
rs.MoveNext
Loop
End if
%>
<%
If Request.QueryString("do") = "del" Then
Set MinCon = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")

MinCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("db/ra3cup.mdb")
SQL = "Delete * From clans Where Id = " & Request.QueryString("ID") & " "
rs.Open SQL, MinCon

Response.Write "<script language=""Javascript"">alert('Klanen är nu borttagen.');window.location='default.asp?page=admin/admin';</script>"

End If
%>
<br>
</code>
--------------------------------

denna kod tar bort ID från tabellen 'clans'
men jag har en annan tabell (league) där samma klaner är inlaggda

hur ska jag göra för att ta bort clanen jag väljer från BÅDA tabellerna?
dom har inte samma ID

räknaren i tabellen 'league' heter IDD och inte ID som den heter i tabellen 'clans'

hjääääälp

Lägg till referensintegrietet med Cascade delet i databasen så sker det automatiskt.