<%'Vince's cool stuff%><% ' Horse Whisperer ' Affiliate ID tracking script ' Vince Withee - revisted 06/09/2005 ' store/get variables ' sitedomain = "horsewhisperer.com" ' uncomment this when going to production sitedomain = "cart32.com" ' delete this line when going to production cartdomain = "cart32.com" referrer = lcase(Request.ServerVariables("HTTP_REFERER")) IP = Request.ServerVariables("REMOTE_ADDR") affID = request("aid") ' make valid MySQL date m = CStr(Month(date)) d = CStr(Day(date)) y = CStr(Year(date)) if len(m) < 2 Then m = "0" & m if len(d) < 2 Then d = "0" & d newdate = y & "-" & m & "-" & d 'write info to affiliates db 'connect to db Set globaldb = Server.CreateObject("ADODB.Connection") globaldb.Open "Provider=MSDASQL.1;Extended Properties=""DRIVER={MySQL ODBC 3.51 Driver};DESC=;DATABASE=horsewhisperer;SERVER=localhost;UID=horsewhisperer;PASSWORD=a8234ra;PORT=3306;OPTION=0;STMT=;""" set rs = Server.CreateObject("ADODB.RecordSet") ' Referrer doesn't come from site domains If InStr(referrer, sitedomain) = 0 Or InStr(referrer, cartdomain) = 0 Then sSQL = "INSERT INTO AffiliateOrders (affID, OrderNum, TotalSale,url, ip, date, time) VALUES ('" & affID & "', '', '', '" & referrer & "', '" & ip & "', '" & newdate & "', '" & time & "')" ' response.write sSQL & "

" & vbcrlf globaldb.execute sSQL End If // Delete old entries, but not every time Randomize x = CInt(rnd * 100) ' x = 50 If x = 50 then ' just a random number to help eliminate it running the delete query every time sSQL = "DELETE FROM AffiliateOrders WHERE ordernum = '' AND date < '" m = CStr(Month(date)) d = CStr(Day(date)) y = CStr(Year(date)) if len(m) < 2 Then m = "0" & m if len(d) < 2 Then d = "0" & d newdate = y & "-" & m & "-" & d ssQL = sSQL & newdate & "'" ' response.write sSQL & "

" & vbcrlf globaldb.execute sSQL End If %> Other Horse Training Products

Get  Free  E-Newsletters   |   Products   |   Site Search      

Frank Bell's Gentle Solution Revolution

Natural horsemanship clinics, horse training techniques and unique horse training products using Horsewhisperer Frank Bell's acclaimed Gentle Solutions. Frank's Safe and Simple techniques for training horses can achieve instant results - even with problem horses!

Making it Simple!   Making It Safe!   Get There Now!

     

Site Menu

 

 

 

<% page = Request.ServerVariables("SCRIPT_NAME") p = split(page, "/") CurrentPage = P(Ubound(p)) 'Response.write currentpage %>

<%if Currentpage="index.html" then%> Home Home
<%else%> Home Home
<%end if%>
<%if Currentpage="about_frank_bell.htm" then%> About Frank Bell About Frank Bell
<%else%> About Frank Bell About Frank Bell
<%end if%> <%if Currentpage="natural_horsemanship.htm" then%> Natural Horsemanship Natural Horsemanship
<%else%> Natural Horsemanship Natural Horsemanship
<%end if%> <%if Currentpage="philosophy.htm" then%> Horse Training Philosophy Horse Training Philosophy
<%else%> Horse Training Philosophy Horse Training Philosophy
<%end if%> <%if Currentpage="horse_training_methods.htm" then%> Horse Training Methods Horse Training Methods
<%else%> Horse Training Methods Horse Training Methods
<%end if%>
<%if Currentpage="horse_training_videos.htm" then%> Horse Training Videos Horse Training Videos
<%else%> Horse Training Videos Horse Training Videos
<%end if%> <%if Currentpage="equipment.htm" then%> Horse Training Equipment Horse Training Equipment
<%else%> Horse Training Equipment Horse Training Equipment
<%end if%> <%if Currentpage="horse_training_packages.htm" then%> Horse Training Packages Horse Training Packages
<%else%> Horse Training Packages Horse Training Packages
<%end if%>
<%if Currentpage="training_and_event_schedule.htm" then%> Clinic and Event Schedule Clinic and Event Schedule
<%else%> Clinic and Event Schedule Clinic and Event Schedule
<%end if%>
<%if Currentpage="clinics_and_training.htm" then%> About Clinics and Training About Clinics and Training
<%else%> About Clinics and Training About Clinics and Training
<%end if%> <%if Currentpage="demonstrations.htm" then%> Horse Shows and Expos Horse Shows and Expos
<%else%> Horse Shows and Expos Horse Shows and Expos
<%end if%> <%if Currentpage="executive.htm" then%> Executive Development Executive Development
<%else%> Executive Development Executive Development
<%end if%> <%if Currentpage="keynote_speaker.htm" then%> Keynote Speaking Keynote Speaking
<%else%> Keynote Speaking Keynote Speaking
<%end if%>
<%if Currentpage="certified_horse_trainers.htm" then%> Certified Horse Trainers Certified Horse Trainers
<%else%> Certified Horse Trainers Certified Horse Trainers
<%end if%> <%if Currentpage="horse_training_tips.htm" then%> Horse Training Tips Horse Training Tips
<%else%> Horse Training Tips Horse Training Tips
<%end if%> <%if Currentpage="horse_problems.htm" then%> Horse Problems Horse Problems
<%else%> Horse Problems Horse Problems
<%end if%> <%if Currentpage="working_wild_horses.html" then%> Working With Wild Horses Working With Wild Horses
<%else%> Working With Wild Horses Working With Wild Horses
<%end if%> <%if Currentpage="testimonials.htm" then%> Testimonials Testimonials
<%else%> Testimonials Testimonials
<%end if%>
<%if Currentpage="articles_by_frank_bell.htm" then%> Articles By Frank Bell Articles By Frank Bell
<%else%> Articles By Frank Bell Articles By Frank Bell
<%end if%> <%if Currentpage="newsletters.htm" then%> Newsletters Newsletters
<%else%> Newsletters Newsletters
<%end if%> <%if Currentpage="news_and_press.htm" then%> News and Press News and Press
<%else%> News and Press News and Press
<%end if%> <%if Currentpage="horse_links.htm" then%> Horse Links Horse Links
<%else%> Horse Links Horse Links
<%end if%>
<%if Currentpage="AffiliateProgram.asp" then%> Affiliate Program Affiliate Program
<%else%> Affiliate Program Affiliate Program
<%end if%> <%if Currentpage="charitable.html" then%> Charitable Fund Charitable Fund
<%else%> Charitable Fund Charitable Fund
<%end if%>
<%if Currentpage="contact_us.htm" then%> Contact Us Contact Us
<%else%> Contact Us Contact Us
<%end if%>

 

Frank Bell's Other  Favorite  Products and Services

Other Related Links

Horse Training Videos       Horse  Training  Equipment       Horse  Training  Packages


Shipping and Handling       Returns Info       Wholesale  Dealers       Affiliate Program


A comfortable saddle for the horse and rider is of utmost importance and far too often the cause of irritation is an ill-fitting saddle. Synergist Saddles fit you and your horse. Almost 10 years now and my horses are as happy and comfortable as I am. I recommend Synergist Saddles.  Synergist makes every effort to design saddles that fit both the horse and rider. The result is a comfortable and balanced ride for both short and long distance riding. Custom designed saddles for all riding disciplines, including the Frank Bell model.

Order your Synergist Saddle through Dances With Horses, Inc., and receive a FREE VIDEO of your choice from our video library. Email or call 1-800-871-7635.

 


Leather Therapy - www.leathertherapy.com " I keep my tack and all my leather equipment in tip top condition with this amazing product. The restorer not only protects, but actually strengthens leather!"

- Frank Bell

Leather Therapy products

 


Supracor Pads - www.supracor.com " The superior Supracor Pad is far and away my top choice in equine pads. The pad is by far one of the most important pieces of equipment to protect the horse's back. Most saddles do not fit the horse perfectly, which can cause problems and pain. The innovative patented honeycomb Supracor pad works like a shock absorber, grips and cools, prevents pressure points, and is lightweight and easy to clean."

- Frank Bell

 

Order through Dances With Horses and receive a 10% discount on all Supracor products. Email or call 1-800-871-7635.

 

Supracor Pad

 


 

Arborwear - www.arborwear.com Maker of great pants and shirts. Rugged, comfortable, and designed to make any outdoor job easier.

 

Frank Bell and Jim Rea strutting their Arborwear pants at the grand finale of the Evergreen, CO clinic mid-May ‘05

 


 

Forco Colorado - www.forcocolorado.com Forco is an all natural nutritional supplement which supports the digestive process in all animals. A horses digestive process begins with saliva in the mouth and continues through the gut system to the anus. Horses have over one hundred different kinds of micro flora in their gut system and about thirty of those are really important and the proportion of each change with the feed the horse is digesting. Forco is not food for the horse, Forco is food for those microbes to help them be healthy so they in turn can digest the nutrients presented to them in the most efficient way. Forco will help your horse to digest whatever feed and supplement you are giving him, or her, most efficiently. More information

 

 
 

Privacy Policy     |     Terms of Use

Copyright © 2000-2005 by Dances With Horses, Inc., P.O. Box 819, Rexburg, ID   83440, Ph: (800) 871-7635, Fax: (208) 356-7817, E-Mail: frankbell@horsewhisperer.com