Global Aviation

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Dim rsSwiperSub Dim rsSwiperSub_numRows Set rsSwiperSub = Server.CreateObject("ADODB.Recordset") rsSwiperSub.ActiveConnection = MM_dbase1_STRING rsSwiperSub.Source = "SELECT * FROM QueryProductDetails" rsSwiperSub.CursorType = 0 rsSwiperSub.CursorLocation = 2 rsSwiperSub.LockType = 1 rsSwiperSub.Open() rsSwiperSub_numRows = 0 %> <% Dim rsSwiperMain Dim rsSwiperMain_numRows Set rsSwiperMain = Server.CreateObject("ADODB.Recordset") rsSwiperMain.ActiveConnection = MM_dbase1_STRING rsSwiperMain.Source = "SELECT * FROM QueryDistinctCategory" rsSwiperMain.CursorType = 0 rsSwiperMain.CursorLocation = 2 rsSwiperMain.LockType = 1 rsSwiperMain.Open() rsSwiperMain_numRows = 0 %> <% Dim localTime Dim localTime_numRows Set localTime = Server.CreateObject("ADODB.Recordset") localTime.ActiveConnection = MM_dbase1_STRING localTime.Source = "SELECT * FROM QueryTimeDate" localTime.CursorType = 0 localTime.CursorLocation = 2 localTime.LockType = 1 localTime.Open() localTime_numRows = 0 %> <% Dim productInfo__MMColParam productInfo__MMColParam = "1" If (Request.QueryString("productInfoID") <> "") Then productInfo__MMColParam = Request.QueryString("productInfoID") End If %> <% Dim productInfo Dim productInfo_numRows Set productInfo = Server.CreateObject("ADODB.Recordset") productInfo.ActiveConnection = MM_dbase1_STRING productInfo.Source = "SELECT * FROM QueryProductInfo WHERE productInfoID = " + Replace(productInfo__MMColParam, "'", "''") + "" productInfo.CursorType = 0 productInfo.CursorLocation = 2 productInfo.LockType = 1 productInfo.Open() productInfo_numRows = 0 %> Global Aviation

Global Aviation Support Pty. Ltd

Sunshine Coast Airport, Queensland, Australia
Tel: 07 5448 8877 Fax: 07 5448 8866
Email:

Local Time - <%= DoDateTime((localTime.Fields.Item("Time").Value), 4, 1033) %>, <%= DoDateTime((localTime.Fields.Item("Date").Value), 1, 1033) %>

< Go back

Return to Home Page

COM760TSO

FEATURES:

Full 1-year warranty
AUTO-TOGGLE Freq. Selection
Dual Channel "Flip-Flop"
Advanced Digital Synthesizer
Large Character Display
Electronic Tuning
FAA TSO'd
Canadian DOC Approved
Auto Squelch and Dimming
Made in U.S.A.
Slim-Pack Configuration

Sunsite Web Design

Disclaimer

<% rsSwiperSub.Close() Set rsSwiperSub = Nothing %> <% rsSwiperMain.Close() Set rsSwiperMain = Nothing %> <% localTime.Close() Set localTime = Nothing %> <% productInfo.Close() Set productInfo = Nothing %>