|
|
<%
'Connect to DB
dim DataConn ' a dataconnection
dim RS ' a record set
dim strQry ' query string to retrieve categories
Application("RootPath") = ""
if Application("RootPath") <> "" then
Application("DatabasePath") = Server.mapPath(Application("RootPath")) & "\database\"
else
Application("DatabasePath") = Server.mapPath("database") & "\"
end if
'Application("DatabasePath") = Server.mapPath("\") & "\database\"
StrQry="SELECT Airstrips.Book, Airstrips.[Airstrip Primary Name], Airstrips.[Latitude Degrees], Airstrips.[Latitude Minutes], Airstrips.[Longitude Degrees], Airstrips.[Longitude Minutes] FROM Airstrips WHERE (((Airstrips.Inclusion)=1 Or (Airstrips.Inclusion)=2)) ORDER BY Airstrips.[Airstrip Primary Name], Airstrips.Book;"
Application("DataConn_ConnectionString") = "DBQ=" & Application("DatabasePath") & "strpsave.mdb;DRIVER={Microsoft Access Driver (*.mdb)}"
Set DataConn = Server.CreateObject("ADODB.Connection")
DataConn.Open Application("DataConn_ConnectionString")
Set DataCmd= Server.CreateObject("ADODB.Command")
DataCmd.CommandText=StrQry
Set DataCmd.ActiveConnection=DataConn
Set rs_main=Server.CreateObject("ADODB.Recordset")
Set rs_main=dataCmd.Execute
%>
|
|
There are five Country Airstrip Guides, one for each Australian Region. | |
|
Only Unlicensed Airfields are published. | |
|
See The Enroute Supplement Australia (ERSA) for details about Licenced Airfields. | |
|
Detailed information is available on line by subscribing to the Country Airstrip Guide Australia Online. | |
|
The Country Airstrip Guides may be purchased from Pilot Shops or from FlightAce® Direct. |
To view a list of the airfields that are published, please subscribe to the FlightAce® Country Airstrip Guide Australia Online.
|
Send mail to
webmaster@flightace.com with
questions or comments about this web site.
|