Canadian Tracked Data

<% Dim floatId, periodStart, periodEnd Set objXML = Server.CreateObject("Microsoft.XMLDOM") Set objLst = Server.CreateObject("Microsoft.XMLDOM") Set objHdl = Server.CreateObject("Microsoft.XMLDOM") objXML.async = False objXML.Load (Server.MapPath("/alphapro/argo/floats.xml")) Set objLst = objXML.getElementsByTagName("float") noOfFloats = objLst.length For i = 0 To (noOfFloats - 1) Set objHdl = objLst.item(i) floatId = objHdl.childNodes(0).text periodStart = objHdl.childNodes(1).text periodEnd = objHdl.childNodes(2).text cnt = cnt + 1 stat = "" SELECT CASE abs(cnt) mod 2 CASE 1: stat = "" END SELECT %> <%=stat%> <%if floatId <> "49048" and floatId <> "46851" and floatId <> "46852" and floatId <> "51886" and floatId <> "51887" and floatId <> "46851A" then %> <%else%> <%end if%> <%Next%>

Float	Period	Drift		Profile	Metadata
		CSV	NetCDF	NetCDF	NetCDF	HTML
<%=floatId%>	<%=periodStart%> to <%=periodEnd%>	X	X	X	X	X				X
All Floats		X	X	X		X