function tstmail(s)
  {
  var a = false;
  var res = false;
  if(typeof(RegExp) == 'function')
    {
    var b = new RegExp('abc');
    if(b.test('abc') == true){a = true;}
    }

  if(a == true)
    {
    reg = new RegExp('^([a-zA-Z0-9\\-\\.\\_]+)'+
                     '(\\@)([a-zA-Z0-9\\-\\.]+)'+
                     '(\\.)([a-zA-Z]{2,4})$');
    res = (reg.test(s));
    }
  else
    {
    res = (s.search('@') >= 1 &&
           s.lastIndexOf('.') > s.search('@') &&
           s.lastIndexOf('.') >= s.length-5)
    }
  return(res);
  }

function chkFormular(x) {
if (x==0) return true;
var n=0;
var b=false;
var s="";
b=document.getElementById("hr").checked; 
if (!b) b=document.getElementById("fr").checked; 
if (!b) s=s+"Anrede\n";
n=document.forms[0].length;
 for (var i = 0; i < n; ++i) 
{
   if (document.forms[0][i].id) {
     if (document.forms[0][i].value=="") 
        {
	s=s+document.forms[0][i].id+"\n";
	}
	else
	{
	   if (document.forms[0][i].id=='Email') {
              if (!tstmail(document.forms[0][i].value)) s=s+document.forms[0][i].id+"\n";
              }	
	}
    }
}
if (!s=="")
{
   alert("Fehlende oder falsche Daten in den Feldern:\n"+s);
   return false;
  }
   return true; 
}

function Go(x)
     {
        parent.frames[1].location.href = "themen.php?id="+x;
        document.forms[0].reset();
        document.forms[0].elements[0].blur();
      }