--- title: "Fattar inte vad felet är!!!" type: "forum-thread" url: "https://www.webforum.nu/amne/asp/12291-fattar-inte-vad-felet-är" topic: "ASP" topic_url: "https://www.webforum.nu/amne/asp" author: "Gimbo" published: "2001-10-25T18:01:00.000Z" updated: "2001-10-26T05:00:00.000Z" replies: 19 views: 270 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/12291-fattar-inte-vad-felet-är" --- # Fattar inte vad felet är!!! ## #1 — Gimbo, 2001-10-25T18:01Z Jag får detta felmeddelande: ``` ADODB.Recordset fel '800a0cc1' Objektet kunde inte hittas i mängden med det begärda namnet eller numret. /ska/forum/default.asp, rad 76 ``` Och kodraderna ser ut så här: ``` <% Set Connect = Server.CreateObject("ADODB.Connection") Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("..\db.mdb")&";" Set RecSet = Server.CreateObject("ADODB.Recordset") Addera = "Select * From personligt ORDER BY datum DESC" RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic Do Until RecSet.EOF If RecSet("ref_id") = 0 Then id = RecSet("id") %> ``` Permalänk: https://www.webforum.nu/p/12291 ## #2 — LarsG, 2001-10-25T18:05Z Antingen så finns inte ref_id eller id i tabellen personligt. ``` If RecSet("ref_id") = 0 Then id = RecSet("id") ``` Permalänk: https://www.webforum.nu/p/292937 ## #3 — Gimbo, 2001-10-25T18:30Z ref_id finns inte men vart i tabellen ska jag lägga den?? spelar det ngn roll i vilken följd? alltså om den ska vara sist i tabellen eller? Permalänk: https://www.webforum.nu/p/292938 ## #4 — LarsG, 2001-10-25T18:35Z Ordningen har ingen betydelse. Permalänk: https://www.webforum.nu/p/292939 ## #5 — Gimbo, 2001-10-25T18:38Z har lagt till det där och nu får jag detta felmedelande i en annan fil: ``` Microsoft OLE DB Provider for ODBC Drivers fel '80040e14' [Microsoft][Drivrutin för ODBC Microsoft Access] Syntaxfel (operator saknas) i frågeuttrycket 'id='. /ska/forum/inlagg.asp, rad 13 ``` kod raden ser ut så här: ``` <% ID2 = Request.QueryString("id") Set Connect = Server.CreateObject("ADODB.Connection") Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("..\db.mdb")&";" Set RecSet = Server.CreateObject("ADODB.Recordset") Addera = "Select * From personligt WHERE id="&ID2 RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic %> ``` Permalänk: https://www.webforum.nu/p/292940 ## #6 — @nders, 2001-10-25T18:42Z Då har inte Request.Querystring("id") något värde. Var kommer det ifrån? Länk? Formulär? Permalänk: https://www.webforum.nu/p/292941 ## #7 — jorgen, 2001-10-25T18:43Z Hej! Kan bero på flera orsaker. Request.QueryString("id") innehåller inget värde. Eller är id av texttyp. mvh Jörgen :) Permalänk: https://www.webforum.nu/p/292942 ## #8 — LarsG, 2001-10-25T18:43Z Det verkar som ID2 är en tom sträng dvs att querystring inte innehåller någon variabel som heter id. Permalänk: https://www.webforum.nu/p/292943 ## #9 — cHeMiCaL-X, 2001-10-25T18:44Z Skall det inte vara &-tecken på båda sidor av ID2 ? Permalänk: https://www.webforum.nu/p/292944 ## #10 — @nders, 2001-10-25T18:46Z > Skall det inte vara &-tecken på båda sidor av ID2 ? &-tecken används när man skall lägga ihop, konkatenera, strängar. Här behöver vi inte lägga till någon sträng efter ID2, och således behöver vi inte heller något &-tecken. Mvh, Permalänk: https://www.webforum.nu/p/292945 ## #11 — Gimbo, 2001-10-25T18:49Z så här ser hela min fil ut: ``` <% Set Connect = Server.CreateObject("ADODB.Connection") Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("..\db.mdb")&";" Set RecSet = Server.CreateObject("ADODB.Recordset") Addera = "Select * From personligt" RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic RecSet.AddNew RecSet("namn") = Request.Form("namn") RecSet("epost") = Request.Form("epost") RecSet("rubrik") = Request.Form("rubrik") RecSet("inlagg") = Request.Form("inlagg") RecSet("datum") = Now RecSet("ipnummer") = Request.ServerVariables("REMOTE_ADDR") If Request.QueryString("ID") = "svar" Then RecSet("ref_id") = Request.QueryString("ref_id") End If RecSet.Update RecSet.Close If Request.QueryString("ID") = "svar" Then Set RecSet = Server.CreateObject("ADODB.Recordset") Addera = "Select * From personligt WHERE id="&Request.QueryString("ref_id") RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic svar = RecSet("antalsvar") RecSet("antalsvar") = svar + 1 RecSet.Update RecSet.Close End If Connect.Close Response.Redirect "default.asp" %> ``` det är den filen som man lägger till en post i forumet och här e filen som det e knas med: ``` <% ID2 = Request.QueryString("id") Set Connect = Server.CreateObject("ADODB.Connection") Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("..\db.mdb")&";" Set RecSet = Server.CreateObject("ADODB.Recordset") Addera = "Select * From personligt WHERE id="&ID2 RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic %> Läser Svar
<%=RecSet("rubrik")%>
Skrivet av: <%=RecSet("namn")%>
Epost: "><%=RecSet("epost")%>
Datum: <%=RecSet("datum")%>
Ip nummer: " target="_blank"><%=RecSet("ipnummer")%>
<%=Replace(TRIM(Server.HTMLEncode(RecSet("inlagg"))),vbcrlf,"
")%>


<% If RecSet("antalsvar") > 0 Then RecSet.Close Set RecSet = Server.CreateObject("ADODB.Recordset") Addera = "Select * From personligt ORDER BY datum DESC" RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic %> <% Do Until RecSet.EOF If int(RecSet("ref_id")) = int(ID2) Then %> <% End If RecSet.MoveNext Loop %>
Svar på detta inlägg
Rubrik Namn
Datum
"><%=RecSet("rubrik")%> <%=RecSet("namn")%>
<%=RecSet("datum")%>
<%End If%>
Svara på detta inlägg:
Namn
Epost
Rubrik
Fråga/inlägg


<%RecSet.Close Connect.Close %> Tillbaka ``` Snälla tror ni att ni kan hitta felet... Permalänk: https://www.webforum.nu/p/292946 ## #12 — @nders, 2001-10-25T18:52Z Om du berättar vad det är för knas / knasmeddelande så är det lättare att hjälpa dig. :-) Mvh, Permalänk: https://www.webforum.nu/p/292947 ## #13 — Gimbo, 2001-10-25T18:55Z felet är som nämnts tidigare dvs: ``` Microsoft OLE DB Provider for ODBC Drivers fel '80040e14' [Microsoft][Drivrutin för ODBC Microsoft Access] Syntaxfel (operator saknas) i frågeuttrycket 'id='. /ska/forum/inlagg.asp, rad 13 ``` Permalänk: https://www.webforum.nu/p/292948 ## #14 — @nders, 2001-10-25T18:56Z Och knaset är att Request.Querystring("id") är tom. Varifrån ska den komma? Permalänk: https://www.webforum.nu/p/292949 ## #15 — Gimbo, 2001-10-25T18:58Z kanske från den här filen?? jag vet inte hur ska jag fixa det... ``` Asp Forumet
Asp forumet

<% Set Connect = Server.CreateObject("ADODB.Connection") Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("..\db.mdb")&";" Set RecSet = Server.CreateObject("ADODB.Recordset") Addera = "Select * From personligt ORDER BY datum DESC" RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic Do Until RecSet.EOF If RecSet("ref_id") = 0 Then id = RecSet("id") %> <% Set RecSet2 = Server.CreateObject("ADODB.Recordset") Addera = "Select * From personligt ORDER BY datum DESC" RecSet2.Open Addera, Connect, adOpenStatic, adLockOptimistic Do Until RecSet2.EOF If id = RecSet2("ref_id") Then id2=RecSet2("id") %> <% End If RecSet2.MoveNext Loop %> <%End If RecSet.MoveNext Loop %>
Rubrik Namn
Datum
<%If Recset("datum") > Now-3 Then%> Nytt <%End If%> <%=RecSet("rubrik")%> <%=RecSet("namn")%>
<%=RecSet("datum")%>
  -svar-> <%=RecSet2("rubrik")%> <%=RecSet2("namn")%>
<%=RecSet2("datum")%>
Lägg till ett inlägg:
Namn
Epost
Rubrik
Fråga/inlägg

``` Permalänk: https://www.webforum.nu/p/292950 ## #16 — @nders, 2001-10-25T19:01Z För att Request.Querystring("id") skall ha ett värde så måste du ju anropa asp-filen på det sättet, genom att antingen skapa en länk som ser ut som "blabla.asp?id=23" där 23 är värdet som ID2 ska ha, eller direkt skriva in det i adressraden i webbläsaren. Vad vill du att det ska vara för värde? Var vill du att det ska komma ifrån? Permalänk: https://www.webforum.nu/p/292951 ## #17 — Gimbo, 2001-10-25T19:02Z det är ett forum jag försöker att bygga på nytt... Permalänk: https://www.webforum.nu/p/292952 ## #18 — jorgen, 2001-10-25T19:09Z Hej! Varifrån i koden kommer värdet som **Request.Querystring("id")** ska innehålla? mvh Jörgen ;) Permalänk: https://www.webforum.nu/p/292953 ## #19 — Gimbo, 2001-10-25T22:28Z Jag har ingen aning, alltså kan jag sudda ut den raden och få forumet att fungera, eller ska jag lägga t till ngn rad?? och isådana fall vad?? Jag tror felet ligger i min databas fortfarande och inte i själva koden... min databas bestå av tabellen presentation och kolumnerna: ID, Namn, epost, rubrik, inlagg, datum, ipnummer, ref_id Jag tror det är den där ref_id som spökar, eller vad säger ni? Permalänk: https://www.webforum.nu/p/292954 ## #20 — @nders, 2001-10-26T05:00Z ``` If RecSet("ref_id") = 0 Then id = RecSet("id") %> <%If Recset("datum") > Now-3 Then%> Nytt <%End If%> <%=RecSet("rubrik")%> ``` Jag antar att det är denna länk som strular. När du klickar på länken, står det då *inlagg.asp?id=* eller *inlagg.asp?id=23*, där 23 är postens id i tabellen? det känns dessutom som *If RecSet("ref_id") = 0 Then id = RecSet("id")* skall stå på en och samma rad, liksom den jämförelsen med RecSet2. Alltså: ``` If RecSet("ref_id") = 0 Then id = RecSet("id") ``` respektive ``` If id = RecSet2("ref_id") Then id2=RecSet2("id") ``` Nu måste jag pysa, men jag kollar in senare. **Red**: Nu har jag kommit till jobbet, och undrar då genast vad dessa två if-satser gör. Det känns som att det händer att variabeln id kanske aldrig får ett värde. Mvh, Permalänk: https://www.webforum.nu/p/292955 --- Tråden på webben: https://www.webforum.nu/amne/asp/12291-fattar-inte-vad-felet-är