---
title: "Loop med 2 rs?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/141871-loop-med-2-rs"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "timedia"
published: "2006-02-02T10:27:05.000Z"
updated: "2006-02-02T15:11:57.000Z"
replies: 7
views: 339
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/141871-loop-med-2-rs"
---

# Loop med 2 rs?

## #1 — timedia, 2006-02-02T10:27Z

Den loopar men skriver bara ut en 'titel'. Hur ska jag göra detta?

```
Set UserRecordset = Server.CreateObject("ADODB.Recordset")
Set UserRecordset2 = Server.CreateObject("ADODB.Recordset")

Name0 = Request.Cookies("interUID")

SQLString = "SELECT * FROM MemberRec WHERE MrMemberSignatur = '" & Name0 & "' ORDER BY MemberRecID"

  UserRecordset.Open SQLString, DatabaseConnection
  
  
  SQLString2 = "SELECT Id, Titel FROM Recension WHERE Id = " & objMemberFID

UserRecordset2.Open SQLString2, DatabaseConnection

Do While Not UserRecordset.EOF
'Set objMemberFID2 = UserRecordset2("Titel")
Response.Write "<a href='red_inlegg2.asp?ID=" & objMemberID & "'>Redigera</a> » "

Response.Write " " & UserRecordset2("Titel")

Response.Write "<br>"
UserRecordset.MoveNext

Loop 
UserRecordset.Close
UserRecordset2.Close

  DatabaseConnection.Close
```

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

## #2 — @nders, 2006-02-02T10:41Z

Jag kan inte se att varken *objMemberFID* eller *objMemberID* får sitt värde någonstans, så det borde inte fungera överhuvudtaget.

Anledningen till att bara en titel skrivs ut är enkel: du loopar ju inte ditt andra recordset överhuvudtaget. Dessutom skulle din kod må bra av lite schysst indentering.

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

## #3 — timedia, 2006-02-02T11:00Z

OK, men hur gör man när man ska loopa 2 rs samtidigt?

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

## #4 — Travoni, 2006-02-02T11:01Z

Du skulle inte behöva två recordset till det där.
Se bara till att du har ett unikt id i recentionstabellen som refererar till medlemmen. schysst indentering ----\>

```
Dim connection, rs
Set connection = "Ditt connectionobjekt"

Set rs = connection.execute("SELECT r.id,r.titel FROM MemberRec m INNER JOIN Recension ON r.id=m.MrMemberSignatur WHERE MrMemberSignatur = '"& Name0 &"'")

If not rs.eof then
	Do While not rs.eof
		Response.Write "<a href=""red_inlegg2.asp?ID=" & rs(0) & """>Redigera</a> » "& rs(1) & "<br>"
	rs.movenext
	Loop
Else
	Response.Write "Det finns inga poster!"
End if

rs.close : connection.close
```

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

## #5 — @nders, 2006-02-02T11:01Z

> OK, men hur gör man när man ska loopa 2 rs samtidigt?

Du har ju en *do while*\-loop. Lägg den andra loopen inne i den.

Travoni, du är för snäll... ;)

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

## #6 — Travoni, 2006-02-02T11:06Z

Visst, är jag. Dessutom med schysst indentering. ;)

Indentering gör mig kåååååålasugen...

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

## #7 — timedia, 2006-02-02T13:08Z

Tack, nu är jag nästan där.

```
Set rs = connection.execute("SELECT MrFilmID, MrMemberSignatur FROM MemberRec INNER JOIN Recension ON recension.id=MemberRec.MrFilmID WHERE MrMemberSignatur = '"& Name0 &"' ORDER BY Recension.titel")
```

Hur gör jag när jag vill skriva ut fältet 'Titel' som ligger i tabellen Recension? Detta funkar ju inte:

```
Response.Write "<a href=""red_inlegg2.asp?ID=" & rs(0) & """>Redigera</a> » "& [B]rs("recension.titel")[/B] & "<br>"
```

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

## #8 — J.N., 2006-02-02T15:11Z

HEJ!

Om du bara tar med titel i de fält du hämtar, kan du visa det med rs("titel").

Nu märker du också, kanske, problemet med att använda positioner i recordset, rs(0); när du lägger till andra fält kan det bli fel.

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/141871-loop-med-2-rs