function checa_mail(mail)
{
	var str, arroba, ponto
	str=mail
	for (i=0; i < (mail.length-1); i++)
	{
		if ((i > 0) && (str.charAt(i)=="@"))
		{
			arroba=true
		} else
			if ((str.charAt(i)==".") && (arroba))
			{
				ponto=true
			}
	}
	if ((! arroba) || (! ponto))
		return false
	else
		return true
}

function valida_login()
{
  f = document.frm;
	if ((f.email.value == "") || (!checa_mail(f.email.value)))
	{
		alert('Campo E-mail inválido');
		f.email.focus();
	} else
		if(f.senha.value == "")
		{
			alert('O Campo Senha é obrigatório');
			f.senha.focus();
		} else
			 f.submit();
}

function valida_login_mono()
{
  f = document.frm_mono;
	if ((f.email.value == "") || (!checa_mail(f.email.value)))
	{
		alert('Campo E-mail inválido');
		f.email.focus();
	} else
		if(f.senha.value == "")
		{
			alert('O Campo Senha é obrigatório');
			f.senha.focus();
		} else
			 f.submit();
}