Delete problem

Hallå,
Jag vill ta bort en post i en access fil.

<a href="delete_post.asp?id=<%=rs("id")%>" title="Ta bort" onClick="return confirm('Vill du verkligen ta bort?');">ta bort</a>

Denna länk har jag men hur ser resten ut.

<!-- #include file="adovbs.inc" -->

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

Connect.Execute("DELETE From members Where id=" &Request.QueryString("id"))

Response.Redirect "main.asp"

%>

Vad har jag missat?

Vad blir det för fel?

Får en tom sida endast samt inget händer.......................

Testade detta och det borde fungera men icke.

<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.Mappath("/db/members.mdb")

Connect.Execute("DELETE * FROM members WHERE id="& Request("id"))
Response.Redirect "laggatill_redigera_medlem.asp"

	RecSet.Close
	Set RecSet = nothing

%>

Connect.Execute("DELETE * FROM members WHERE id= '"& Request("id") &"'")

Så stäng dina recordset innan din Response.Redirect.

Testar men får samma fel.

Men när jag gör egenskap så får jag detta fel i http ( res://ieframe.dll/http_500.htm#http://www. här står min adress. )

Jag kör detta nu men något är fel:

<a href="delete_post.asp?id=<%=rs("id")%>" title="Ta bort" onClick="return confirm('Vill du verkligen ta bort?');">ta bort</a>

<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.Mappath("db/members.mdb")

Connect.Execute("DELETE * FROM members WHERE id= '"& Request("id") &"'")

	RecSet.Close
        Connect.Close
	Set RecSet = nothing

Response.Redirect "laggatill_redigera_medlem.asp"

%>

Ta bort din response.redirect och kontrollera vad du får för felmeddelande.

<%
Set Connect = Server.CreateObject("ADODB.Connection") 
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("db/members.mdb")&";"
Connect.Execute("DELETE From members Where id=" & clng(Request.QueryString("id")))
Connect.Close

Response.Redirect "main.asp"

%>

Var kommer recset in i bilden?

Var har du skapat ditt RecSet ?
Den kod du visar försöker stänga något som inte finns.

<%
Dim con445 
Set con445 = Server.CreateObject("ADODB.Connection") 

con445.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("db/members.mdb")
con445.open

%>

<%

strSQL = "SELECT * From members ORDER BY username ASC"
Set rs = con445.Execute(strSQL)

%>

   

<%Do While not rs.eof%>

<u><%=rs("username")%></u> ( <%=rs("fnamn")%> <%=rs("enamn")%> )
 Redigera | <a href="delete_post.asp?id=<%=rs("id")%>" title="Ta bort" onClick="return confirm('Vill du verkligen ta bort?');">ta bort</a>

<br>

</font>

<%

rs.movenext
Loop
rs.Close
con445.Close
Set con445 = Nothing
%>

Så här kör jag. Detta är fel alltså?!

Öööh var det inte delete delen du hade problem med?

Förlåt..

Men titta på Peter S förslag, fungerar inte det?

Testat Peters förslag får bara en error hml sida upp.

När jag gör egenskaper på den så visar den ( res://ieframe.dll/http_500.htm#http://www.minsida.se/delete_post.asp?id=31" )

Det jag visade Zaiman var hur jag får tag på id.

Stäng av egna felmeddelanden i IE.
Kommentera bort response.redirect för att se om sidan går igenom.

Aha!
Fel meddelande:

Active Server Pages error 'ASP 0239'

Cannot process file

/delete_post.asp, line 1

UNICODE ASP files are not supported.

Google gav:

You need to re-save the file in ANSI format before it will run.
Probably the easiest way to do this is to open the file with Notepad,
then do File->Save As, then change the Encoding: box from UNICODE to ANSI and save over the original file.

Tusen tack!!
Utan din hjälp hade jag inte fått det att fungera.............
Nu kan jag jobba vidare.
Detta var väl ett skit fel, men lärorikt!

Tack igen!