function WriteVertical(str_oriz){
	var str_vert;
	str_vert = "";
	for (i = 0; i < str_oriz.length; i++) {
		str_vert = str_vert + str_oriz.slice(i,i+1) + "<br>" 
	}
	return str_vert;
}

function f_opendiv(obj_name, obj_ssfname, esci)
{
	var obj_div;
	var obj_img;
	var name_subfolder;
	var title_subfolder;
	var vert_subfolder;
	var i;
	var li_index;

	var obj = document.all.item(obj_name + "index.htm");
	if (obj) {		
		obj_ssfname == null ? title_subfolder = obj.innerText : title_subfolder = document.all.item(obj_ssfname.slice(2, obj_ssfname.length) + "index.htm").innerText;
		name_subfolder = obj.name.slice(2);
		obj_div = document.all.item("div_" + name_subfolder);
		obj_img = document.all.item("img_" + name_subfolder);
		
		if (obj_div.style.display == "none") {
			
			//Nascondo gli eventuali menu aperti
			var coll_div = document.all.tags("DIV");
		    for (li_index=0; li_index<coll_div.length; li_index++){
				if ((coll_div(li_index).id.slice(0, 4) == "div_") && (coll_div(li_index).style.display == "")){
					coll_div(li_index).style.display = "none";
				}
			}			
			
			obj_div.style.display = ""
			if (obj_img) {
				document.all.item("title_folder").innerHTML = "<IMG SRC='" + obj_img.src + "'>";
			} else {
				vert_subfolder = WriteVertical(title_subfolder);
				document.all.item("title_folder").innerHTML = vert_subfolder;
			}			
		} else {
			obj_div.style.display = "none";
			document.all.item("title_folder").innerHTML = "";
		}
	} else {
		if (esci == true) return;
		
		var r, re;
		var str_appo; 
		re = new RegExp("/", "ig") 

		str_appo = obj_name.slice(0, (obj_name.length-1));
		r = str_appo.match(re);
		if (r != null) {		
			str_appo = obj_name.slice(0, r.lastIndex);
			f_opendiv(str_appo, obj_name, true);
		}
	}
	/*
	var coll_div = document.all.tags("DIV");
    for (li_index=0; li_index<coll_div.length; li_index++){
		if ((coll_div(li_index).id.slice(0, 4) == "div_") && (coll_div(li_index).style.display == "")){
			name_subfolder = coll_div(li_index).id.slice(4);
			obj_img = document.all.item("img_" + name_subfolder);
			if (obj_img) {
				document.all.item("title_folder").innerHTML = "<IMG SRC='" + obj_img.src + "'>";
			} else {
				vert_subfolder = WriteVertical(name_subfolder);
				document.all.item("title_folder").innerHTML = vert_subfolder;
			}
			break;
		}
	}		
	*/
}