function getinbetween2(sContents, sBeginningKey, sEndingKey) {
	var sText;
	var iBeginningKeyStartsAt;
	var sEndingKeyStartsAt;
	var vbTextCompare;
	var sCapturedResult;
	vbTextCompare=true;
	sText = sContents
	iBeginningKeyStartsAt = instr(1, sContents, sBeginningKey, vbTextCompare);
	sEndingKeyStartsAt = instr(1, sContents, sEndingKey, vbTextCompare);
	if (iBeginningKeyStartsAt > 0 && sEndingKeyStartsAt > 0) {
	   sText = right(sText, (len(sText) - (iBeginningKeyStartsAt + (len(sBeginningKey) - 1))));
	   sText = left(sText, (instr(1, sText, sEndingKey, vbTextCompare) - 1))
	   if ( sText == "" ) {
	      sCapturedResult = ""
	   }
	   else{
	      sCapturedResult = sText
	   }
	}
	else{
	  sCapturedResult = ""
	}
    return sCapturedResult;
}


function instr(iStartingFrom,lrgstring,smstring,bolNotCaseSensitive) {
	
	lrgstring=lrgstring.substring(iStartingFrom-1,lrgstring.length)
	//alert('after the cut' + lrgstring)
	if ( bolNotCaseSensitive ) {
		lrgstring=lrgstring.toLowerCase();	
		smstring=smstring.toLowerCase();
	}	
   	if ( smstring == lrgstring.substring(0,smstring.length) ) {
   	   //set foundat to 1 and return immediately since smstring is found at the beginning of the lrgstring already !...
   	   foundat=1;
   	   return foundat;
   	}
	strlen1 = smstring.length
	strlen2 = lrgstring.length
	foundat = 0
	for (i=0;i<=strlen2;i++) {
		comp=lrgstring.substring(i-1,strlen2)
		comp = comp.substring(0,strlen1)		
		if (comp == smstring) {
			foundat = i
			break
		}
	}
   	
	
	if ( iStartingFrom != 1 ) {
	    return foundat-(iStartingFrom-1);
	}
	else{
		return foundat;	
	}
}

function len(str) {
  return String(str).length;  
}
 



function ucase(str) {
	return str.toUpperCase()
}


function spot(smstring,lrgstring) {
	strlen1 = smstring.length
	strlen2 = lrgstring.length
	foundat = 0
	for (i=0;i<=strlen2;i++) {
		comp=lrgstring.substring(i-1,strlen2)
		comp = comp.substring(0,strlen1)		
		if (comp == smstring) {
			foundat = i
			break
		}
	}
	return foundat
}

function rightof(smstring,lrgstring) {
	//returns the rightmost characters of lrgstring back to smstring.
	//If user passes an empty string, change that to a space.
	if (smstring == ""){smstring = " "}
	strlen1 = smstring.length
	strlen2 = lrgstring.length
	foundat = 0
	for (i=strlen2;i>=0;i--) {
		comp=lrgstring.substring(i-1,strlen2)
		comp = comp.substring(0,strlen1)		
		if (comp == smstring) {
			foundat = i
			break
		}
	}
	return lrgstring.substring(foundat,255)
}



function right(str,n) {
	//returns the right n characters of str
	strlen = str.length
	return str.substring(strlen-n,strlen)
}


function pcase(str) {
	//returns str in proper-noun case (first letter uppercase)
	strlen = str.length
	jj = str.substring(0,1).toUpperCase()
	jj = jj + str.substring(1,strlen).toLowerCase()
	for (i = 2; i <= strlen; i++) {
		if (jj.charAt(i)==" ") {
			lefthalf = jj.substring(0,i+1)
			righthalf = jj.substring(i+1,strlen)
			righthalf = righthalf.substring(0,1).toUpperCase()+righthalf.substring(1,strlen)
			jj=lefthalf+righthalf
		}
	}
	return jj
}


function mid(str,start,n) {
	if ( (n == null) || n == "undefined" ) {
	   n = str.length;
	}
	strlen = str.length
	var jj = str.substring(start-1,strlen)
	jj = jj.substring(0,n)
	return jj
}

function leftof(smstring,lrgstring) {
	if (smstring == ""){smstring = " "}
	strlen1 = smstring.length
	strlen2 = lrgstring.length
	foundat = 0
	for (i=0;i<=strlen2;i++) {
		comp=lrgstring.substring(i-1,strlen2)
		comp = comp.substring(0,strlen1)		
		if (comp == smstring) {
			foundat = i
			break
		}
	}
	return lrgstring.substring(0,(foundat-1))
}


function lcase(str) {
	return str.toLowerCase()
}

function left(str,n) {
	return str.substring(0,n)
}


function trim(str)   {

	if (str.length==0) {return "";} 

	while (str.charAt(0)==" ")
             {str=str.substring(1,str.length);}	

	while (str.charAt(str.length-1)==" ")
             {str=str.substring(0,str.length-1);}

    return str;      
}






function loadoptions(s)
{  
	var c = s.options[s.selectedIndex].value;
	var sLeft;
	var sRight;
	
	if ( c.length > 0 )
	{
	
		sLeft=getinbetween2(c,"left[","]")
	
		sRight=getinbetween2(c,"right[","]")
	
	
		parent.indexmiddleleft.location.href = sLeft
		
		parent.indexmiddleright.location.href = sRight
		
		parent.frames[0].ScrollToTop();
		
	}	
		
}



function loadframes(sLoadData)
{  
	
	var sLeft;
	var sRight;

	if ( sLoadData.length > 0 )
	{
	
		sLeft=getinbetween2(sLoadData,"left[","]")
	
		sRight=getinbetween2(sLoadData,"right[","]")
	
	
		parent.indexmiddleleft.location.href = sLeft
		
		parent.indexmiddleright.location.href = sRight
		
		parent.frames[0].ScrollToTop();
		
	}	
		
}

