Avatar billede vels Nybegynder
22. april 2000 - 21:48 Der er 4 kommentarer og
1 løsning

Database - slette post

Hej jeg har aldrig prøve at sende fra en form også slette noget i databasen. Altså man indtaster sin email adresse også bliver deeeeen slettet fra databasen. Min kode ser sådan ud:

slet_data.asp
<% Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open "PROVIDER=MSDASQL;" & "DRIVER={Microsoft Access Driver (*.mdb)}; " & "DBQ=" & server.mappath("liste.mdb")

SQL = "DELETE * FROM mailingliste WHERE email=" & TRIM(Request.form("email"))


set RS = conn.execute(SQL)

response.redirect ("default.asp")
%>
<%Rs.close
Set Rs= Nothing
Conn.Close
set Conn=nothing%>

form.asp
<html>
<form method="POST" action="slet_data.asp">
  <p align="left">Slet</p>
  <p align="left">E-mail: <input type="text" name="email" size="20"></p>
  <p align="left"><input type="submit" value="Send" name="B1"><input type="reset" value="Slet" name="B2"></p>
</form>
</html>

databasen:
www.vels.dk/data/liste.mdb

PS: koden er bare sådan jeg tror det skal laves, men det virker ikke :-(
Avatar billede morpheus Nybegynder
22. april 2000 - 22:13 #1
Har du prøvet at fjerne din trim ?

Du kunne også lave det så brugeren indtastede sin email.
Og den blev sendt adresselinjen hvor du så kunne slette den sådan her:

SQL = "DELETE * FROM mailingliste WHERE Request.Querystring("Email")

....
<//morpheus\\>



Avatar billede morpheus Nybegynder
22. april 2000 - 22:21 #2
Sorry, den hedder:

SQL = "DELETE * FROM mailingliste WHERE "& Request.Querystring("Email")


<//morpheus\\>
Avatar billede vels Nybegynder
22. april 2000 - 22:57 #3
Nu er jeg ikke den store asp kunstner derfor har jeg lavet filen:
--------
slet.asp
--------
<%
email = request.form("email")
response.redirect ("slet_data.asp?"& Request.form("email")& "")
%>
'modtager data fra formen istedfor slet_data.asp
--------------
slet_data.asp
--------------
<% Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open "PROVIDER=MSDASQL;" & "DRIVER={Microsoft Access Driver (*.mdb)}; " & "DBQ=" & server.mappath("liste.mdb")

SQL = "DELETE * FROM mailingliste WHERE "& Request.Querystring("Email")


set RS = conn.execute(SQL)

response.redirect ("default.asp")
%>
<%Rs.close
Set Rs= Nothing
Conn.Close
set Conn=nothing%>

MEN jeg får denne fejl:
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] Syntax error in WHERE clause.

/data/slet_data.asp, line 7

Kunne det evt. laves uden den ekstra fil?
Avatar billede sirius Nybegynder
22. april 2000 - 23:18 #4
slet_data.asp
<% Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open "PROVIDER=MSDASQL;" & "DRIVER={Microsoft Access Driver (*.mdb)}; " & "DBQ=" & server.mappath("liste.mdb")

SQL = "DELETE * FROM mailingliste WHERE email = '" & Request.form("email") & "'"


set RS = conn.execute(SQL)

response.redirect ("default.asp")
%>
<%Rs.close
Set Rs= Nothing
Conn.Close
set Conn=nothing%>

form.asp
<html>
<form method="POST" action="slet_data.asp">
  <p align="left">Slet</p>
  <p align="left">E-mail: <input type="text" name="email" size="20"></p>
  <p align="left"><input type="submit" value="Send" name="B1"><input type="reset" value="Slet" name="B2"></p>
</form>
</html>

Avatar billede vels Nybegynder
22. april 2000 - 23:27 #5
Takker endnu engang, nu har jeg fattet lidt af databaser med asp og SQL.
Avatar billede Ny bruger Nybegynder

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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester