Loop med 2 rs?

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

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.

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

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

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... ;)

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

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

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>"

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.