The current conditions for <%=Request.QueryString("SYSTEM")%> are as follows as of <%=NOW%> in West Yellowstone, MT.

<% Public RS Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "trails" 'sql="SELECT Trails.[Trail Name], Trails.ID, Trails.Trail_HREF FROM Trails WHERE (((Trails.ID)=" & Request.QueryString("SYSTEMID") & "));" 'Set RS = Conn.Execute(sql) %>

" usemap="#i_map" border="0" ALT="Click to select a trail to view conditions.">
Select a trail to view its conditions Back to Trail Systems

<% sql_t="SELECT Trails.[Trail Name], Trails.TrailID, Trails.Trail_HREF FROM Trails WHERE (((Trails.ID)=" & Request.QueryString("SYSTEMID") & "));" Set trails = Conn.Execute(sql_t) Do while not trails.eof %> "> <%=trails("Trail Name")%> <% sql_2="SELECT [Trail Conditions].Conditions, [Trail Conditions].[Date Updated], [Trail Conditions].Updater FROM [Trail Conditions] WHERE ((([Trail Conditions].TrailID)=" & trails("TrailID") & ")) ORDER BY [Trail Conditions].[Date Updated] DESC" Set trail_cond = Conn.Execute(sql_2) if not trail_cond.eof then %>

Conditions: <%=trail_cond("Conditions")%>
Updated by: <%=trail_cond("Updater")%> on <%=trail_cond("Date Updated")%>

<% trail_cond.close end if %>



Back to Trail Systems Up to map










<% trails.movenext Loop %> <% if Request.QueryString("SYSTEMID") = 1 then %> <% end if %> <% if Request.QueryString("SYSTEMID") = 2 then %> <% end if %> <% if Request.QueryString("SYSTEMID") = 3 then %> <% end if %> <% if Request.QueryString("SYSTEMID") = 4 then %> <% end if %>