function parsemail(obj) {
	passed = true;  
	fieldtofocus = ""   ;
	message ="Por favor, revise el texto introducido: \n";
		var element = obj;
		var result = isEmail(element);
		if (result)  {
			passed = false;
			if (fieldtofocus == "")  {fieldtofocus = document.newsletter.email};
			}
		if (passed == true)  {
			return true;
		}
		if (passed == false)  {
			alert(message);
			fieldtofocus.focus();
			return false;
		}
		
	}
function isEmail(element)  {
	
	var inputStr = element.value;
		if (inputStr.length < 9)  {
			message += "El Email debe tener al menos 9 caracteres \n";
			return true;
		}
		var charA = inputStr.indexOf("@");
		if (charA == -1)  {
			message += "No se encuentra el carácter '@' \n";
			return true;
		}
		if (charA < 2 )  {
			message += "Detrás del carácter @ debe haber al menos dos caracteres \n";
			return true;
		}
		var charP = inputStr.lastIndexOf(".");
		if (charP == -1)  {
			message += "No se encuentra el carácter '.' \n";
			return true;
		}
		if (charP != inputStr.length - 3 && charP != inputStr.length - 4)  {
			message += "El carácter '.' no puede estar al final \n";
			return true;
		}
		if (charP < charA + 3)  {
			message += "Debe haber al menos dos caracteres entre '@' y '.' \n";
			return true;
		}
	return false;
	}


function _CF_onError(form_object, input_object, object_value, error_message)
    {
	alert(error_message);
       	return false;	
    }


function _CF_hasValue(obj, obj_type)
    {
    if (obj_type == "TEXT" || obj_type == "PASSWORD")
	{
    	if (obj.value.length == 0) 
      		return false;
    	else
			return true
	}

    else if (obj_type == "SELECT")
	{
        for (i=0; i < obj.length; i++)
	    	{
		if (obj.options[i].selected)
			return true;
		}

       	return false;	
	}
    else if (obj_type == "SINGLE_VALUE_RADIO" || obj_type == "SINGLE_VALUE_CHECKBOX")
	{

		if (obj.checked)
			return true;
		else
       		return false;	
	}
    else if (obj_type == "RADIO" || obj_type == "CHECKBOX")
	{

        for (i=0; i < obj.length; i++)
	    	{
		if (obj[i].checked)
			return true;
		}

       	return false;	
	}
	}


function  _CF_checkCFForm_1(_CF_this)

    {
			if (!parsemail(_CF_this.email)) 
			{
				return false; 
			}	

	window.open("trampa.htm","ventana_alta_mail_edipo","width=423,height=200,menubar=no, scrollbars=no")
    return true;

    }