---
title: "Sortera ur databasen"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/10254-sortera-ur-databasen"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Flax"
published: "2001-06-25T14:15:00.000Z"
updated: "2001-06-26T06:50:00.000Z"
replies: 7
views: 305
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/10254-sortera-ur-databasen"
---

# Sortera ur databasen

## #1 — Flax, 2001-06-25T14:15Z

Jag har en databas med två tabeller. Den ena heter tex name och den andra location. Location kan antingen vara folder1, folder2 eller folder3. 

Jag vill sortera alla poster som finns i databasen så de skrivs ut så här:

Folder1:
  Name1.jpg
  Name2.jpg
Folder2:
  Name4.jpg
Folder3:
  Name3.jpg
  Name5.jpg

\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*\*
Detta är bara ett exempel men jag hoppas ni förstår. Så som jag har skrivit har vi alltså 5 olika ID med tillhörande värden. Jag vore tacksam för snabba svar och gärna ett kodexempel...

mvh Flax

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

## #2 — LarsG, 2001-06-25T14:34Z

Så här ungefär

```
dim connect,rs,location
set connect = server.createobject("adodb.connection")
connect.open dsn

set rs = connect.execute("select * from name n join location l on n.locationid = l.id order by location,name")

location = ""
while not rs.eof
  if  location <> rs("location") then
      location = rs("location")
      response.write location & ":<br>"
  end if
  response.write rs("name") & "<br>"
  rs.movenext
wend
rs.close
connect.close
```

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

## #3 — Flax, 2001-06-26T06:01Z

Jag tror att vi har missuppfattat varandra....

Jag har en massa värden i en tabell som ligger huller om buller. Jag vill tex bara skriva ut de som har ett visst värde, det kan man göra:

```
<%	Do Until RecSetb.EOF 
IF RecSetb("location")=RecSet("mapp") THEN
%>
<%=RecSetb("bildadress")%>
<%
ELSE
%>
<%
END IF
RecSetb.MoveNext
Loop
%>
```

Jag tror att man kan göra så här iaf...

hoppas...

När den har gått igenom alla, har den hittat alla där RecSetb("location") är lika med RecSet("mapp") men RecSetb("location") kan också vara annat än "RecSet("mapp"). Första gången den kör do until-loopen är RecSet("mapp") något, men sen när den kör om den "stora loopen"(är inte kod på den) ska den köra min lilla kodsnutt igen. Det gör den inte.

Jag tänkte att när den ska köra min kodsnutt igen är RecSet("mapp") något annat och den ska då igen söka efter när RecSet("mapp") är lika med RecSetb("location")...

Jag hoppas ni förstår vad jag menar... 

MVH Flax

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

## #4 — Flax, 2001-06-26T06:39Z

Jag har fixat järnet och nu ser det ut så här:

```
<table border=0 cellspacing=0 cellpadding=0>
<%	Do Until RecSet.EOF %>
<tr>
<td>
<font size="2" onClick="visa(h<% =RecSet("mapp") %> )" style="cursor:hand">
<b><% =RecSet("mapp") %></b>
</font>
</td>
</tr>
<tr id=h<% =RecSet("mapp") %> style="display:'none'">
<td>
<font face=Arial size=2>
<table border=0 cellspacing=0 cellpadding=0>
<tr>
<td width=5>&nbsp;</td>
<td><font face=Arial size=2>
<%	
dim ad
ad = RecSet("mapp")
Set RecSetb = Server.CreateObject("ADODB.Recordset")
bildinfo = "SELECT * FROM bildinfo WHERE location = 'mapp1' ORDER BY location"
RecSetb.Open bildinfo, Connect, adOpenStatic, adLockOptimistic
Do Until RecSetb.EOF 
%>
<%=RecSetb("bildadress")%><br>
<%
RecSetb.MoveNext
Loop
RecSetb.Close
%>
</font></td>
</tr>
</table>
</font>
</td>
</tr>
<%
RecSet.MoveNext
Loop
RecSet.Close
Connect.Close
%>
```

Nu skriver den ut allt som har location='mapp1' men jag vill att den ska skriva ut när location=RecSet("mapp")

Hur gör man då?

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

## #5 — Flax, 2001-06-26T06:41Z

```
dim ad
ad = RecSet("mapp")
```

Denna kod behövs ju inte, råkade bara lämna kvar den :)

Jag har försökt att sätta location=RecSet'mapp' och så men det går inte...

hjälp... ... ... ... .. .. . .

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

## #6 — @nders, 2001-06-26T06:46Z

```
bildinfo = "SELECT * FROM bildinfo WHERE location = '" & RecSet("Mapp") & "' ORDER BY location"
```

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

## #7 — Flax, 2001-06-26T06:47Z

@nders!

Tack så mycket! Det funkar finfint!!!

Faan va göött!!!!!

Tack!

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

## #8 — @nders, 2001-06-26T06:50Z

schysst! :)

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/10254-sortera-ur-databasen