Radera Ur databas?

vad skall jag ändra för att det skall fungera?

<%

Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (\*.mdb)};dbq=" & Server.MapPath("db/mail.mdb")
Set RecSet = Server.CreateObject("ADODB.Recordset")

AdGbook = "SELECT \* FROM mail"

RecSet.Open AdGbook, Connect, adOpenDynamic, adLockOptimistic

%\>

\<% if Request.Form("mail") = RecSet("mail") then %\>
\<% if Request.Form("psw") = RecSet("psw") then %\> 

<%
RecSet.Delete
RecSet.Close %>

Det där är inte hela koden va?

Testa detta:

<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("db/mail.mdb")
Set RecSet = Server.CreateObject("ADODB.Recordset")

AdGbook = "SELECT * FROM mail Where mail = '"&Request.Form("mail")&"' AND psw = '"&Request.Form("psw")&"'"

RecSet.Open AdGbook, Connect

If NOT RecSet.EOF then
RecSet.Delete
RecSet.Close
Else
Response.Write "Användaren fanns inte..."
End If
%>

------------------
Vide rox = new Vide();
rox.learn("C#");
webeye.nu