---

Jeg kan ikke få dette til at virke !!
Hvis jeg ikke har præcis 3 eller 6 billeder kommer den med
følgende fejl.

Er der en som har en bedre løsning TAK


-----------------------------------------------------------------
-

ADODB.Field error '80020009'

Either BOF or EOF is True, or the current record has been
deleted. Requested operation requires a current record




-----------------------------------------------------------------
--



<table cellspacing="0" cellpadding="0" border="0" width="506">
<tr>
<td class="darkgray" align="left" height="18" width="10"><img
src="img/module/blank.gif" height="1" width="1" border="0"
alt=""></td>
<td colspan="5" class="darkgray" align="left" height="18">Klik på
billedet for at se detaljeret view</td>
<td class="darkgray" align="left" height="18" width="10"><img
src="img/module/blank.gif" height="1" width="1" border="0"
alt=""></td>
</tr>

<% dim LineCount
LineCount = 0 %>
<%
do while not rs.eof
%>

<% If LineCount = 0 Then %>
<tr>
<td align="center" valign="middle" height="100"
width="10"><%Response.Write LineCount%><img
src="img/module/blank.gif" height="1" width="1" border="0"
alt=""></td>
<td align="center" valign="middle" height="100" width="150"><a
href="showforslag.asp?id=<%=rs("id")%>"><img src=<%=rs("url")%>
width=120 border=1></a></td>

<% LineCount = 1
rs.movenext
end if
%>

<% if lineCount = 1 Then
%>

<td align="center" valign="middle" height="100"
width="18"><%Response.Write LineCount%><img
src="img/module/blank.gif" height="1" width="1" border="0"
alt=""></td>
<td align="center" valign="middle" height="100" width="150"><a
href="showforslag.asp?id=<%=rs("id")%>"><img src=<%=rs("url")%>
width=120 border=1></a></td>

<% LineCount = 2
rs.movenext
end if
%>


<% if lineCount = 2 Then %>
<td align="center" valign="middle" height="100"
width="18"><%Response.Write LineCount%><img
src="img/module/blank.gif" height="1" width="1" border="0"
alt=""></td>
<td align="center" valign="middle" height="100" width="150"><a
href="showforslag.asp?id=<%=rs("id")%>"><img src=<%=rs("url")%>
width=120 border=1></a></td>
<td align="center" valign="middle" height="100" width="10"><img
src="img/module/blank.gif" height="1" width="1" border="0"
alt=""></td>
</tr>
<%
LineCount = 0
end if
rs.movenext
loop
%>
</table>

<%
rs.Close
Set rs = Nothing
Conn.Close
Set Conn = Nothing
end if %>


--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials

---

On Tue, 12 Aug 2003 12:47:50 +0000 (UTC), henfr <henrik@eye4web.dk>
wrote:

>Jeg kan ikke få dette til at virke !!
>Hvis jeg ikke har præcis 3 eller 6 billeder kommer den med
>følgende fejl.
>-----------------------------------------------------------------
>ADODB.Field error '80020009'
>
>Either BOF or EOF is True, or the current record has been
>deleted. Requested operation requires a current record
>-----------------------------------------------------------------

Det er fordi du siger "rs.MoveNext" uden at checke, om du rent faktisk
har nået slutningen af recordsettet

Prøv i stedet:
<snip overskriftsrækken>

<% dim LineCount
LineCount = 0 %>
<%
do while not rs.eof
%>

<% If LineCount Mod 3 = 0 Then %>
<tr>
<% End If %>
<td align="center" valign="middle" height="100"
width="10"><%Response.Write LineCount%><img
src="img/module/blank.gif" height="1" width="1" border="0"
alt=""></td>
<td align="center" valign="middle" height="100" width="150"><a
href="showforslag.asp?id=<%=rs("id")%>"><img src=<%=rs("url")%>
width=120 border=1></a></td>

<% If LineCount Mod 3 = 0 Then %>
</tr>
<% End If
LineCount = LineCount + 1
rs.movenext
Loop
%>

- hvilket også sparer på gentagelserne.

"Tricket" er, at nøjes med ét loop, hvor du så kun skriver <tr> og
</tr>, hvis 3 går op i Linecount v. hj. a. Mod(modulus)-funktionen.

Du får så et problem med, at tabellen ikke udskriver de sidste to
celler, hvis der fx kun er ét billede i den sidste række. Prøv selv at
læse det problem
Hint: Check resultatet af LineCount Mod 3 ...


Good luck!

--
Jørn Andersen,
Brønshøj

---

---HAPS---

Tak for det. jeg vil lige kigge på det og se om jeg kan få det til at
virke

Henrik

--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials

---

On Tue, 12 Aug 2003 18:26:21 +0200, Jørn Andersen <jorn@jorna.dk>
wrote:

>Du får så et problem med, at tabellen ikke udskriver de sidste to
>celler, hvis der fx kun er ét billede i den sidste række. Prøv selv at
>læse det problem

Der skulle selvfølgelig stå "løse" ...

--
Jørn Andersen,
Brønshøj