24. marts 2002 - 18:26Der er
1 kommentar og 1 løsning
check om element eksisterer i db
Hej
Kan du udbygge dette script, så det først checker, om den indtastede e-mail adresse faktisk eksisterer, inden at det forsøger at slette den?
<% if Request.ServerVariables("REQUEST_METHOD") = "POST" then Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath ("../databaser/nyhedsbreve.mdb") strSQL = "DELETE FROM ABONNENT WHERE ABO_EMAIL = '" & Request.Form("email") & "'" set rs = Conn.execute(strSQL) end if %>
<% if Request.ServerVariables("REQUEST_METHOD") = "POST" then strSQL = "select * from ABONNENT WHERE ABO_EMAIL = '" & Request.Form("email") & "'" set rs = Conn.execute(strSQL) if not rs.EOF then Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath ("../databaser/nyhedsbreve.mdb") strSQL = "DELETE FROM ABONNENT WHERE ABO_EMAIL = '" & Request.Form("email") & "'" set rs = Conn.execute(strSQL) end if end if %>
...bliver flyttet lidt op, så funger det. Tak for hjælpen, igen :-)
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
