var enviado
	
	function RInStr(n, s1, s2)
	{
	// Devuelve la posición de la última ocurrencia de s2 en s1
	// Si se especifica n, se empezará a comprobar desde esa posición
	// Sino se especifica, los dos parámetros serán las cadenas
		var numargs = RInStr.arguments.length;
		
		if(numargs < 3)
			return n.lastIndexOf(s1)+1;
		else
			return s1.lastIndexOf(s2,n)+1;
	}
	
	
	function InStr(n, s1, s2)
	{
	// Devuelve la posición de la primera ocurrencia de s2 en s1
	// Si se especifica n, se empezará a comprobar desde esa posición
	// Sino se especifica, los dos parámetros serán las cadenas
		var numargs = InStr.arguments.length;	
		var n = new String (n);
		if (numargs < 3)
			return n.indexOf(s1)+1;
		else
			return s1.indexOf(s2, n)+1;
	}
	

	function CalculaRuta (RutaBase, RutaDestino)
	{
		RutaBase = new String(RutaBase);
		var PosBarra = RInStr(RutaBase,'/');
		if (PosBarra == RutaBase.length)
			RutaBase = RutaBase.substring(0,RutaBase.length - 1);	
//Por cada "../" que haya en la ruta relativa destino te quita un nivel en la ruta base
		while (InStr(RutaDestino,'../') != 0)
		{
			RutaDestino = RutaDestino.replace('../','');			
			PosBarra = RInStr(RutaBase,'/');			
			RutaBase = RutaBase.substring(0,PosBarra - 1);			
		}		
		return RutaBase + '/' + RutaDestino;
	}
	

	
	function SaltoHttps(rutaDestino)
	{						

		var Ruta = new String(window.location);			
		var CarBarra = RInStr(Ruta,'/');		
		Ruta = Ruta.substring(0,CarBarra);
		//Ruta = Ruta.concat(rutaDestino);
		Ruta = CalculaRuta(Ruta,rutaDestino)
		if (InStr(window.location,'http:') != 0)
			Ruta = Ruta.replace('http:','https:');
		return Ruta;
	}
	

	
	function SaltoHttp(rutaDestino)
	{						
//Quita el nombre de la pagina de la ruta original		
		var Ruta = new String(window.location);
		var CarBarra = RInStr(Ruta,'/');		
		Ruta = Ruta.substring(0,CarBarra);		
		Ruta = CalculaRuta(Ruta,rutaDestino);		

		if (InStr(window.location,'https:') != 0)
			Ruta = Ruta.replace('https:','http:');		
		return Ruta;
	}