---
title: "Får ont i huvudet!"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/42040-får-ont-i-huvudet"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Mekano"
published: "2002-04-19T12:58:07.000Z"
updated: "2002-04-19T15:31:55.000Z"
replies: 3
views: 249
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/42040-får-ont-i-huvudet"
---

# Får ont i huvudet!

## #1 — Mekano, 2002-04-19T12:58Z

Jag undrar om någon kan hjälpa mig med detta problem.
Jag får ett konstigt fel när jag tar bort en eller flera poster ur tabellen:
ADODB.Recordset (0x800A0BCD)
Antingen är BOF eller EOF satt till True, eller så har aktuell post raderats.
Den begärda åtgärden kräver en aktuell post.

Kommer inte på vad som är fel, har även testat att kopiera tabellen och lagt in ny data i den och får samma problem.
Har även testat att köra med ett On_Off fält men inte ville det funka heller.

```
<%
If visa = "alla" Or visa = "" Then
Set RecSet = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT ID, PKat_Namn, Bild, PKort_Beskr, On_Off FROM Kategori WHERE KatNav=1 ORDER BY PKat_Namn"
Set RecSet=Connect.Execute(SQL)
%>

<table width="536" border="0" cellspacing="0" cellpadding="0">
<% Numcols = 2 %>
<% If Not RecSet.EOF Then %>
<% Do Until RecSet.EOF %>
<tr valign="top">
<% For i=1 To Numcols %>
<td>
<% If RecSet.EOF Then %>
&nbsp;
<% Else %>
<font face="Verdana, Arial, Helvetica, sans-serif" size="4" color="#333333"><b><% =RecSet("PKat_Namn") %></b></font><br>
<font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#666666"><% =rad(RecSet("PKort_Beskr") ) %></font><br>
<a href="<% Request.ServerVariables("SCRIPT_NAME") %>?visa=detalj&CID=<% =RecSet("ID") %>&pnamn=<% =Server.URLEncode(RecSet("PKat_Namn") ) %>"><img src="prodbilder/<% =RecSet("Bild") %>_2.jpg" border="0">
<font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#CC3333">mer info </font><img src="bilder/pil.gif" width="12" height="7" border="0"></a><br>
<% End If %>
<% RecSet.MoveNext %>
</td>
<% Next %>
</tr>
<tr>
<td height="10" colspan="2"><img src="bilder/dott_534.gif" width="534" height="3"><br></td>
</tr>
<% Loop %>
</table>
<% End If %>
<% RecSet.Close %>
<% End If %>
```

Tabell = Kategori
Fält:
ID = Räknare (Primärnyckel)
KatNav = Tal
KatRel = Tal
PKat_Namn = Text
PKort_Beskr = Text
PLang_Beskr = Text
PCase_Bild = Text
On_Off = Ja/Nej
Bild = Text

Permalänk: https://www.webforum.nu/p/42040

## #2 — Mekano, 2002-04-19T14:02Z

Ingen?

Finns det ingen som har något tips?
Kan det vara EOF hanteringen??

Permalänk: https://www.webforum.nu/p/649726

## #3 — PatrikB, 2002-04-19T14:17Z

Testa detta:

```
<%
If RecSet.EOF Then
	[b]Exit Do[/b]
Else
 %>
```

om recordsetet är .EOF så ska man hoppa hur loopen för annars kommer ett fel att uppstå vid RecSset.MoveNext eftersom recordsetet var .EOF

cya
PatrikB

Permalänk: https://www.webforum.nu/p/649735

## #4 — Mekano, 2002-04-19T15:31Z

Tack o tack igen!

Nu funkar det fint, och man har lärt sig något nytt idag igen.

Trevlig helg!

Permalänk: https://www.webforum.nu/p/649867

---

Tråden på webben: https://www.webforum.nu/amne/asp/42040-får-ont-i-huvudet