<% response.Expires = -1 Dim conn, rs, tlimit, tstring, lat(200), lon(200), callsign(200), i, tripid(200), numberofflights, spd(200), xpdr(200), rego(200), tstamp(200), vsp(200), typ(200), alt(200), trk(200), hago(200), mago(200) dim months(12) dim oldest months(0) = "Jan" months(1) = "Feb" months(2) = "Mar" months(3) = "Apr" months(4) = "May" months(5) = "Jun" months(6) = "Jul" months(7) = "Aug" months(8) = "Sep" months(9) = "Oct" months(10) = "Nov" months(11) = "Dec" set conn=Server.CreateObject("ADODB.Connection") set rs=Server.CreateObject("ADODB.Recordset") conn.Open(Application("DBConnectVesselLog")) conn.CommandTimeout = 600 'check whether the form was submitted or it's an initial load if request.QueryString("day1") = "" then rs.Open "SELECT TOP(1) tstamp FROM tabAirTransmissionOld ORDER BY tstamp ASC", conn if rs.eof then oldest = "0" else oldest = rs("tstamp") end if rs.Close %> Untitled <% set rs = conn.Execute("SELECT * FROM tabContent WHERE DataName LIKE 'Maintenance'") %>

Power Search

Power Search lets you find any flights that were ever tracked in the openATC system. Did you fly recently and want to see your routing? This is where you can find out.Note that only flights older than 48 hours will be searchable through this interface. For all other flights please use the simple search box in the top right corner of the browser window.

Either enter part of the callsign or part of the registration, select the date on which the flight took place and click search. Please note that a maximum of 200 flights will be returned for any given search.

<%if rs("DataContent") = 0 then %>
<% else %>

Database index maintenance is currently ongoing. During that time, Power Search is not available. Sorry for the inconvenience. This usually takes no longer than 15 minutes, please come back and try again then.



<% end if set rs = nothing %> This page served times
<% else starttime = now() set rs = conn.Execute("exec sp_PowerSearch '%" & trim(request.QueryString("callsign")) & "%', '%" & trim(request.QueryString("registration")) & "%', '" & request.QueryString("year1") & "-" & request.QueryString("month1") & "-" & request.QueryString("day1") & "', '" & request.QueryString("year2") & "-" & request.QueryString("month2") & "-" & request.QueryString("day2") & "', '%" & trim(request.QueryString("typ")) & "%' WITH RECOMPILE") starttime = DateDiff("s", starttime, now) %> Untitled

Search Results

Search took <%=starttime %> seconds. Maximum of 200 results are displayed. <% i = 0 While not rs.EOF callsign(i) = rs("Callsign") typ(i) = rs("type") if rs("FAAType") <> "" then typ(i) = rs("FAAType") rego(i) = rs("registration") tstamp(i) = DanDate(rs("tstamp"), "%d %b %Y %H:%M:%S") tripid(i) = rs("ID") i = i + 1 rs.MoveNext wend numberofflights = i if numberofflights = 0 then response.Write "

No matching flights have been found.

Back to Power Search

" else response.Write "
Callsign (or any part thereof). Ex: BAW278:
Registration (or any part thereof). Ex: G-CIVC :
Type (or any part thereof). Ex: A38 :
Startdate for search:
Enddate for search:
Oldest flight available:<%=oldest%> UTC
Search now
" for i = 0 to numberofflights - 1 Response.Write "" & _ "" next response.Write "
ViewCallsignTypeRegistrationTime (UTC)DirectLink lets you copy the URL for a particular flight
" & _ "" & _ "" & callsign(i) & " " & _ typ(i) & " " & _ "" & rego(i) & " " & tstamp(i) & "DirectLink
" end if %>
<% rs.Close set rs = nothing conn.close end if %>