--- title: "Fel meddelande men varför?" type: "forum-thread" url: "https://www.webforum.nu/amne/asp/13231-fel-meddelande-men-varför" topic: "ASP" topic_url: "https://www.webforum.nu/amne/asp" author: "FIgg3" published: "2001-12-17T18:04:00.000Z" updated: "2001-12-17T18:53:00.000Z" replies: 3 views: 143 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/13231-fel-meddelande-men-varför" --- # Fel meddelande men varför? ## #1 — FIgg3, 2001-12-17T18:04Z Tjii tjooo... Jag får detta fel meddelandet ``` ADODB.Field fel '80020009' Antingen är BOF eller EOF satt till True, eller så har aktuell post raderats. Den begärda åtgärden kräver en aktuell post. ? ``` Men databasen är ej tom men det är dock min hjärna på ideer så om ni har lite föeslag så tages de i mot mer än gärna Här har ni lite kod också hoppas den ej är för rörig bara... ``` forum

 

 

 

 

 

 

 

 

 

<% ' variabler id = Request.QueryString("id") databas = Server.MapPath("forum.mdb") ' öppnar databasen Set Connect = Server.CreateObject("ADODB.Connection") Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& databas ' Öppnar Tabellen Set RecSet = Server.CreateObject("ADODB.Recordset") SQL = "SELECT * FROM forum WHERE ID LIKE '"& id &"'" RecSet.Open SQL, Connect, adOpenStatic, adLockOptimistic %>
<%=RecSet("rubrik")%> Namn: <%IF (RecSet("Namn")) = "4545" THEN Response.write "FIgg3" %> <%Else%> <% Response.write(Server.HTMLEncode(RecSet("Namn"))) %> <%End IF%> ">Mail
<%=date%>
"> <%=RecSet("meddelande")%>
<% ' Stänger databasen RecSet.Update RecSet.Close Connect.Close %> <%Else%> <% If RecSet("Svar") > 0 Then RecSet.Close Set RecSet = Server.CreateObject("ADODB.Recordset") SQL = "Select * From forum ORDER BY datum " RecSet.Open SQL, Connect, adOpenStatic, adLockOptimistic %>
<% If RecSet("Svar") = 0 Then %> Det finns inga svar på denna frågan än!!!
<% Do While Not RecSet.EOF If int(RecSet("reid")) = int(ID) Then %> <% End If RecSet.MoveNext Loop %>
<%=RecSet("rubrik")%> Namn: <%IF (RecSet("Namn")) = "4545" THEN Response.write "FIgg3" %> <%Else%> <% Response.write(Server.HTMLEncode(RecSet("Namn"))) %> <%End IF%> ">Mail
<%=date%>
<%=RecSet("meddelande")%>

 

 
<%End IF%> <%End IF%> ``` // Gog Jul Permalänk: https://www.webforum.nu/p/13231 ## #2 — LarsG, 2001-12-17T18:14Z Du bör alltid lägga in en kontroll efter det att du har öppnat ett recordset ``` RecSet.Open SQL, Connect, adOpenStatic, adLockOptimistic [b]if recset.eof then[/b] 'kod för att hantera att det är tomt else 'vanlig kod end if ``` Varför använder du like? Är inte id en numerisk kolumn? Permalänk: https://www.webforum.nu/p/300986 ## #3 — FIgg3, 2001-12-17T18:20Z Anledningen till att jag kör LIKE är för att jag hämtar bara info från ett ID med en Q string... ska testa det du sa se om ddset gör någon skillnad Permalänk: https://www.webforum.nu/p/300987 ## #4 — LarsG, 2001-12-17T18:53Z I så fall bör du använda = och inte like Permalänk: https://www.webforum.nu/p/300988 --- Tråden på webben: https://www.webforum.nu/amne/asp/13231-fel-meddelande-men-varför