--- title: "Borttagning av en post" type: "forum-thread" url: "https://www.webforum.nu/amne/asp/87970-borttagning-av-en-post" topic: "ASP" topic_url: "https://www.webforum.nu/amne/asp" author: "January" published: "2003-10-08T09:18:55.000Z" updated: "2003-10-08T15:37:31.000Z" replies: 18 views: 316 page: 1 pages: 1 language: "sv-SE" site: "webForum — webforum.nu" rights: "Upphovsrätten till varje inlägg tillhör dess författare." attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/87970-borttagning-av-en-post" --- # Borttagning av en post ## #1 — January, 2003-10-08T09:18Z Hejsan! Jag har ett problem med min asp-kod. Jag har en sida med frågor som är kopplade till en access databas där frågorna sparas. Jag vill kunna ta bort en post så den inte syns på sidan men även ska tas bort från databasen. Jag har lagt in en länk som man klickar på för att ta bort posten som visas och då kommer det upp en confirmbox där man kan välja ok eller avbryt. När jag avbryter så kommer jag tillbaka till sidan (inget händer) och när jag klickar på OK så ska jag komma till en sida som inte visas utan bara tar bort posten och sedan omdirigerar till en sida där det står att posten är borttagen. Koden jag har skrivit in ser ut så här: ``` <% option explicit%> <% dim koppling, sql, id id=request.form("id") set koppling=server.createobject("adodb.connection") ' koppling.open("wordtest.mdb") ELLER koppling.open("driver={microsoft access driver (*.mdb)}; dbq="&server.mappath("wordtest.mdb")) sql="delete * from tbwordtest where id=" & id & ";" koppling.execute(sql) response.redirect("tabort2.asp") koppling.close set koppling=nothing %> ``` Vad kan det vara för fel jag har gjort? Permalänk: https://www.webforum.nu/p/87970 ## #2 — SteveP, 2003-10-08T09:23Z Ligger textfältet "id" innanför \ taggen på den förra sidan? Annars kan du inte använda request.form ``` <% option explicit%> <% dim koppling, sql, id id=request.form("id") set koppling=server.createobject("adodb.connection") ' koppling.open("wordtest.mdb") ELLER koppling.open("driver={microsoft access driver (*.mdb)}; dbq="&server.mappath("wordtest.mdb")) [b]sql="delete * from tbwordtest where id=" & id[/b] koppling.execute(sql) response.redirect("tabort2.asp") koppling.close set koppling=nothing ``` Permalänk: https://www.webforum.nu/p/1179724 ## #3 — January, 2003-10-08T09:29Z Tack för ditt snabba svar. Nej, id ligger inte i \>form\>. Koden ser ut på detta sätt: ``` <% option explicit %> <% dim id id=request.querystring("id") dim koppling dim sql dim rslista set koppling=server.createobject("adodb.connection") 'koppling.open("koppladbwordtest") ELLER koppling.open("driver={microsoft access driver (*.mdb)}; dbq="&server.mappath("wordtest.mdb")) sql="select * from tbwordtest where id="& id &";" set rslista=koppling.execute(sql) %> Svar från: <%=rslista("anvnamn")%> <%=rslista("fnamn")%> <%=rslista("enamn")%> den <%=rslista("datum")%> kl <%=rslista("tid")%>

Fråga 1, <%=rslista("fraga1")%>
Fråga 2, <%=rslista("fraga2")%>
Fråga 3, <%=rslista("fraga3")%>
Fråga 4, <%=rslista("fraga4")%>
Fråga 5, <%=rslista("fraga5")%>
Fråga 6, <%=rslista("fraga6")%>
Fråga 7, <%=rslista("fraga7")%>
Fråga 8, <%=rslista("fraga8")%>
Fråga 9, <%=rslista("fraga9")%>
Fråga 10, <%=rslista("fraga10")%>

Tillbaka till listan

Ta bort <% koppling.close set koppling=nothing %> ``` Permalänk: https://www.webforum.nu/p/1179729 ## #4 — SteveP, 2003-10-08T09:31Z Ok men då ska du inte använda Request.form utan Request.Querystring eftersom länken är tabort.asp?id=\<%=id%\> Du använder Request.form om du vill hämta ett värde som ligger i ett textfält. t ex: ``` ``` Men du använder Request.Querystring om du vill hämta ett värde som ligger i en adress t ex: ``` ``` ``` <% option explicit%> <% dim koppling, sql, id id=Request.Querystring("id") set koppling=server.createobject("adodb.connection") ' koppling.open("wordtest.mdb") ELLER koppling.open("driver={microsoft access driver (*.mdb)}; dbq="&server.mappath("wordtest.mdb")) sql="delete * from tbwordtest where id=" & id koppling.execute(sql) response.redirect("tabort2.asp") koppling.close set koppling=nothing ``` Permalänk: https://www.webforum.nu/p/1179731 ## #5 — January, 2003-10-08T09:38Z Hmmm, det funkar inte riktigt nu heller. Jag får upp följande felmeddelande: Microsoft OLE DB Provider for ODBC Drivers error '80040e14' \[Microsoft\]\[ODBC Microsoft Access Driver\] Syntax error (missing operator) in query expression 'id='. tabort.asp, line 15 Vad kan det bero på då? Permalänk: https://www.webforum.nu/p/1179735 ## #6 — SteveP, 2003-10-08T09:41Z Du verkar inte få med dig något värde? Byt till ``` " onClick="alert('ÄR det säkert att du vill ta bort den här posten?;"> Ta bort ``` Om kolumnen heter "id" Permalänk: https://www.webforum.nu/p/1179738 ## #7 — January, 2003-10-08T09:50Z Hmmm, det funkar inte alls. Får nu upp detta felmeddelande: Microsoft VBScript runtime error '800a01c2' Wrong number of arguments or invalid property assignment Jag har iof kvar onClick confirm och inte alert för jag vill att man ska kunna välja ok eller avbryt.... Permalänk: https://www.webforum.nu/p/1179743 ## #8 — SteveP, 2003-10-08T09:51Z Det spelar ingen roll. Du måste kolla så du får med nåt värde i querystringen. Permalänk: https://www.webforum.nu/p/1179744 ## #9 — January, 2003-10-08T14:25Z Vet inte vad felet är nu har jag ändrat till den senaste koden och då kommer följande felmeddelande upp: Microsoft VBScript runtime error '800a01c2' Wrong number of arguments or invalid property assignment visa2.asp, line 61 Något förslag på vad det kan bero på eller vad det betyder? Permalänk: https://www.webforum.nu/p/1179930 ## #10 — Palle, 2003-10-08T14:29Z Tips: Visa alltid den aktuella koden som ger dig fel samt markera vilken rad felet pekar mot. Det är helt omöjligt för oss att hjälpa dig annars. Permalänk: https://www.webforum.nu/p/1179934 ## #11 — January, 2003-10-08T14:47Z Jag har nu på sidan visa2.asp denna kod: ``` <% option explicit %> <% dim id id=request.querystring("id") dim koppling dim sql dim rslista set koppling=server.createobject("adodb.connection") 'koppling.open("koppladbwordtest") ELLER koppling.open("driver={microsoft access driver (*.mdb)}; dbq="&server.mappath("wordtest.mdb")) sql="select * from tbwordtest where id="& id &";" set rslista=koppling.execute(sql) %> Svar från: <%=rslista("anvnamn")%> <%=rslista("fnamn")%> <%=rslista("enamn")%> den <%=rslista("datum")%> kl <%=rslista("tid")%>

Fråga 1, <%=rslista("fraga1")%>
Fråga 2, <%=rslista("fraga2")%>
Fråga 3, <%=rslista("fraga3")%>
Fråga 4, <%=rslista("fraga4")%>
Fråga 5, <%=rslista("fraga5")%>
Fråga 6, <%=rslista("fraga6")%>
Fråga 7, <%=rslista("fraga7")%>
Fråga 8, <%=rslista("fraga8")%>
Fråga 9, <%=rslista("fraga9")%>
Fråga 10, <%=rslista("fraga10")%>

Tillbaka till listan

" onClick="alert('Vill du verkligen ta bort den här posten?;")>Ta bort <% koppling.close set koppling=nothing %> ``` och på sidan tabort.asp där posten ska tas bort denna kod: ``` <% option explicit%> <% dim koppling, sql, id id=Request.Querystring("id") set koppling=server.createobject("adodb.connection") ' koppling.open("wordtest.mdb") ELLER koppling.open("driver={microsoft access driver (*.mdb)}; dbq="&server.mappath("wordtest.mdb")) sql="delete * from tbwordtest where id=" & id koppling.execute(sql) response.redirect("tabort2.asp") koppling.close set koppling=nothing %> ``` Felmeddelandet jag får är nu på rad 56 (har tagit bort en del tomma rader)... Och det står då: Microsoft VBScript runtime error '800a01c2' Wrong number of arguments or invalid property assignment visa2.asp, line 56 Så det är något skumt i länk-koden som jag inte lyckas få till men har testat alla förslag jag fått ovan och ändrat så är det någon som vet hur jag ska få till det så blir jag väldigt glad... Permalänk: https://www.webforum.nu/p/1179951 ## #12 — Palle, 2003-10-08T15:00Z ``` [red]<%rslista("id")%>[/red] ``` Borde nog vara: ``` [red]<%= rslista("id") %>[/red] ``` Permalänk: https://www.webforum.nu/p/1179960 ## #13 — January, 2003-10-08T15:05Z Det funkar nu, tack så jättemycket för hjälpen allihopa. Kram på er!!! Permalänk: https://www.webforum.nu/p/1179972 ## #14 — January, 2003-10-08T15:16Z Har ytterligare en fråga gällande det här nu... Jag har ju fått det att fungera när jag har en alertbox som visas och frågar om jag vill ta bort koden ser ut så här: ``` " onClick="alert('Vill du verkligen ta bort den här posten?');">Ta bort ``` Men jag vill att det ska komma upp en confirmbox när jag klickar på tabort där jag kan välja att klicka på avbryt för att då komma tillbaka till sidan och om jag klickar på ok så ska jag komma till sidan tabort.asp Permalänk: https://www.webforum.nu/p/1179986 ## #15 — January, 2003-10-08T15:17Z Måste jag lägga in det som JavaScript längst upp på sidan med en if-sats? Permalänk: https://www.webforum.nu/p/1179988 ## #16 — Palle, 2003-10-08T15:24Z Då får du anropa confirm istället, ex. ``` [red]" onClick="return confirm('Vill du verkligen ta bort den här posten?');">Ta bort[/red] ``` Permalänk: https://www.webforum.nu/p/1179992 ## #17 — January, 2003-10-08T15:27Z Tack, du är en ängel... Permalänk: https://www.webforum.nu/p/1179995 ## #18 — Palle, 2003-10-08T15:33Z Np! :bire Bara ett tips: Du skall acceptera det svaret i tråden som löste ditt problem, detta för att underlätta sökningar på uppklarade trådar, inte bara markera ett svar ur mängden. :) Var det många frågor som du fick svar på i tråden, markera då det svar som löste din först skapade fråga. Permalänk: https://www.webforum.nu/p/1179999 ## #19 — January, 2003-10-08T15:37Z Ok, då är det ingen idé att acceptera här då eftersom det är flera svar som gjort att jag löst problemet... Permalänk: https://www.webforum.nu/p/1180003 --- Tråden på webben: https://www.webforum.nu/amne/asp/87970-borttagning-av-en-post