<% '################################################################################# '## Copyright (C) 2002 Wayne Lambright SubscriptionKit.com '## Questions or comments send to Wayne@SubscriptionKit.com '## THE SALE OR RESALE OF THIS "SUBSCRIPTIONKIT BY WAYNE LAMBRIGHT". '## IS STRICTLY PROHIBIBTED. MAKING THIS CODE AVAILABLE FOR DOWNLOAD '## ANYWHERE IS TOTALLY PROHIBIBTED. GET IT. THIS PURCHASE COMES WITH A '## SINGLE SITE LICENSE, WHICH MEANS YOU CAN ONLY USE THIS SITE WITH ONE '## URL/ WEB ADDRESS LIKE WWW.SUBSCRIPTIONKIT.COM BASICALY ONE LICENSE '## PER CLIENT, SO IF YOU WANT TO DEVELOP SITES FOR OTHER PEOPLE AND '## USE MY SOFTWARE YOU NEED TO PURCHASE ANOTHER SITE LICENSE. '## ARE YOU COOL WITH THAT. '################################################################################# %> <% Dim rsNes__MMColParam rsNes__MMColParam = "1" If (Request.QueryString("Email") <> "") Then rsNes__MMColParam = Request.QueryString("Email") End If %> <% Dim rsNes Dim rsNes_numRows Set rsNes = Server.CreateObject("ADODB.Recordset") rsNes.ActiveConnection = MM_connSubscription_STRING rsNes.Source = "SELECT PWID, UserGroup, Email, Active, MLYesNo, JoinDate, FirstName, LastName FROM tblPasswords WHERE Email = '" + Replace(rsNes__MMColParam, "'", "''") + "' ORDER BY Email DESC" rsNes.CursorType = 0 rsNes.CursorLocation = 2 rsNes.LockType = 1 rsNes.Open() rsNes_numRows = 0 %> <% Dim rsPMT Dim rsPMT_numRows Set rsPMT = Server.CreateObject("ADODB.Recordset") rsPMT.ActiveConnection = MM_connSubscription_STRING rsPMT.Source = "SELECT * FROM tblAdminPrefernces ORDER BY num_sort_order ASC" rsPMT.CursorType = 0 rsPMT.CursorLocation = 2 rsPMT.LockType = 1 rsPMT.Open() rsPMT_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 rsPMT_numRows = rsPMT_numRows + Repeat1__numRows %> Privacy Statement

 

Our Commitment To Privacy

Your privacy is important to us. To better protect your privacy we provide this notice explaining our online information practices and the choices you can make about the way your information is collected and used.

The Information We Collect:

We collect your name and contact information required to contact or ship to you, for financial information please see our payment processor's (ibill.com) Privacy Policy concerning information collected by them,.

This notice applies to all information collected or submitted on the Hose-n-Toes.com web site. On some pages, you can order products/subscriptions, make requests, and register to receive materials. The types of personal information collected at this site are:

Name:
Address:
Email address:
Phone number:


The Way We Use Information:

To contact you about a purchase, or to ship a product you have purchased. Or in the case of a newsletter, to send you the newsletter you have opted to receive.

Our Commitment To Data Security

To prevent unauthorized access, maintain data accuracy, and ensure the correct use of information, we have put in place appropriate physical, electronic, and managerial procedures to safeguard and secure the information we collect online.

How You Can Access Or Correct Your Information:

You can access all your personally identifiable information that we collect online and maintain by eMailing a request to have the information changed. We use this procedure to better safeguard your information.

You can correct factual errors in your personally identifiable information by sending us a request that credibly shows error.

To protect your privacy and security, we will also take reasonable steps to verify your identity before granting access or making corrections.

How To Contact Us:

Should you have other questions or concerns about these privacy policies, send us an email at admin@hosentoes.com, or you can contact me directly at mike@hosentoes.com

 

<% rsNes.Close() Set rsNes = Nothing %> <% rsPMT.Close() Set rsPMT = Nothing %>