<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% on error resume next %> [an error occurred while processing this directive] [an error occurred while processing this directive] <% Dim MantleAdsRS Dim MantleAdsRS_numRows Set MantleAdsRS = Server.CreateObject("ADODB.Recordset") MantleAdsRS.ActiveConnection = MM_cessnaflyer_STRING MantleAdsRS.Source = "SELECT * FROM MantleAdsDB ORDER BY SortOrder ASC" MantleAdsRS.CursorType = 0 MantleAdsRS.CursorLocation = 2 MantleAdsRS.LockType = 1 MantleAdsRS.Open() MantleAdsRS_numRows = 0 %> <% Dim MemberInfo__MMColParam MemberInfo__MMColParam = "1" If (Session("MM_Username") <> "") Then MemberInfo__MMColParam = Session("MM_Username") End If %> <% Dim MemberInfo Dim MemberInfo_numRows Set MemberInfo = Server.CreateObject("ADODB.Recordset") MemberInfo.ActiveConnection = MM_cessnaflyer_STRING MemberInfo.Source = "SELECT * FROM MemberDB WHERE EmailAddress = '" + Replace(MemberInfo__MMColParam, "'", "''") + "'" MemberInfo.CursorType = 0 MemberInfo.CursorLocation = 2 MemberInfo.LockType = 1 MemberInfo.Open() MemberInfo_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 MantleAdsRS_numRows = MantleAdsRS_numRows + Repeat1__numRows %> Cessna Flyer Association - www.cessnaflyer.org
Welcome <% If MemberInfo.EOF And MemberInfo.BOF Then %> Guest <% End If ' end MemberInfo.EOF And MemberInfo.BOF %> <% If Not MemberInfo.EOF Or Not MemberInfo.BOF Then %> <%=(MemberInfo.Fields.Item("Fname").Value)%> <% End If ' end Not MemberInfo.EOF Or NOT MemberInfo.BOF %>!
<% If MemberInfo.EOF And MemberInfo.BOF Then %> Website Login  |  Login Help <% End If ' end MemberInfo.EOF And MemberInfo.BOF %> <% If Not MemberInfo.EOF Or Not MemberInfo.BOF Then %> (Member's Only Features)
CFA Clubhouse  |  Member Forums  |  Logout <% End If ' end Not MemberInfo.EOF Or NOT MemberInfo.BOF %>
<%=formatdatetime((now),1)%>  
 
Show Distribution 2008
ISSUE SHOW
APRIL SUN N FUN
(Space Deadline February 15h)
MAY ALASKA AIRMEN’S
Convention - Anchorage
(Deadline March 14th)
JUNE Sentimental Journey (PF Only)
Lock Haven PA
&
Cherokee Fly In  (PF Only)
Osage Beach MO
(Deadline April 18)
JULY & AUGUST OSHKOSH AirVenture
(Deadline May 16th)
SEPTEMBER OKLAHOMA FESTIVAL OF FLIGHT
ALVA, OK
OCTOBER & NOVEMBER AOPA EXPO – San Jose, CA
(Deadline August 15th)

Aircraft Spruce Fly In and Open House
Corona, CA 

The magazines will be distributed to Cessna and Piper owners and pilots that are attending the shows.

Run in all show issues at 12X RATE!

Back to Advertising Info


Home  |  Join  |  Renew  |  Forums  |  Contact Us  |  Advertise
Copyright 2007 - Cessna Flyer Association
  
<% MantleAdsRS.Close() Set MantleAdsRS = Nothing %> <% MemberInfo.Close() Set MemberInfo = Nothing %> <% ' Report Error If Err.Number <> 0 Then SendErrorEmail "ASP Error", Err.Source, Err.Number, Err.Description End If %> <% ' Report Error If Err.Number <> 0 Then SendErrorEmail "ASP Error", Err.Source, Err.Number, Err.Description End If %> <% ' Report Error Messages to Admin If Err.Number <> 0 Then SendErrorEmail "ASP Error", Err.Source, Err.Number, Err.Description End If %> <% If Err.Number <> 0 Then SendErrorEmail "ASP Error", Err.Source, Err.Number, Err.Description End If %>