Delete

<%
select case request(\"id\")

case \"Administrator\"

set connect = server.createobject(\"ADODB.Connection\")
Connect.open \"Driver={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.mappath(\"db/subs.mdb\")
set rs = connect.execute(\"SELECT * FROM emails\")

response.write \"<br><br><br>\"
response.write \"<h2>Administration</h2>\"
response.write \"<hr>\"
response.write \"<form Name=\"\"send\"\" action=\"\"admin.asp?id=Sletbruger\"\" method=\"\"post\"\">\"

response.write \"<b>Administration af Nyhedsbrev</b><br><br>\"
if not rs.EOF then
do until rs.EOF
response.write \"<b>Emails:</b>\" & rs(\"emails\") & \"<br>\"
response.write \"<input type=\"\"radio\"\" name=\"\"kill\"\" value=\"& rs(\"id\") & \">slet<br>\"
response.write \"<div align=left><hr width=\"\"200\"\"></div>\"
rs.movenext
loop
response.write \"<input value=\"\"Fjern den\"\" type=\"\"submit\"\">\"
response.write \"</form>\"
else
response.write \"Der er ingen på listen\"
end if

case \"Sletbruger\"



connect.execute=\"DELETE * FROM emails WHERE id= & rs(\"id\") &
   
response.redirect \"admin.asp?ID=Administrator\"   
       
case Else
       
end select

%>

Denne her er forkert men hvor ?


connect.execute=\"DELETE * FROM emails WHERE id= & rs(\"id\") &