---
title: "Hur gör man 2 loopar?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/57177-hur-gör-man-2-loopar"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "yerkin"
published: "2002-10-26T16:51:20.000Z"
updated: "2002-10-26T18:23:31.000Z"
replies: 2
views: 263
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/57177-hur-gör-man-2-loopar"
---

# Hur gör man 2 loopar?

## #1 — yerkin, 2002-10-26T16:51Z

Hej!!

Jag har försökt mig på ngt nytt idag, och det vill inte fungera..
:(
Hur gör man en loop i en annan loop?

Hur jag än gör så blir det fel....

Nedan har Ni min kod i nuvarande skick, utan en loop i loopen...
Tacksam för tips..

```
 strSQL = "SELECT * From tblkull, tblhund  WHERE tblkull.id = "& strID &" AND tblhund.fldkull = "& strID &""

        Set objrs = objdb.Execute(strSQL)

        'Kullens info finns i tabellen tblkull
        strRas = objRs("ras")
        dteDatum = objRs("Datum")
        strHane = objRs("Hane")
        strTik = objRs("Tik")
        strText = objRs("Text")
        'Valparnas namn och id finns i tabellen tblhund
        strValp = objRs("fldNamn")
        strValpID = objRs("fldID")
       
      
       response.write "<tr><td><b>Ras</b>: " & strRas & "</td></tr>"
       response.write "<tr><td><b>Datum</b>: " & dteDatum & "</td></tr>"   
       response.write "<tr><td><b>Hane</b>: " & strHane & "</td></tr>" 
       response.write "<tr><td><b>Tik</b>: " & strTik & "</td></tr>" 
       
             'Här vill jag loopa ut de valpar som har samma id som
             'denna kull.
             'Finns det inga valpar, så skrivs det inte ut ngt.
             'Så här borde jag börja med loopen men hur??             
              response.write "<tr><td><b>Valpar</b>: " & strValp & "</td></tr>" 
                   
          
      response.write "<tr><td><b>Tik</b>: " & strText & "</td></tr>"
 
      objRs.MoveNext
      objRs.Close
      objdb.close
```

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

## #2 — LarsG, 2002-10-26T17:38Z

```
strSQL = "SELECT * From tblkull left outer join tblhund " & _
" on tblkull.id = tblhund.fldkull WHERE tblkull.id = "& strID 

Set objRs = objdb.Execute(strSQL)

first = true
while not objRs.eof        
   if  first then
       response.write "<tr><td><b>Ras</b>: " & objRs("strRas") & "</td></tr>"
       response.write "<tr><td><b>Datum</b>: " & objRs("dteDatum") & "</td></tr>"   
       response.write "<tr><td><b>Hane</b>: " & objRs("strHane") & "</td></tr>" 
       response.write "<tr><td><b>Tik</b>: " & objRs("strTik") & "</td></tr>" 
       first = false
   end if     
   if not isnull(objRs("strValp") then response.write "<tr><td><b>Valpar</b>: " & objRs("strValp") & "</td></tr>" 
   objRs.MoveNext
wend
objRs.Close
objdb.close
```

Red: Felstavning

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

## #3 — yerkin, 2002-10-26T18:23Z

Tackar och bockar, det var snällt!
:)
Nu har man lärt sig ngt nytt
:)

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/57177-hur-gör-man-2-loopar