Problemer med delete fra en form
Hej EksperterJeg har en form afmeld hvor der ligger en inputbox ved navn Email, formen stiller videre til en fil med nedenstående kode, hvor jeg prøver at få fat i formens indhold og så slette det fra databasen, men det virker ikke og giver ingen fejl, hvad gør jeg forkert.
<%
if request.form("Afmeld")="Afmeld" then
Email = request.form("Email")
'Databaseforbindelse - husk at angive sti til din database
Dim Conn
Dim rs
Set rs = Server.CreateObject("ADODB.Recordset")
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.ConnectionString="DRIVER={MySQL};SERVER=localhost;DATABASE=xxx;UID=rafiq_info;PWD=xxx;"
Conn.Open
' SQL sletter record ud fra urlstring som indeholder id
strSQL = "Delete from Nyhedstabel where email= values('"& Request.Form("Email") & "')"
Conn.Execute(strSQL)
' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
response.redirect "Email.asp"
end if
%>
