---
title: "problem med eof om inte data finns"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/165755-problem-med-eof-om-inte-data-finns"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "WebbisNet"
published: "2007-10-23T17:00:54.000Z"
updated: "2007-10-23T23:45:08.000Z"
replies: 14
views: 950
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/165755-problem-med-eof-om-inte-data-finns"
---

# problem med eof om inte data finns

## #1 — WebbisNet, 2007-10-23T17:00Z

Detta ska väl skriva ut text om det inte finns data i tabellen

```
<%if showAll.EOF or showAll.BOF THEN
Response.Write "Inga medlemmar har klottrat än"
else
do until showAll.eof%>
<!--#include virtual="/Skriva/klotter/inlaggen.asp"-->
<%showAll.MoveNext: Loop
END IF%>
```

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

## #2 — @nders, 2007-10-23T17:08Z

> Detta ska väl skriva ut text om det inte finns data i tabellen

Nej. Vad som finns i "tabellen" är irrelevant. Recordsetet däremot; ja.

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

## #3 — WebbisNet, 2007-10-23T17:19Z

> **@nders skrev:**
>
> > Detta ska väl skriva ut text om det inte finns data i tabellen
>
> Nej. Vad som finns i "tabellen" är irrelevant. Recordsetet däremot; ja.

men vad gör jag för fel när det inte skrivs ut nåt meddelande när mitt rs är tomt, tabellen är tom så det finns inga poster att returnera

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

## #4 — Peter S, 2007-10-23T17:22Z

Öppnar du recordsetet?

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

## #5 — Ladytron, 2007-10-23T17:27Z

Såvida sidan fungerar som den ska så skriver den antingen ut texten eller inkluderar filen. Det kanske är så att recordsetet inte är tomt?

Sen vill jag också anmärka på det där med include. Du kan inte lägga in det sådär eftersom include-filerna alltid körs innan ASP-koden. Använd istället Server.Execute. Kan vara det som ställer till allting.

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

## #6 — WebbisNet, 2007-10-23T17:37Z

Hur hanterar man Server.Execute, testade med

```
<%if showAll.EOF or showAll.BOF THEN
Response.Write "Inga medlemmar har klottrat än"
else
do until showAll.eof
Server.Execute "/Skriva/klotter/inlaggen.asp"
showAll.MoveNext: Loop
END IF%>
```

 och fick samma rs-fel som innan

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

## #7 — @nders, 2007-10-23T17:43Z

Varför ska du inkludera eller exekvera en fil mitt i loopen? Låter helt fel.
Vad menar du med "samma rs-fel som innan"?

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

## #8 — WebbisNet, 2007-10-23T17:45Z

> **@nders skrev:**
>
> Varför ska du inkludera eller exekvera en fil mitt i loopen? Låter helt fel.
> Vad menar du med "samma rs-fel som innan"?

för att inte ha en jäkla massa rader kod för klottret så har jag en del i includes för att lättare kunna felsöka om nåt händer, så därför vill jag göra på det här sättet om man nu kan göra så

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

## #9 — Ladytron, 2007-10-23T17:49Z

Men det förklarar inte varför du vill inkludera inlagg.asp lika många gånger som du har poster i recordsetet?

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

## #10 — WebbisNet, 2007-10-23T17:57Z

När jag lägger in en rad så det är inte tomt så funkar 

```
<%do until showAll.eof %>
<tr>
<td rowspan="2" valign="top">
<a href="JavaScript:Pic(<%=showAll("userID")%>);">
<%If showAll("fotovalidering") = 1 Then%>
 <img src="/images/users/valideringsbild.jpg" width="40" height="50" border="0" />
 <%Else%>
  <img src="/images/users/<%=showAll("picture")%>" width="40" height="50" border="0" />
  <%End If%>

</a>
</td>
<td valign="top">
<table cellpadding="0" cellspacing="0" border="0" height="100%" class="presentation1">
<tr>
<td>
<strong class="definition">
<%if not showAll("userID") = 1 then%>
&nbsp;<a  href="/view.asp?userID=<%=showAll("userID")%>"><b><%=maketext(showAll("klottrare"))%></b></a>&nbsp; <%=showAll("sex")%>&nbsp;<%=alder(showAll("persnr"))%> år, <%=right(replace(showAll("klotterDatum"),"-",""),6)%>&nbsp;<%=showAll("klotterTime")%>
<%else%>
&nbsp;<b><%=showAll("klottrare")%></b>&nbsp; <%=maketext(showAll("sex"))%>&nbsp;<%=alder(showAll("persnr"))%> år,
<%=right(replace(showAll("klotterDatum"),"-",""),16)%>&nbsp;<%=showAll("klotterTime")%>
<%end if%>
&nbsp;<%if showAll("vip") = 1 then
response.write vipicon
End If%>
&nbsp;
	</strong>

<!--<a href="JavaScript: replyGB(<%=showAll("userID")%>,'<%=showAll("username")%>')";  title="Skicka gästboksinlägg till <%=showAll("username")%>">| GB</a>-->

<strong class="definition">
<%'if vipRS("vip") = 1 or pm2noVIP=true then%>
<!--<a href="replymail.asp?userID=<%=showAll("userID")%>"  title="Skicka PM till <%=showAll("username")%>">| PM</a>-->
<%'end if%>
<!--<a href="/Gallery/?userID=<%=showAll("userID")%>&usr=<%=showAll("username")%>"   title="Kika i <%=showAll("username")%>s galleri">| Bildgalleri |</a>-->
&nbsp;<span style="font-family:Arial, Helvetica, sans-serif; font-size:13px; font-weight:normal;">Inlägg: <%=showAll("klotterID")-108%></span>&nbsp;
<%if showAll("sms") = 1 then
response.write "<td><b>SMS-klotter</b></a></td>"
elseif showAll("wap") = 1 then
response.write "<td><b>WAP-klotter</b></a></td>"
end if%>
</strong>

 <strong class="definition"> <%=Round(showAll("poang"),2)%> poäng</strong>
</tr>
</table>

</td>
<td rowspan="2" valign="middle" width="30">
<strong class="definition">
<%if showAll("wap") = 1 then
response.write "<img src=""/images/icons/mobile.gif"">"
elseif showAll("sms") = 1 then
response.write "<img src=""/images/icons/cellphone.gif"">"
end if%>
</td>
<td rowspan="2" valign="middle" width="100">
<%if showAll("inloggad") = 1 then%>
<font color="green">Online</font>
<%else%>
<font color="red">Offline</font>
</strong>
<%end if%>

<strong class="definition">
<%Set adminRS=objConn.Execute("Select * from tblUsers Where userID="& UserID)
if adminRS("admin") = 1 or adminRS("moderator") = 1 then%>
<br>
<a  href="delKlotter.asp?id=<%=showAll("klotterID")%>">Radera</a>
<br>
<a  href="blockera.asp?id=<%=showAll("userID")%>">Blockera</a>
<br>
<a  href="editKlotter.asp?ID=<%=showAll("klotterID")%>">Redigera</a>
<%end if%>
</strong>
</td>
</tr>
<tr>
<td valign="top" align="left" colspan="2" style="padding:3px;" valign="top">
<strong class="definition">
<%If showAll("vip") = 1 Then
textToCheck=convertLink(replace(maketext(makeHtml(showAll("klotterText"))),vbCrLf,"<br>")) &""
Else
textToCheck=replace(showAll("klotterText"),vbCrLf,"<br>") &""
End If

Response.write cutBadwords(readall,textToCheck)%>
</strong>
</td>
</tr>
<tr>
<td valign="bottom" colspan="3">
<hr style="border-style:dotted; border-width:1px; border-color:#61a1b2;%>">
</td>
</tr>
<%showAll.MoveNext: Loop%>
```

och 

```
<%do until showAll.eof
<!--#include virtual="/Skriva/klotter/inlaggen.asp"-->
<%showAll.MoveNext: Loop
END IF%>
```

De gör precis samma sak men den andra är smidigare fast ingen har nån kontroll för om rs är tomt

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

## #11 — WebbisNet, 2007-10-23T17:58Z

> **Ladytron skrev:**
>
> Men det förklarar inte varför du vill inkludera inlagg.asp lika många gånger som du har poster i recordsetet?

Det var lite feltänkt erkänner jag men jag vill kunna ha exempel 2 som är smidigare med en kontroll om rs är tomt, om det nu går att ha

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

## #12 — voigtann1, 2007-10-23T17:58Z

include kan inte vara inne i en \<% %\> tagg... + varför ladda in samma data för varje loop du gör? verkligen inte något som kommer att fungera om du har funktioner i din include.

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

## #13 — Ladytron, 2007-10-23T19:35Z

Det är väl inte krångligare än såhär?

\<%
If showAll.EOF OR showAll.BOF Then
Response.Write "Inga medlemmar har klottrat än"
Else
Server.Execute("fil.asp")
End If
%\>

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

## #14 — WebbisNet, 2007-10-23T23:35Z

samma sak med denna del, jag får
	 error '80020009'

/senasteInloggade.asp, line 61 

med denna kod

```
<%if latest.eof then
response.write "Inga poster"
Else
do until latest.EOF%>
<table cellpadding="0" cellspacing="0" border="0">
<tr>
<%if UserID = 1 and not latest("userID") = 1 then%>
<td valign="top" align="left" width="40">
<a  href="index.asp?delete=user&userID=<%=latest("userID")%>">x</a>
</td>
<%end if%>

<td width="70" align="left">
 <%if not latest("userID") = 1 then
if latest("picture") = "noPic.jpg" or latest("picture") = "nopic.jpg" or latest("picture") = "" or latest1("picture") = "kelsjuk.jpg" then%>
&nbsp;
 <%else%>
<a  href="JavaScript: Pic(<%=latest("userID")%>);">Visa bild</a>
<%end if
end if%>
 </td>

<td width="80">
<%if not latest("userID") = 1 then

if latest("vip") = 1 then
response.write vipicon
End If

If latest("Sex") = "M" Then
	 Response.Write maleIcon
ElseIf latest("Sex") = "F" Then 
	Response.Write femaleIcon
Else 
	Response.Write coupleIcon
End If%>
</td>
<td width="120">
<a href="/view.asp?userID=<%=latest("userID")%>" onmouseover="return escape('<table><tr><td class=presentation1 align=center colspan=2>Info om <%=latest("username")%></td></tr><td class=presentation width=150 valign=top>Ålder: <%=alder(latest("persnr"))%><br>Söker: <%=latest("sokerItem")%><br>Civilstatus: <%=latest("statusItem")%><br>Personlighet: <%=latest("personlighetItem")%></td><td align=right valign=top><img src=\'/images/users/<%=latest("picture")%>\' height=\'80\' width=\'70\'></td></tr></table>')" >

<%usr = latest("username")
if len(usr) > 20 then usr = Left(usr, 20) & ".."
if latest("inloggad") = 1 then
  response.write "<span style=""color: definition;"">" & usr &"</strong>"
else
  response.write usr
end if
End If%>
</b></a>
</td>
<td align="left" width="140">
<strong class="definition">
<%if not latest("userID") = 1 then

if not TStamp = "" then
response.write right(replace(latest("Tstamp"),"-",""),15)
else
Ingen post
end if
end if%>
</strong>
</td>

<%if latest("userID") <> 1 then%>
<td width="240">
<strong class="definition">
<%=latest("city")%> i <%=latest("community")%>
</td>
<td width="30">
<%If latest("validUser") = 1 Then
	 Response.Write "<img src=""/images/lock-small.gif"">"
End If%>
</strong>
</td>
<%end if%>
</tr>
</table>
<%latest.MoveNext: Loop
end if%>
```

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

## #15 — colione, 2007-10-23T23:45Z

<http://classicasp.aspfaq.com/general/why-do-i-get-80020009-errors.html>

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/165755-problem-med-eof-om-inte-data-finns