/** \brief Hilfsfunction zum Auswählen eines Objektes
 *
 * \param n Name des Objektes
 * \param d Sub-Frame Objekt
 *
 * \code
 * var img = MM_findObj("image_name");
 * \endcode
 *
 * \return Das entspechende Objekt
 **/
function MM_findObj(n, d) //v4.01
{
	var p,i,x;

	if(!d) d = document;
	
	if((p = n.indexOf("?"))>0 && parent.frames.length)
	{
		d = parent.frames[n.substring(p+1)].document;
		n = n.substring(0,p);
	}
	
  if(!(x=d[n])&&d.all) x=d.all[n];
  
  for(i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  
  for(i=0;!x&&d.layers&&i<d.layers.length;i++)
  
  x = MM_findObj(n, d.layers[i].document);
  
  if(!x && d.getElementById) x = d.getElementById(n);
  
  return x;
}

/** \brief Überprüfen der E-Mailadresse
 *
 * \param email Textbox mit der zu prüfende Adresse
 *
 * \code
 * var emailadresse = MM_findObj("absender");
 *
 * if(chkIsEMail(emailadresse) == false)
 * {
 *   return false;
 * }
 * \endcode
 '
 * \return true wenn es sich um eine güldige E-Mailadresse handelt
 **/
function chkIsEMail(email)
{
	if (email.value=="") // überprüfen ob leer
	{
		alert ("Bitte geben Sie ihre eMail-Adresse ein!");
		email.focus();
		return false;
	}
	
	if (email.value.length < 6) // überprüfen der länge
	{
		alert ("Die von Ihnen eingegebene eMail-Adresse ist unglültig!");
		email.focus();
		return false;
	}
	
	var x = email.value.indexOf("@");
	var y = email.value.lastIndexOf(".");
	
	if(x<0 || y<x) // überprüfen ob das @ vorhanden ist und danach ein punkt folgt
	{
		alert ("Die von Ihnen eingegebene eMail-Adresse ist unglültig!");
		email.focus();
		return false;
	}
	
	if(y+5<email.value.length)
	{
		alert ("Die von Ihnen eingegebene eMail-Adresse ist unglültig!");
		email.focus();
		return false;
	}
	
	return true;
}