<%
Function RandomImage(strPath)
Randomize()
If Right(strPath, 1) <> Chr(47) Then strPath = strPath & Chr(47)
strPhysical = Server.MapPath(strPath)
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.GetFolder(strPhysical)
Set objFiles = objFolder.Files
For Each objFile in objFiles
strFile = LCase(objFile.Name)
strFiles = strFiles & strFile & vbTab
Next
strImages = Split(strFiles, vbTab)
If UBound(strImages) > 1 Then
RandomImage = strPath & strImages(Int(Rnd(1)*UBound(strImages)))
End If
End Function
%>
Join the newest family sport in Kearney, Bicycle Motocross. Fun for the whole family. All ages and abilities welcome. Come and join the fun. In BMX, nobody rides the bench!
The track length is 1100 feet, with racing every Saturday morning through May with sign-ups from 9:30 a.m. - 10:00 a.m. Trophies to all in the Main Event. Race fee is $10.00. All races are sanctioned by the American Bicycle Association (ABA).
