<% antal = 50 if request.querystring("count") <> "" then count = replace(request.querystring("count"),"'","") else count = 1 end if xrs.Open "SELECT *,(SELECT TOP 1 navn FROM billeder WHERE n_id = id) AS bill FROM nyheder WHERE side = '3' ORDER BY id DESC;",xConn i = 1 do while NOT xrs.EOF if (i > (count - 1)*antal) AND (i <= count * antal) then if xrs("bill") <> "" then colsp = " colspan=""2""" else colsp = "" %>
<%= xrs("overskrift") %> <%= FormatDato(xrs("dato")) %>
<% if xrs("bill") <> "" then %>
/<%= xrs("bill") %>" border="1" width="120">
<% end if %>
<%= xrs("beskrivelse") %>

">Se alle billeder
<% end if xrs.movenext if NOT xrs.EOF then if (i > (count - 1)*antal) AND (i <= count * antal) then %> <% end if i = i + 1 end if loop xrs.close %> <% if i mod antal <> 0 then af = (i / antal) + 1 if instr(af,",") > 0 then af_temp = af &"" af_temp = split(af,",") af = af_temp(0) end if else af = i / antal end if if count > 1 then %> Side <%= count - 1 %> <% if i > count * antal then %> - Side <%= count + 1 %> <% else %> - Side <%= count %> <% end if else if i > count * antal then %> Side <%= count %> - Side <%= count + 1 %> <% end if end if %>