|
Turlistan
Här kan du berätta för omvärlden när du ska bege sig på en mc-tur någonstans.
Kort eller lång tur spelar ingen roll.
Ska du åka på afrikatour och vill ha en färdkamrat - skriv det,
ska du åka till Iggesund och ta en glass - skriv det.
Inlagda turer plockas automatiskt bort när datumet för turen är passerat.
NYHET!
Vill du hänga på? Skriv ditt namn i rutan som finns vid varje inlagd tur och klicka sedan på "Skicka".
Anmälan är inte bindande, listan på folk som vill hänga med ska bara ses som en
intressemätare och inget annat.
Det är upp till alla som är intresserade av att följa med på en tur att själva ta kontakt med den
som står för turen. Den som står för turen får inga automatiska mail eller liknande, så han/hon måste
själv hålla koll på sajten för att se om några anmälningar har inkommit.
Prata med varandra! Det är ganska trevligt ibland.
<%=message%>
| Inlagda turer |
<%
i=0
do while not rstemp.eof
if i mod 2 = 0 then
currStyle="light_tr"
else
currStyle="dark_tr"
end if
%>
<%
tur_ID=rsTemp("tur_ID")
tur_Namn=rsTemp("tur_Namn")
tur_Datum=formatSweDate(rsTemp("tur_Datum"))
tur_Epost=rsTemp("tur_Epost")
tur_Rubrik=rsTemp("tur_Rubrik")
tur_Beskrivning=rsTemp("tur_Beskrivning")
tur_Beskrivning=replace(tur_Beskrivning, vbCrLf, "
")
%>
<%=tur_Rubrik%>
Namn:
<%on error resume next
if tur_Epost<>"" then
gEp=split(tur_Epost,"@")
%>
<%=tur_Namn%>
<%else%>
<%=tur_Namn%>
<%end if
on error goto 0
%>
Turdatum: <%=tur_Datum%>
<%=tur_Beskrivning%>
|
Vi är sugna...
<%
anm=rsTemp("tur_Anmalan")
if anm<>"" then
anmArr=split(anm, "||")
separator=""
for anmCount = 0 to ubound(anmArr)
response.Write(separator & anmArr(anmCount))
separator = ", "
next
else
response.Write("Ingen anmäld än.")
end if
%>
|
<%rstemp.movenext
i=i+1
loop
%>
|