oversigt spg 2

i = 0
While Not objRs.EOF
i = i + 1
If i = 3 Then
strStreng = strStreng & "<br>"
End If
  strStreng = strStreng objRs("filnavn") & " ")
objRs.MoveNext()
Wend

//>Rune

Hvorfor virker det her ikke ???

    Set strRS=strConn.Execute("SELECT picture_filename,picture_description FROM [Picture] where picture_show=true")
    i = 0
      While Not strRS.EOF
      i = i + 1
      If i = 3 Then
        strStreng = strStreng & "<br>"
      End If
      response.write "<img src=""gfx/"&strRS("picture_filename")&".jpg"" alt="""&strRS("picture_description")&""" width=""200"" height=""150""> "&strStreng
      strRS.MoveNext()
    Wend


Den viser de første 3 på en stribe de næste kommer der kun en på hver linie

har fået det til at du tak for hjælpen !!!

Anytime ;o)
Thx 4 Poinz

//>Rune