<%@LANGUAGE="VBSCRIPT"%> <% ' *** Edit Operations: declare variables Dim MM_editAction Dim MM_abortEdit Dim MM_editQuery Dim MM_editCmd Dim MM_editConnection Dim MM_editTable Dim MM_editRedirectUrl Dim MM_editColumn Dim MM_recordId Dim MM_fieldsStr Dim MM_columnsStr Dim MM_fields Dim MM_columns Dim MM_typeArray Dim MM_formVal Dim MM_delim Dim MM_altVal Dim MM_emptyVal Dim MM_i MM_editAction = CStr(Request.ServerVariables("SCRIPT_NAME")) If (Request.QueryString <> "") Then MM_editAction = MM_editAction & "?" & Request.QueryString End If ' boolean to abort record edit MM_abortEdit = false ' query string to execute MM_editQuery = "" %> <% ' *** Insert Record: set variables If (CStr(Request("MM_insert")) = "fmAdd") Then MM_editConnection = MM_connOttawaJazzFestival_STRING MM_editTable = "tblMembership" MM_editRedirectUrl = "/en/membership/confirm.asp" MM_fieldsStr = "FirstName|value|LastName|value|Address|value|City|value|ProvState|value|PostalCode|value|Phone|value|Email|value|MemberType|value|Amount|value|memberDate|value|checkActive|value" MM_columnsStr = "memberFirst|',none,''|memberLast|',none,''|memberAddress|',none,''|memberCity|',none,''|memberProv|',none,''|memberPostal|',none,''|memberPhone|',none,''|memberEmail|',none,''|memberTypeID|none,none,NULL|memberPayAmount|none,none,NULL|memberDate|',none,NULL|memberActive|none,none,NULL" ' create the MM_fields and MM_columns arrays MM_fields = Split(MM_fieldsStr, "|") MM_columns = Split(MM_columnsStr, "|") ' set the form values For MM_i = LBound(MM_fields) To UBound(MM_fields) Step 2 MM_fields(MM_i+1) = CStr(Request.Form(MM_fields(MM_i))) Next ' append the query string to the redirect URL If (MM_editRedirectUrl <> "" And Request.QueryString <> "") Then If (InStr(1, MM_editRedirectUrl, "?", vbTextCompare) = 0 And Request.QueryString <> "") Then MM_editRedirectUrl = MM_editRedirectUrl & "?" & Request.QueryString Else MM_editRedirectUrl = MM_editRedirectUrl & "&" & Request.QueryString End If End If End If %> <% ' *** Insert Record: construct a sql insert statement and execute it Dim MM_tableValues Dim MM_dbValues If (CStr(Request("MM_insert")) <> "") Then ' create the sql insert statement MM_tableValues = "" MM_dbValues = "" For MM_i = LBound(MM_fields) To UBound(MM_fields) Step 2 MM_formVal = MM_fields(MM_i+1) MM_typeArray = Split(MM_columns(MM_i+1),",") MM_delim = MM_typeArray(0) If (MM_delim = "none") Then MM_delim = "" MM_altVal = MM_typeArray(1) If (MM_altVal = "none") Then MM_altVal = "" MM_emptyVal = MM_typeArray(2) If (MM_emptyVal = "none") Then MM_emptyVal = "" If (MM_formVal = "") Then MM_formVal = MM_emptyVal Else If (MM_altVal <> "") Then MM_formVal = MM_altVal ElseIf (MM_delim = "'") Then ' escape quotes MM_formVal = "'" & Replace(MM_formVal,"'","''") & "'" Else MM_formVal = MM_delim + MM_formVal + MM_delim End If End If If (MM_i <> LBound(MM_fields)) Then MM_tableValues = MM_tableValues & "," MM_dbValues = MM_dbValues & "," End If MM_tableValues = MM_tableValues & MM_columns(MM_i) MM_dbValues = MM_dbValues & MM_formVal Next MM_editQuery = "insert into " & MM_editTable & " (" & MM_tableValues & ") values (" & MM_dbValues & ")" If (Not MM_abortEdit) Then ' execute the insert Set MM_editCmd = Server.CreateObject("ADODB.Command") MM_editCmd.ActiveConnection = MM_editConnection MM_editCmd.CommandText = MM_editQuery MM_editCmd.Execute MM_editCmd.ActiveConnection.Close 'Email the content of the new record insertion *************************** Dim objMail, msgSender, msgRecipient, msgSubject 'create the mailer object Set objMail = Server.CreateObject("CDONTS.NewMail") 'declare the message variables msgSender = Request.Form("Email") msgRecipient = "info@ottawajazzfestival.com" msgSubject = "New Member Registration" 'define as HTML email objMail.MailFormat = cdoMailFormatMime objMail.BodyFormat = cdoBodyFormatHTML 'setup the body of the message message = "" message = message & "

A new member has registered on the OIJF website.

" message = message & "

Last Name: " & Request.Form("LastName") & "

" message = message & "

First Name: " & Request.Form("FirstName") & "

" message = message & "

Address: " & Request.Form("Address") & "

" message = message & "

City: " & Request.Form("City") & "

" message = message & "

Prov/State: " & Request.Form("ProvState") & "

" message = message & "

Postal Code: " & Request.Form("PostalCode") & "

" message = message & "

Phone: " & Request.Form("Phone") & "

" message = message & "

Email: " & Request.Form("Email") & "

" message = message & "

Amount: " & Request.Form("Amount") & "

" message = message & "

more info

" message = message & "" 'assemble the message and send it then clear it objMail.Send msgSender, msgRecipient, msgSubject, message Set objMail = Nothing 'end setup mail msg ******************************** If (MM_editRedirectUrl <> "") Then Response.Redirect(MM_editRedirectUrl) End If End If End If %> <% Dim rsGetMemberType Dim rsGetMemberType_numRows Set rsGetMemberType = Server.CreateObject("ADODB.Recordset") rsGetMemberType.ActiveConnection = MM_connOttawaJazzFestival_STRING rsGetMemberType.Source = "SELECT * FROM tblMemberType ORDER BY memberTypeID ASC" rsGetMemberType.CursorType = 0 rsGetMemberType.CursorLocation = 2 rsGetMemberType.LockType = 1 rsGetMemberType.Open() rsGetMemberType_numRows = 0 %> | Ottawa Jazz Festival

This site will look much better in a browser that supports web standards, but it is accessible to any browser or Internet device.

Skip to Navigation | Skip to Content

Ottawa Jazz Festival Inc.

2006/2007 Membership Drive

Dear Friends of the Festival,

We’re writing with updates on a number of things –

  • our membership campaign for 2006/07
  • a new opportunity recently available to donate stocks to the festival!

I’ll begin with the last item first.

BRAND NEW OPPORTUNITY - HELPING THE FESTIVAL WITH DONATIONS OF STOCKS AND BONDS!

As some of you may know, the recent federal budget allows charitable organizations to offer tax receipts to their donors for 100% of the amount of the gift of securities. The benefit to the holder of stocks or other securities is that when the stock is donated to a charity, the capital gains on the stock is eliminated and the donor gets a tax receipt to the full value of the appreciated cost of the security.

This new initiative has an enormously positive impact for organizations in the not for profit, charitable sector, like the jazz festival. The charity must liquidate the security once it is received which allows access to important cash. And, the donor gets to use the tax receipt against their income for the year!

Since we are facing cutbacks in almost all sources of traditional funding both public sector (government) and corporate support, this opportunity represents the potential to increase our private fundraising by a substantial amount. The beauty of this new legislation for donors is the tax advantage it provides: no capital gains tax and a tax receipt worth 100% of the value of the stock! For some, this could be extremely advantageous! There is lots of information available if you’d like more details. All of this information will also be posted on our website – www.ottawajazzfestival.com

John Jackson, the festival’s Treasurer and Membership Campaign Chairperson would be happy to answer your questions – 613-761-3085. You can also talk to our representative at TD Canada Trust – Hilary Abel, Investment Consultant at 613-782-1201 ext. 247.

MEMBERSHIP CAMPAIGN

As we kick off our Membership Campaign this year, we are happy to announce that we have a very exciting fall/winter concert series already in place! And we already have some great jazz names coming to the festival! Your membership contribution gets you first access to those tickets among other great things. 

You should also know that your membership contribution goes directly to helping us present great artists as well as help support our education initiatives like the Galaxie Jazz Youth All Stars – which by the way – gives out not one, but two scholarships to promising jazz students as they pursue their jazz studies! Your support does a lot of things – mostly keeping great jazz alive in our community! We hope you can give generously!

Enclosed, please find the brand new Membership Benefits brochure put together by our Membership Services Manager, Michelle Francis. We hope you’ll support the festival with your renewal, or, help us out by donating for the first time!

Keep swinging,

Catherine O’Grady

Executive Producer

 

Jazz Membership can now be purchased through our on-line box office.  Click on Online Box Office and click on the Donations button.

More details about membership levels.

Membership Levels

 

Purchase your membership online
through our

Online Box Office

 

 

<% rsGetMemberType.Close() Set rsGetMemberType = Nothing %>