Bollnäs motorcykelklubb
med Hälsingeträffen 17-19/6 2011 i år för 41a gången!
<%
SQL="SELECT COUNT(*) AS turer FROM turlistan WHERE tur_Datum >= CURDATE()"
recSet1.open SQL, conn, 1, 2
%>
<%if CInt(recSet1("turer"))>0 then%>
<%if recSet1("turer")=1 then%>
Det finns 1 tur i turlistan!
<%else%>
Det finns <%=recSet1("turer")%> turer i turlistan!
<%end if%>
<%end if
recSet1.close
%>
BMCK är en märkesobunden klubb för alla motorcykelintresserade. Här träffas ett
gäng tjejer och killar i varierande åldrar för att åka mc, umgås och festa loss
i vårt eget klubbhus - Kåken.
Sommartid är Kåken öppen varje onsdag och söndag kl 19-21 förutom i Juli då Kåken är semesterstängd. Vintertid håller vi öppet söndagar 19-21.
Kom och ta en fika, kasta dart, spela biljard eller bara prata bort en stund!
Hälsingeträffen
·motorcyklar·mat·dryck·frukost·
·bar·liveband·mc-utflykt·party·mm·
I år arrangerar vi Hälsingeträffen för 41a gången. Hälsingeträffen är alltså en av landets äldsta mc-träffar!
En träff för dig som bara vill umgås och ha förbaskat roligt
i all enkelhet. Här träffar du oss i klubben och en massa andra härliga människor från när och fjärran.
Vi har valt att inte utsätta våra träffbesökare för förnedringslekar med ballonger, säckar, galgar och annat trams.
För den som ändå vill ha nåt att sysselsätta sig med finns en tipsrunda,
en gemensam mc-utflykt, en femkamp med fokus på prickskyttegrenar och en massa annat roligt!!!
Hälsingeträffen anordnas helgen innan midsommar. Så, boka in denna helg för all framtid.
Läs mer om allt som händer på Hälsingeträffens egen sida
|
<%
SQL="SELECT * FROM pagang WHERE pg_slutdatum >= CURDATE() ORDER BY pg_Startdatum LIMIT 10"
recSet1.open SQL, conn, 1, 2
%>
| Aktuellt på klubben |
Nästa aktivitet på klubben
<%
nu=now
maxAct=10
nextAct=0
do while not recSet1.eof AND not recSet1.bof
nextAct=nextAct+1
if datediff("d", nu, recSet1("pg_startdatum"))<=14 OR nextAct <= maxAct then%>
<%=sweDateShort(recSet1("pg_Startdatum"))%>
<%if recSet1("pg_Startdatum")<>recSet1("pg_Slutdatum") then response.write("-" & sweDateShort(recSet1("pg_Slutdatum")))%>
"><%=recSet1("pg_Rubrik")%>
<%
end if
recSet1.moveNext
loop
recSet1.close
%>
<%
SQL="SELECT COUNT(*) AS turer FROM turlistan WHERE tur_Datum >= CURDATE()"
recSet1.open SQL, conn, 1, 2
%>
<%if CInt(recSet1("turer"))>0 then%>
OBS!
<%if recSet1("turer")=1 then%>
Det finns 1 tur i turlistan!
<%else%>
Det finns <%=recSet1("turer")%> turer i turlistan!
<%end if%>
<%end if
recSet1.close
%> |
<%
SQL="SELECT gastNamn, gastDatum FROM gastbok ORDER BY gastDatum DESC LIMIT 1"
recSet1.Open SQL, Conn, 1, 2
Datum=isoDate(recSet1("gastDatum"), false, false)
Namn=recSet1("gastNamn")
%>
Senaste inlägg på klotterplanket
<%=Datum & " av " & Namn%>, så
<%
recSet1.close
nu=now
'nu=CDate("2005-02-10")
tid=dateDiff("d", Datum, nu)
if tid < 3 then%>
kom igen! <%=Namn%> väntar säkert på svar.
<%elseif tid < 6 then%>
det är hög tid för fler inlägg!
<%elseif tid < 8 then%>
klottra mer nu!
<%else%>
skriv nåt kul innan det blir damm på planket :)
<%end if%> |
|
|
<%
SQL="SELECT * FROM nyheter WHERE Statisk = 1 OR Datum BETWEEN '" & isoDate(dateAdd("m", -2, date), false, false) & "' AND '" & isoDate(date, false, false) & "' ORDER BY Datum DESC, ID DESC"
'response.write(SQL & "
")
recSet1.open SQL, conn, 1, 2
do while NOT recSet1.eof AND NOT recSet1.BOF
%>
<%=isoDate(recSet1("Datum"), false, false)%>
<%=recSet1("Rubrik")%>
<%=replace(recSet1("Snabbinfo"), vbcrlf, " ")%>
<%
Link=recSet1("Link")
x=""
if recset1("Fullinfo")<>"" then
x=replace(recSet1("Fullinfo"), " ", "")
end if
if x<>"" then
%>
<%
elseif Link<>"" then
if inStr(Link, "www") >0 then%>
<%else%>
<%end if
end if%>
<%
recSet1.moveNext
loop
recSet1.close
%>
Läs alla nyheter |
Mötestider
<%
SQL="SELECT * FROM moten"
recSet1.open SQL, conn, 1, 2
do while NOT recSet1.eof AND NOT recSet1.BOF
tmpDate=trim(recSet1("datumtid"))
motestyp=recSet1("motestyp")
kommentar=recSet1("kommentar")
if tmpDate="" or isnull(tmpDate) then
response.write("" & motestyp & " Tid ej satt ")
else
response.write("" & motestyp & " " & isoDate(tmpDate, true, false) & " " & kommentar & " ")
end if
recSet1.moveNext
loop
conn.close
set recSet1=nothing
set conn=nothing
%>
I köket denna vecka (v <%=Application("lastWeek")%>):
<%=Application("tjanstgoring")%> |
| |
<%
'
%>
|