radbrytning

Svaret finns rakt framför dig: http://www.webforum.nu/showthread.php?s=&threadid=65267

så eller?
<%
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set Folder = FSO.GetFolder(server.mappath("bilder/"))
set Files = Folder.Files

x = 0

For each Item In Files

x = x + 1
If x mod 6 = 0 then
response.write "<br>"
x = 0

End If>
<img src="<%=Item.Name%>">
<%
Next
set Folder = nothing
set FSO = nothing
set Files = nothing
%>

Du har blandat ihop det lite grand. ;)

<% 
Set FSO = Server.CreateObject("Scripting.FileSystemObject") 
Set Folder = FSO.GetFolder(server.mappath("bilder/")) 
set Files = Folder.Files 

x = 0 

For each Item In Files 

x = x + 1 
If x mod 5 = 0 then response.write "<br>" 
%> 
<img src="<%=Item.Name%>"> 
<% 
Next 
set Folder = nothing 
set FSO = nothing 
set Files = nothing 
%>

"Mod" räknar ut det vi i division kallar "rest". Du behöver alltså inte återställa x till 0 efter att kravet uppfyllts i If-satsen. 5/5 = 1 rest 0 6/5 = 1 rest 1 10/5 = 2 rest 0 osv.

:)

den skriver <br> efter 3 bilder?

Nej, efter 5 st. I alla fall enligt mina kalkyler. ;)
Du kan ju provköra koden och kolla resultatet.

:)

nope den skriver ut 4 på första raden och 5 på resten

<% 
Set FSO = Server.CreateObject("Scripting.FileSystemObject") 
Set Folder = FSO.GetFolder(server.mappath("bilder/")) 
set Files = Folder.Files 

x = 0 

For each Item In Files 

If x mod 5 = 0 then response.write "<br>" 
%> 
<img src="<%=Item.Name%>"> 
<% 
x = x + 1
Next 
set Folder = nothing 
set FSO = nothing 
set Files = nothing 
%>

:q Fungerar kanske?

<% 
Set FSO = Server.CreateObject("Scripting.FileSystemObject") 
Set Folder = FSO.GetFolder(server.mappath("bilder/")) 
set Files = Folder.Files

x = 0
For each Item In Files
	response.write "<img src=""bilder/" & Item.Name & """>"
	x = x + 1
	If x mod 5 = 0 then response.write "<br>" 
Next 
set Folder = nothing 
set FSO = nothing 
set Files = nothing 
%>

Red. hupp. :r
Red. 2. La in "bilder" i sökvägen.

Hupp. kanske lite sen...

perfekt