<%@LANGUAGE="VBSCRIPT"%> 
<!--#include file="../../Connections/highcountry.asp" -->
<%
Dim Huntingsights__MMColParam
Huntingsights__MMColParam = "Hunting Sights"
if (Request("MM_EmptyValue")  <> "") then Huntingsights__MMColParam = Request("MM_EmptyValue") 
%>
<%
set Huntingsights = Server.CreateObject("ADODB.Recordset")
Huntingsights.ActiveConnection = MM_highcountry_STRING
Huntingsights.Source = "SELECT *  FROM toxonics  WHERE accessorycatagory = '" + Replace(Huntingsights__MMColParam, "'", "''") + "'"
Huntingsights.CursorType = 0
Huntingsights.CursorLocation = 2
Huntingsights.LockType = 3
Huntingsights.Open()
Huntingsights_numRows = 0
%>
<%
Dim CreateYourOwn__MMColParam
CreateYourOwn__MMColParam = "Create Your Own"
if (Request("MM_EmptyValue")  <> "") then CreateYourOwn__MMColParam = Request("MM_EmptyValue") 
%>
<%
set CreateYourOwn = Server.CreateObject("ADODB.Recordset")
CreateYourOwn.ActiveConnection = MM_highcountry_STRING
CreateYourOwn.Source = "SELECT *  FROM toxonics  WHERE accessorycatagory = '" + Replace(CreateYourOwn__MMColParam, "'", "''") + "'"
CreateYourOwn.CursorType = 0
CreateYourOwn.CursorLocation = 2
CreateYourOwn.LockType = 3
CreateYourOwn.Open()
CreateYourOwn_numRows = 0
%>
<%
Dim ArcheryProgram__MMColParam
ArcheryProgram__MMColParam = "Archery Program"
if (Request("MM_EmptyValue")  <> "") then ArcheryProgram__MMColParam = Request("MM_EmptyValue") 
%>
<%
set ArcheryProgram = Server.CreateObject("ADODB.Recordset")
ArcheryProgram.ActiveConnection = MM_highcountry_STRING
ArcheryProgram.Source = "SELECT *  FROM toxonics  WHERE accessorycatagory = '" + Replace(ArcheryProgram__MMColParam, "'", "''") + "'"
ArcheryProgram.CursorType = 0
ArcheryProgram.CursorLocation = 2
ArcheryProgram.LockType = 3
ArcheryProgram.Open()
ArcheryProgram_numRows = 0
%>
<%
Dim Stabilizers__MMColParam
Stabilizers__MMColParam = "Stabilizers"
if (Request("MM_EmptyValue") <> "") then Stabilizers__MMColParam = Request("MM_EmptyValue")
%>
<%
set Stabilizers = Server.CreateObject("ADODB.Recordset")
Stabilizers.ActiveConnection = MM_highcountry_STRING
Stabilizers.Source = "SELECT *  FROM toxonics  WHERE accessorycatagory = '" + Replace(Stabilizers__MMColParam, "'", "''") + "'"
Stabilizers.CursorType = 0
Stabilizers.CursorLocation = 2
Stabilizers.LockType = 3
Stabilizers.Open()
Stabilizers_numRows = 0
%>
<%
Dim targetsightaccessories__MMColParam
targetsightaccessories__MMColParam = "Target Sight Accessories"
if (Request("MM_EmptyValue") <> "") then targetsightaccessories__MMColParam = Request("MM_EmptyValue")
%>
<%
set targetsightaccessories = Server.CreateObject("ADODB.Recordset")
targetsightaccessories.ActiveConnection = MM_highcountry_STRING
targetsightaccessories.Source = "SELECT * FROM toxonics WHERE accessorycatagory = '" + Replace(targetsightaccessories__MMColParam, "'", "''") + "'"
targetsightaccessories.CursorType = 0
targetsightaccessories.CursorLocation = 2
targetsightaccessories.LockType = 3
targetsightaccessories.Open()
targetsightaccessories_numRows = 0
%>
<%
Dim Repeat3__numRows
Repeat3__numRows = -1
Dim Repeat3__index
Repeat3__index = 0
CreateYourOwn_numRows = CreateYourOwn_numRows + Repeat3__numRows
%>
<%
Dim Repeat5__numRows
Repeat5__numRows = -1
Dim Repeat5__index
Repeat5__index = 0
Stabilizers_numRows = Stabilizers_numRows + Repeat5__numRows
%>
<%
Dim Repeat6__numRows
Repeat6__numRows = -1
Dim Repeat6__index
Repeat6__index = 0
targetsightaccessories_numRows = targetsightaccessories_numRows + Repeat6__numRows
%>
<%

' *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters

' create the list of parameters which should not be maintained
MM_removeList = "&index="
If (MM_paramName <> "") Then MM_removeList = MM_removeList & "&" & MM_paramName & "="
MM_keepURL="":MM_keepForm="":MM_keepBoth="":MM_keepNone=""

' add the URL parameters to the MM_keepURL string
For Each Item In Request.QueryString
  NextItem = "&" & Item & "="
  If (InStr(1,MM_removeList,NextItem,1) = 0) Then
    MM_keepURL = MM_keepURL & NextItem & Server.URLencode(Request.QueryString(Item))
  End If
Next

' add the Form variables to the MM_keepForm string
For Each Item In Request.Form
  NextItem = "&" & Item & "="
  If (InStr(1,MM_removeList,NextItem,1) = 0) Then
    MM_keepForm = MM_keepForm & NextItem & Server.URLencode(Request.Form(Item))
  End If
Next

' create the Form + URL string and remove the intial '&' from each of the strings
MM_keepBoth = MM_keepURL & MM_keepForm
if (MM_keepBoth <> "") Then MM_keepBoth = Right(MM_keepBoth, Len(MM_keepBoth) - 1)
if (MM_keepURL <> "")  Then MM_keepURL  = Right(MM_keepURL, Len(MM_keepURL) - 1)
if (MM_keepForm <> "") Then MM_keepForm = Right(MM_keepForm, Len(MM_keepForm) - 1)

' a utility function used for adding additional parameters to these strings
Function MM_joinChar(firstItem)
  If (firstItem <> "") Then
    MM_joinChar = "&"
  Else
    MM_joinChar = ""
  End If
End Function
%>
<%
Dim Repeat4__numRows
Repeat4__numRows = -1
Dim Repeat4__index
Repeat4__index = 0
ArcheryProgram_numRows = ArcheryProgram_numRows + Repeat4__numRows
%>
<%
Dim Repeat1__numRows
Repeat1__numRows = -1
Dim Repeat1__index
Repeat1__index = 0
Huntingsights_numRows = Huntingsights_numRows + Repeat1__numRows
%>
<html>
<head>
<title>High Country Archers one stop center for all of your 3-D, bowhunting,archery 
needs from bows and all types of accessories to arrows and arrow components to 
free advice and technical support.</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<meta name="Description" content="High Country Archers for your 3-D bowhunting archery bows accessories arrows arrow components bow packages carry top quality archery equipment">
<meta name="Keywords" content="bowhunting,archery,hunting,3-d archery,Bows,archery accessories,arrows,archery sights,muzzy,hoyt,bowtech,matthews,High Country Archery,sights,stabilizers,quivers,arrow rest,target,archery,Archery Equipment,bow hunting,compound bows,Columbus Georgia,bow and arrow">
<script language="JavaScript">
<!--
<!--
function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
// -->

function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_findObj(n, d) { //v4.0
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && document.getElementById) x=document.getElementById(n); return x;
}

function MM_nbGroup(event, grpName) { //v3.0
  var i,img,nbArr,args=MM_nbGroup.arguments;
  if (event == "init" && args.length > 2) {
    if ((img = MM_findObj(args[2])) != null && !img.MM_init) {
      img.MM_init = true; img.MM_up = args[3]; img.MM_dn = img.src;
      if ((nbArr = document[grpName]) == null) nbArr = document[grpName] = new Array();
      nbArr[nbArr.length] = img;
      for (i=4; i < args.length-1; i+=2) if ((img = MM_findObj(args[i])) != null) {
        if (!img.MM_up) img.MM_up = img.src;
        img.src = img.MM_dn = args[i+1];
        nbArr[nbArr.length] = img;
    } }
  } else if (event == "over") {
    document.MM_nbOver = nbArr = new Array();
    for (i=1; i < args.length-1; i+=3) if ((img = MM_findObj(args[i])) != null) {
      if (!img.MM_up) img.MM_up = img.src;
      img.src = (img.MM_dn && args[i+2]) ? args[i+2] : args[i+1];
      nbArr[nbArr.length] = img;
    }
  } else if (event == "out" ) {
    for (i=0; i < document.MM_nbOver.length; i++) {
      img = document.MM_nbOver[i]; img.src = (img.MM_dn) ? img.MM_dn : img.MM_up; }
  } else if (event == "down") {
    if ((nbArr = document[grpName]) != null)
      for (i=0; i < nbArr.length; i++) { img=nbArr[i]; img.src = img.MM_up; img.MM_dn = 0; }
    document[grpName] = nbArr = new Array();
    for (i=2; i < args.length-1; i+=2) if ((img = MM_findObj(args[i])) != null) {
      if (!img.MM_up) img.MM_up = img.src;
      img.src = img.MM_dn = args[i+1];
      nbArr[nbArr.length] = img;
  } }
}
//-->
</script>
</head>
<body bgcolor="#FFFFFF" text="#000000" onLoad="MM_preloadImages('../nav_button_prod_ovr.jpg','../nav_button_about_ovr.jpg','../nav_button_contact_ovr.jpg')">
<div id="Layer1" style="position:absolute; width:200px; height:115px; z-index:1; left: 7px; top: 5px"><img src="../hdr_toxonics.jpg" width="810" height="180"></div>
<div id="Layer3" style="position:absolute; width:200px; height:61px; z-index:18; left: 270px; top: 132px"> 
  <table border="0" cellpadding="0" cellspacing="0">
	<tr> 
	  <td><a href="../../product.htm" onClick="MM_nbGroup('down','group1','Products','../nav_button_prod_ovr.jpg',1)" onMouseOver="MM_nbGroup('over','Products','../nav_button_prod_ovr.jpg','../nav_button_prod_ovr.jpg',1)" onMouseOut="MM_nbGroup('out')"><img name="Products" src="../nav_button_prod.jpg" border="0" onLoad="" width="71" height="61"></a></td>
	  <td><a href="../../about_us.htm" onClick="MM_nbGroup('down','group1','About','../nav_button_about_ovr.jpg',1)" onMouseOver="MM_nbGroup('over','About','../nav_button_about_ovr.jpg','../nav_button_about_ovr.jpg',1)" onMouseOut="MM_nbGroup('out')"><img name="About" src="../nav_button_about.jpg" border="0" onLoad="" width="71" height="61"></a></td>
	  <td><a href="../../contact_us.htm" onClick="MM_nbGroup('down','group1','Contact','../nav_button_contact_ovr.jpg',1)" onMouseOver="MM_nbGroup('over','Contact','../nav_button_contact_ovr.jpg','../nav_button_contact_ovr.jpg',1)" onMouseOut="MM_nbGroup('out')"><img name="Contact" src="../nav_button_contact.jpg" border="0" onLoad="" width="71" height="61"></a></td>
	</tr>
  </table>
</div>
<div id="Layer4" style="position:absolute; width:156px; height:75px; z-index:19; left: 13px; top: 209px"><img src="bodoodle.jpg" width="184" height="65"></div>
<div id="Layer5" style="position:absolute; width:200px; height:115px; z-index:20; left: 17px; top: 297px;"> 
  <table width="75%" border="0">
    <tr> 
      <td><p><b><font face="Arial,Helvetica"><font color="#FF0000"><font size=+2>DOODLE-DROP</font></font></font></b> 
          <b><font face="Arial Narrow"><font color="#FFFFFF"><font size=+1>ble-activated 
          drop away rest for bowhunters.</font></font></font></b>
        <table border=0 cellspacing=0 cellpadding=10 width="590" >
          <tr align=LEFT valign=TOP> 
            <td width="227"><font face="Arial,Helvetica">This rest shoots like 
              darts from the moment you put it on your bow. Designed for buss 
              cable activation. Handles any style or size arrow and any fletching 
              without interference. Quick to set up. Totally adjustable. Perfect 
              arrow flight every shot.</font> <ul>
                <li> <font face="Arial,Helvetica"><font size=-1>New stainless 
                  steel Hunter Speed Fins keep your arrow on the rest, even if 
                  you cant your bow.</font></font></li>
                <li> <font face="Arial,Helvetica"><font size=-1>Supports arrow 
                  gently, but releases at the exact correct moment.</font></font></li>
                <li> <font face="Arial,Helvetica"><font size=-1>Tunes perfectly 
                  in just minutes.</font></font></li>
                <li> <font face="Arial,Helvetica"><font size=-1>Totally silent 
                  shooting.</font></font></li>
                <li> <font face="Arial,Helvetica"><font size=-1>Cable attachment 
                  to forward buss cable.</font></font></li>
                <li> <font face="Arial,Helvetica"><font size=-1>So easy, nothing 
                  can go wrong.</font></font></li>
                <li> <font face="Arial,Helvetica"><font size=-1>Precision machined 
                  aluminum body. Stainless steel speed fins.</font></font></li>
                <li> <font face="Arial,Helvetica"><font size=-1>Smoke Quiet Tape 
                  (included) silences any hint of noise of arrow on speed fins.</font></font></li>
                <li> <font face="Arial,Helvetica"><font size=-1>LH or RH.</font></font></li>
              </ul></td>
            <td width="323"><p><b><font face="Arial Narrow"><font color="#FFFFFF"><font size=+1><img src="DoodleDrop.jpg" width="227" height="251" hspace="5" vspace=5 border=1></font></font></font></b> 
                <br>
                <font size=-1>#BDSA600 - Black</font> </p>
              <p align="center"><font color="#006600" size="-1" face="Verdana, Arial, Helvetica, sans-serif"><strong><font size="3">Retail 
                Price<br>
                </font></strong></font><font size="3"><strong><font color="#006600" face="Verdana, Arial, Helvetica, sans-serif">$59.95</font></strong></font> 
              <p align="center"><font size="3"><strong><font color="#006600" face="Verdana, Arial, Helvetica, sans-serif">Our 
                Price<br>
                $50.00</font></strong></font></p>
              <p>&nbsp;</p></td>
        </table>
        <b><font face="Arial Narrow"><font color="#FFFFFF"></font></font></b></td>
    </tr>
  </table>
</div>
</body>
</html>