

if (document.images) {
ads = new Array(3);
ads[0] = "http://www.veindirectory.org/affiliates/banners/affiliate_sciton.jpg";
ads[1] = "http://www.veindirectory.org/affiliates/banners/affiliate_terason.jpg";
ads[2] = "http://www.veindirectory.org/affiliates/banners/affiliate_medicaljustice.jpg";
}

newplace = new Array(3);
newplace[0] = "http://www.veindirectory.org/affiliates/listing.asp?aid=19"
newplace[1] = "http://www.veindirectory.org/affiliates/listing.asp?aid=17"
newplace[2] = "http://www.veindirectory.org/affiliates/listing.asp?aid=22"


var timer = null
var	 counter = 0

function loadBanner() {
	    timer=setTimeout("loadBanner()", 4000);
		counter++;
		if (counter >= 3)
		counter = 0;
		document.bannerad.src = ads[counter];
}

function gothere() {
		counter2 = counter;
		window.location.href = newplace[counter2];
}


//banners arrays and functions configuration
banners = new Array(3);

banners[0] = new Array(4);
banners[0][0] = "Sciton"; //name
banners[0][1] = "<img src='/affiliates/banners/affiliate_19_sciton.jpg' border='0' alt='Sciton'>"; //image
banners[0][2] = "/affiliates/listing.asp?aid=19"; //link
banners[0][3] = "Sciton Description"; //description

banners[1] = new Array(4);
banners[1][0] = "Terason";
banners[1][1] = "<img src='/affiliates/banners/affiliate_17_terason.jpg' border='0' alt='Terason'>";
banners[1][2] = "/affiliates/listing.asp?aid=17";
banners[1][3] = "Terason Description Terason Description Terason Description Terason Description Terason Description Terason Description Terason Description Terason Description";

banners[2] = new Array(4);
banners[2][0] = "Medical Justice";
banners[2][1] = "<img src='/affiliates/banners/affiliate_22_medicaljustice.jpg' border='0' alt='Medical Justice'>";
banners[2][2] = "/affiliates/listing.asp?aid=22";
banners[2][3] = "Medical Justice Description Medical Justice Description Medical Justice Description Medical Justice Description";

banners[3] = new Array(4);
banners[3][0] = "Ephlebology";
banners[3][1] = "<img src='/affiliates/banners/affiliate_4_ephlebology.jpg' border='0' alt='Ephlebology'>";
banners[3][2] = "/affiliates/listing.asp?aid=4";
banners[3][3] = "Ephlebology Description";

banners[4] = new Array(4);
banners[4][0] = "Biosoundimage";
banners[4][1] = "<img src='/affiliates/banners/affiliate_16_biosoundimage.jpg' border='0' alt='Biosoundimage'>";
banners[4][2] = "/affiliates/listing.asp?aid=16";
banners[4][3] = "Biosoundimage Description";

var b_timer = null;
var	 b_counter = 0;
var b_displayname = 0;
function swapTimer() {
	
	var htmlstr = "";
	var div = document.getElementById("banner_rotate"); 
	b_timer = setTimeout("swapTimer()", 3000);
	b_counter++;
	if(b_counter > 2) { b_counter = 0; }
	htmlstr = '<a target="_blank" href="' + banners[b_counter][2] + '">' + banners[b_counter][1] + '</a>';
	if(b_displayname) {
		htmlstr += "<br />" + banners[b_counter][0];
	}
	div.innerHTML = htmlstr;
}


function displayBanner(div,displaystyle,group,displayname,displaytext,align,width) {
	//displaystyle = rotate,vertical,horizontal
	//group = 0,1,2 (0=show all, 1=show only group 1)
	//displayname = 0/1
	//displaytext = 0/1
	//align = center/left/right
	
	var htmlstr = "";

	var div = document.getElementById(div);
	if(displaystyle == "rotate") {
		
		htmlstr = '<div id="banner_rotate" style="float:center;width:100px;text-align:center;">';
		htmlstr += '<a target="_blank" href="' + banners[0][2] + '">' + banners[0][1] + '</a>';
		if(displayname) {
			b_displayname = 1;
			htmlstr += "<br />" + banners[0][0];
		}
		htmlstr += '</div>';
		//setTimeout("swapTimer()", 3000);
		b_timer = setTimeout("swapTimer()", 3000);
		
	} else if(displaystyle == "vertical") {
		
		htmlstr = '<div style="text-align:'+align+';width:'+width+' px;float:none;">';
		for(i=0;i<banners.length;i++) {
			
			htmlstr += '<div style="float:'+align+';width:100px;text-align:center;">';
			htmlstr += '<a target="_blank" href="' + banners[i][2] + '">' + banners[i][1] + '</a>';
			
			if(displayname) {
				htmlstr += "<br />" + banners[i][0];
			}
			
			htmlstr += "</div>"
			
			if(displaytext) {
				htmlstr += '<div style="margin-left:105px;float:none;text-align:left;">' + banners[i][3] + "</div>";
			}
			
			//height of space between logos
			htmlstr += '<div style="padding-bottom:5px;clear:both;"></div>';
			
		}
		htmlstr = htmlstr + "</div>";
		
			
	} else if(displaystyle == "horizontal") {
		//too many problems with div, use tables instead
		htmlstr = '<table border="0" cellpadding="0" cellspacing="0" width="100%"><tr><td valign="top" align="'+align+'">';
		htmlstr += '<table border="0" cellpadding="0" cellspacing="0"><tr>';
		for(i=0;i<banners.length;i++) {
			
			htmlstr += '<td valign="top" style="padding-right:5px;" align="center">';
			htmlstr += '<a target="_blank" href="' + banners[i][2] + '">' + banners[i][1] + '</a>';
			
			if(displayname) {
				htmlstr += "<br />" + banners[i][0];
			}
			
			htmlstr += "</td>"

			
		}
		htmlstr = htmlstr + "</tr></table></td></tr></table>";	
	
	}
	//alert(htmlstr);
	div.innerHTML = htmlstr;
}

/* usage:
<div align="center" id="banners" name="banners">
    <script type="text/javascript">
	//displayBanner(div,displaystyle,group,displayname,displaytext,align)
	displayBanner("banners","horizontal",0,0,0,"center",350);
  </script>
  </div>

*/
/* TBD for tracking:
1. insert tracking info if ID is valid with info from this url:
	redirect.asp?url=affiliateURL
2. redirect to target page with  <% Response.Redirect Request.QueryString("URL")%>  


function insert_visit()
  dim objRs2
      Set objRs2 = Server.CreateObject("ADODB.Recordset")
    strSQL = "Insert Into SITE_VISITS (VISIT_IP, VISIT_DATE,VISIT_LIST_ID, VISIT_INFO, SOURCE_SYSTEM_ID, VISIT_REFERER) "
    strSQL = strSQL & "Values ('" & Request.ServerVariables("REMOTE_ADDR") & "','" & Now() & "',"&ID&",1,"&strSourceIdVar&",'"&request.servervariables("http_referer")'"&")"
    'Response.write strSQL
    ' Insert Record
    objRs2.Open strSQL, objCn
end function
*/


/*
banners = new Array(3);

banners[0] = new Array(4);
banners[0][0] = ""; //name
banners[0][1] = "<img src='' border='0' alt=''>"; //image
banners[0][2] = ""; //link
banners[0][3] = ""; //description

banners[1] = new Array(4);
banners[1][0] = "";
banners[1][1] = "<img src='' border='0' alt=''>";
banners[1][2] = "";
banners[1][3] = "";

banners[2] = new Array(4);
banners[2][0] = "";
banners[2][1] = "<img src='' border='0' alt=''>";
banners[2][2] = "";
banners[2][3] = "";
*/

