---
title: "Problem med att lista bilder.."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/85347-problem-med-att-lista-bilder"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "tank82"
published: "2003-09-05T14:04:16.000Z"
updated: "2003-09-05T15:58:55.000Z"
replies: 20
views: 379
page: 1
pages: 2
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/85347-problem-med-att-lista-bilder"
---

# Problem med att lista bilder..

_Sida 1 av 2._

## #1 — tank82, 2003-09-05T14:04Z

Vad är det som är fel?  :q 

```
<% Session.LCID = 1053 %>
<%
strSQL = "SELECT FROM bilder01 ORDER BY bildnamn DESC"
Set objCon = Server.CreateObject("ADODB.Connection")
objCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("bilder.mdb")
Set objRS = objCon.Execute(strSQL)
%>

<% 
intCounter = 0
do until bilder.är.slut 
     intCounter = intCounter + 1
     %> 
     <td><img src="<%= bildurl %>" border="0"></td> 
     <% 
     if intCounter MOD 4 = 0 Then Response.Write "</tr><tr>"
     bilder.är.slut.movenext 
loop 
%>
```

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

## #2 — @nders, 2003-09-05T14:06Z

Du måste berätta vad det är som inte fungerar.
Jag antar att det inte står bilder.är.slut i koden?

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

## #3 — tank82, 2003-09-05T14:14Z

ja du, jag vet inte själv hur jag ska lyckas med detta (eller hur koden ska se ut), det är så att jag vill skriva ut bilderna ur en db och dom ska listas enligt:

bild1 l bild2 l bild3 l bild4
bild5 l bild6 l bild7 l bild8 osv osv..

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

## #4 — Jesper T, 2003-09-05T14:20Z

Som @nders sa: vad är felet? Felmeddelande? Står det "bilder.är.slut" så är det väldigt FEL!
Eller står det så här?

```
<% 
intCounter = 0
do until objRS.eof
       intCounter = intCounter + 1
       %> 
       <td><img src="<%= bildurl %>" border="0"></td> 
       <% 
       if intCounter MOD 4 = 0 Then Response.Write "</tr><tr>"
objRS.movenext 
loop 
%>
```

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

## #5 — SteveP, 2003-09-05T14:21Z

Om du har bilder.är.slut så är det fel. Det är bara ett exempel eftersom personen antagligen inte visste vad ditt recordset hette.

```
<% Session.LCID = 1053 %>
<%
strSQL = "SELECT * FROM bilder01 ORDER BY bildnamn DESC"
Set objCon = Server.CreateObject("ADODB.Connection")
objCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("bilder.mdb")
Set objRS = objCon.Execute(strSQL)
%>

<% 
intCounter = 0
do until ObjRs.EOF
     intCounter = intCounter + 1
     %> 
     <td><img src="<%=ObjRs("bildurl")%>" border="0"></td> 
     <% 
     if intCounter MOD 4 = 0 Then Response.Write "</tr><tr>"
     ObjRs.movenext 
loop 
%>
```

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

## #6 — Jesper T, 2003-09-05T14:21Z

Jag ser dessutom inte att du ger variabeln, "bildurl" något värde.

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

## #7 — Jesper T, 2003-09-05T14:22Z

Du saknar dessutom kolumnnamn: strSQL = "SELECT HÄR FROM bilder01 ORDER BY bildnamn DESC"

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

## #8 — tank82, 2003-09-05T14:23Z

```
<% Session.LCID = 1053 %>
<%
strSQL = "SELECT FROM bilder01 ORDER BY bildnamn DESC"
Set objCon = Server.CreateObject("ADODB.Connection")
objCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("../databaser/bilder.mdb")
Set objRS = objCon.Execute(strSQL)
%>

<% 
intCounter = 0
do until objRS.eof
       intCounter = intCounter + 1
       %> 
       <td><img src="<%= bildurl %>" border="0"></td> 
       <% 
       if intCounter MOD 4 = 0 Then Response.Write "</tr><tr>"
objRS.movenext 
loop 
%>
```

Felmeddelande:
The SELECT statement includes a reserved word or an argument name that is misspelled or missing, or the punctuation is incorrect. 

bilder.asp, line 6

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

## #9 — Jesper T, 2003-09-05T14:24Z

Se: <http://www.webforum.nu/showthread.php?s=&postid=705819#post705819>

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

## #10 — SteveP, 2003-09-05T14:24Z

Heter din tabell Bilder01? Och har du en kolumn som heter Bildurl samt bildnamn?

```
<% Session.LCID = 1053 %>
<%
strSQL = "SELECT * FROM bilder01 ORDER BY bildnamn DESC"
Set objCon = Server.CreateObject("ADODB.Connection")
objCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("bilder.mdb")
Set objRS = objCon.Execute(strSQL)
%>

<% 
intCounter = 0
do until ObjRs.EOF
     intCounter = intCounter + 1
     %> 
     <td><img src="<%=ObjRs("bildurl")%>" border="0"></td> 
     <% 
     if intCounter MOD 4 = 0 Then Response.Write "</tr><tr>"
     ObjRs.movenext 
loop 
%>
```

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

## #11 — tank82, 2003-09-05T14:26Z

Kanon nu fungerar det !
tack alla ;)

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

## #12 — SteveP, 2003-09-05T14:27Z

:birp

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

## #13 — tank82, 2003-09-05T14:51Z

Fan det blir inte riktigt som jag vill  :x 

Jag vill ha så att bilderna listas 4 på rad och sen ska jag skriva lite info om varje bild som ska ligga under bilden.

Kolla den bifogade bilden så förstår ni.  :birp

Bilagor:

- [kolla.gif](https://www.webforum.nu/a/1922.gif)

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

## #14 — SteveP, 2003-09-05T14:53Z

```
<% Session.LCID = 1053 %>
<%
strSQL = "SELECT * FROM bilder01 ORDER BY bildnamn DESC"
Set objCon = Server.CreateObject("ADODB.Connection")
objCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("bilder.mdb")
Set objRS = objCon.Execute(strSQL)
%>

<% 
intCounter = 0
do until ObjRs.EOF
     intCounter = intCounter + 1
     %> 
     <td align="center"><img src="<%=ObjRs("bildurl")%>" border="0"><br><%=ObjRs("bildnamn")%></td> 
     <% 
     if intCounter MOD 4 = 0 Then Response.Write "</tr><tr>"
     ObjRs.movenext 
loop 
%>
```

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

## #15 — SteveP, 2003-09-05T14:55Z

Gjorde en liten redigering.. kolla igen!

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

## #16 — tank82, 2003-09-05T15:04Z

snyft =(
Det blir inte rätt, bilderna listas under varandra.

Det ska ju alltså vara:

BILD1 l BILD2 l BILD3 l BILD4 l
text     text      text     text

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

## #17 — SteveP, 2003-09-05T15:16Z

Var har du resterande table kod då? alltså
\<table\>
\<tr\>

samt 
\</tr\>
\</table\>

Dessa ska vara untanför asp taggarna samt DO until ObjRS.EOF och Loop.
annars blir inte tabellen korrekt skapad.

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

## #18 — tank82, 2003-09-05T15:19Z

aha ok så här?

```
<% Session.LCID = 1053 %>
<%
strSQL = "SELECT * FROM bilder01 ORDER BY bildnamn DESC"
Set objCon = Server.CreateObject("ADODB.Connection")
objCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("../databaser/bilder.mdb")
Set objRS = objCon.Execute(strSQL)
%>

<table>
<tr>
<% 
intCounter = 0
do until ObjRs.EOF
     intCounter = intCounter + 1
     %> 
     <td align="center"><img src="<%=ObjRs("bildurl")%>" width="100" height="100" border="0"><br><%=ObjRs("bildnamn")%></td> 
     <% 
     if intCounter MOD 4 = 0 Then Response.Write "</tr><tr>"
     ObjRs.movenext 
loop 
%>
</tr>
</table>
```

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

## #19 — SteveP, 2003-09-05T15:31Z

Testa!

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

## #20 — tank82, 2003-09-05T15:49Z

jippi! tack SteveP (och alla ni andra)

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/85347-problem-med-att-lista-bilder  
Nästa sida: https://www.webforum.nu/amne/asp/85347-problem-med-att-lista-bilder/page2.md