Vil ikke slette

if mode=afmeld then

   
        Set DBConn = Server.CreateObject(\"ADODB.Connection\")
        DBConn.Open \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\" & Server.MapPath(\"data/newsletter.mdb\")
   
        DBConn.Execute \"Delete from users where useremail = \'\"& mail & \"\'\"
   
        DBConn.Close
        Set DBConn = Nothing

else
end if

Det hjælper desværre ikke, der slettes ikke noget i databasen. det jeg gerne vil have er, at den sletter hele rækken indeholdende den pågældende email.

Kan jeg se hele koden ?

<%
mode=request.querystring(\"mode\")

%>

<%
if mode=afmeld then
mail=request.form(\"mail\")
   
        Set DBConn = Server.CreateObject(\"ADODB.Connection\")
        DBConn.Open \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\" & Server.MapPath(\"data/newsletter.mdb\")
   
        DBConn.Execute \"DELETE FROM users WHERE useremail = \'\"& mail & \"\'\"

   
        DBConn.Close
        Set DBConn = Nothing

else
end if

%>

Så burde min kode da også virke, får du nogen fejlmeddelser ??

Nej, der kommer ingen fejlmeddelelser....mærkeligt

Så må fejlen jo ligge et andet sted,

Er du sikker på der er noget i tabellen med den pågældende email

Ville den komme med en fejl hvis man tastede en mailadresse ind, som ikke lå i basen?

Nej, den sletter blot alle poster med den pågældene email, hvis der ikke er nogen kommer der ingen fejl

Ja, for jeg har adgang til databasen

Ville det gøre en forskel at lave koden sådan:

<%
mode=request.querystring(\"mode\")
mail=request.form(\"mail\")
%>

<%
if mode=afmeld then

   
        Set DBConn = Server.CreateObject(\"ADODB.Connection\")
        DBConn.Open \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\" & Server.MapPath(\"data/newsletter.mdb\")
   
        DBConn.Execute \"DELETE FROM users WHERE useremail = \'\"& mail & \"\'\"

   
        DBConn.Close
        Set DBConn = Nothing

else
end if

%>

Atlså hente mail inden.

Det er lige meget

Længere ned på siden har jeg bedt den om at udskrive mail og mode. Hvis jeg henter mail først, altså ikke inden for if-sætningen, bliver mail udskrevet.

Ved det første eksempel, kommer den ikke ud

<%
mode=request.querystring(\"mode\")

if mode=afmeld then
mail=request.form(\"mail\")
   
        Set DBConn = Server.CreateObject(\"ADODB.Connection\")
        DBConn.Open \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\" & Server.MapPath(\"data/newsletter.mdb\")
   
        DBConn.Execute \"DELETE FROM users WHERE useremail = \'\"& mail & \"\'\"

 
        DBConn.Close
        Set DBConn = Nothing
else
end if
%>

mail kommer ikke med på siden længere nede!!

Kan jeg se ALT kode du bruger

ok, nu har jeg fundet ud af det: Hvis jeg ændrede if mode=afmeld  til if mode=1, så virker det!! Underligt ikke eller hvad?

måske fordi afmeld sku ind i \"\"  ?

space > Det havde jeg sq overset ;-)

ka jo ske :-p