---
title: "Hur får jag ut allt?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/150523-hur-får-jag-ut-allt"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "MrMojo"
published: "2006-08-25T07:39:14.000Z"
updated: "2006-08-25T10:10:13.000Z"
replies: 8
views: 536
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/150523-hur-får-jag-ut-allt"
---

# Hur får jag ut allt?

## #1 — MrMojo, 2006-08-25T07:39Z

Jag har denna kod:

```
<% IF (rs.Fields.Item("Veckodag").Value) = "Måndag" THEN Response.Write (rs.Fields.Item("dagens_inlagg").Value) & "<br>" END IF %>
```

 

Sen har jag samma kod längre ner på sidan igen fast med värdet "Tisdag". Men den visar inga poster. Varför inte?

Jag är trött och omotiverad. Hjälp!   x(

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

## #2 — @nders, 2006-08-25T07:39Z

Visa mer kod.

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

## #3 — MrMojo, 2006-08-25T07:40Z

Vad vill du se?

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

## #4 — @nders, 2006-08-25T07:41Z

Tja, från dess att du öppnar ställer sql-frågan, inkl. hela loopen, till exempel.

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

## #5 — MrMojo, 2006-08-25T07:49Z

Denna är inte helt 100, se min andra tråd om det...

```
<%
Dim rs
Dim rs_numRows

Set rs = Server.CreateObject("ADODB.Recordset")
rs.ActiveConnection = MM_XXX_STRING
rs.Source = "SELECT *  FROM meny_datum, meny  WHERE Startdatum = Date()  ORDER BY Startdatum Desc"
rs.CursorType = 0
rs.CursorLocation = 2
rs.LockType = 1
rs.Open()

rs_numRows = 0
%>
```

Ok, här är loopen.

```
<% 
While ((Repeat1__numRows <> 0) AND (NOT rs.EOF)) 
%>
                  <% IF (rs.Fields.Item("Veckodag").Value) = "Måndag" THEN Response.Write (rs.Fields.Item("dagens_inlagg").Value) & "<br>" END IF %>
                  <% 
  Repeat1__index=Repeat1__index+1
  Repeat1__numRows=Repeat1__numRows-1
  rs.MoveNext()
Wend
%>
```

Nästa loop ser ut så här:

```
<% 
While ((Repeat2__numRows <> 0) AND (NOT rs.EOF)) 
%>
                  <% IF (rs.Fields.Item("Veckodag").Value) = "Tisdag" THEN Response.Write (rs.Fields.Item("dagens_inlagg").Value) & "<br>" END IF %>
                  <% 
  Repeat2__index=Repeat2__index+1
  Repeat2__numRows=Repeat2__numRows-1
  rs.MoveNext()
Wend
%>
```

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

## #6 — @nders, 2006-08-25T08:12Z

När du har loopat igenom recordsetet för måndag är det eof. Det innebär att du inte kommer in i while-loopen för de andra dagarna. Om du nu måste loopa igenom samma recordset flera gånger, då måste du flytta upp markören överst innan du loopar de andra gångerna.

```
rs.MoveFirst
```

Eventuellt får du byta cursortype, om den du nu använder inte tillåter att du kör MoveFirst.

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

## #7 — MrMojo, 2006-08-25T09:03Z

Får inte fram sidan alls när jag ändrar till MoveFirst.

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

## #8 — @nders, 2006-08-25T09:37Z

Vadå "får inte fram sidan alls"?
Och vadå "ändrar till MoveFirst"? Du ska inte ändra till någonting. Du ska lägga till.

> **@nders skrev:**
>
> Eventuellt får du byta cursortype, om den du nu använder inte tillåter att du kör MoveFirst.

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

## #9 — MrMojo, 2006-08-25T10:10Z

Tack. Jag tänkte ju fel. Är såååååå trött. Det funkar nu i alla fall. Tack tack!   :birp

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/150523-hur-får-jag-ut-allt