|
BMCKs fotogalleri
Här finns bilder från våra och andras tillställningar.
Klicka på plus-tecknet till vänster om vardera rubrik för att se miniatyrbilder.
För att sedan se en bild i full storlek klickar du på miniatyren.
/Webmaster
Vill du ha in dina bilder i galleriet eller vill du att vi ska ta bort ett foto? Skicka ett mail
till webmaster@bmck.se.
<%do while not recSet1.eof AND not recSet1.bof%>
"><%a=chk("grupp_" & recSet1("ggrupp_ID") , "" & recSet1("ggrupp_Namn") & "
" & recSet1("ggrupp_Kommentar"))%>
|
<%if a then
grupp=recSet1("ggrupp_ID")
i=-1
set recSet2 = server.createobject("ADODB.recordset")
SQL="SELECT * FROM galleri WHERE g_grupp = " & grupp & " ORDER BY g_Datum, g_ID"
recSet2.open SQL, Conn
%>
<%
do while not recSet2.eof AND not recSet2.bof
i=i+1
if i mod 4 = 0 AND i>0 then response.write(" ")
%>
| <%call gThumb(recSet2("g_ID"), grupp, recSet2("g_filnamn"))%> |
<%
recSet2.moveNext
loop
%>
|
<%end if%>
<%
recSet1.moveNext
loop
%>
|