function confirmSubmit() {
//alert(); 
var frm = document.form_contact;
var ermsg;
//alert(frm.id.value);
  ermsg = "";//
  if((frm.sname.value == ""))
    ermsg += " - Uw Naam\n";
  if((frm.semail.value == ""))
    ermsg += " - Uw Email\n";
  if((frm.amigos.length == 0)){  
    if((frm.rname.value == ""))
      ermsg += " - Naam bekende\n"; 
    if((frm.remail.value == ""))
      ermsg += " - Email bekende\n";
    }//if
  if(ermsg != ""){
    //alert(err);
    //alert(texter);
    //ermsg = "Please, fill in at least, the following fields:\n\n" + ermsg;
    ermsg = "Vul a.u.b. the volgende velden in:\n\n" + ermsg;
    alert(ermsg);//
	  return false;
	  }
	else {
    	   //check emails
    	   //*************
    	   email = frm.semail.value;
    	   //alert();
        //Assumes that valid email addresses consist of user_name@domain.tld
        at = email.indexOf('@');
        dot = email.indexOf('.');      
        if((email.length < 6 || at == -1 || at == -1 || dot == 0 || dot == email.length - 1)){
            //alert(email_address+"\n"+frm.text_email_reperir.value)
            alert(email + " - Emailadres incorrect.\n");
            return false;
            }   
            	   
    if((frm.rname.value != "") && (frm.remail.value != "")){
      var elm = frm.rname.value + " (" + frm.remail.value + ")";
      var isin = false;
      for(i=0;i<frm.amigos.length;i++){
          txt = (frm.amigos.options[i]).text;
          //txt = (frm.amigos.options[i]).text;
          if(txt == elm)//aready in the list
              isin = true;
          }//for
          
      if(!isin){
          sNewItem = document.createElement("OPTION");
          frm.amigos.options.add(sNewItem,0);
          frm.amigos.options[0].text = elm;
          frm.amigos.options[0].value = frm.rname.value+"~"+frm.remail.value;
          }//if
      frm.rname.value = "";
      frm.remail.value = "";
      }//if

    frm.friends_mails.value = "";
    for(i=0;i<frm.amigos.length;i++){
        vlt = (frm.amigos.options[i]).value;
        //txt = (frm.amigos.options[i]).text;
        frm.friends_mails.value = frm.friends_mails.value+"|"+vlt;
        }//for
    return true;
    //frm.submit();
    }
}

function checkLength(el){
    
	maxlimit = 200;
	
	if (el.value.length > maxlimit){
        if (el.value.length > maxlimit){ // if too long...trim it! 
			el.value = el.value.substring(0, maxlimit);
		}
		alert("Uw bericht mag maximaal " + maxlimit +" karakters bevatten");
        return false;
    }
    return true;
}

function addfriendtolist()
{
var frm = document.form_contact;
  if((frm.rname.value=="") || (frm.remail.value=="")){
      alert("s.v.p. naam en e-mail invoeren.");
      }
  else{
       var email = frm.remail.value;
    	   //alert();
        //Assumes that valid email addresses consist of user_name@domain.tld
        var at = email.indexOf('@');
        var dot = email.indexOf('.');      
        if((email.length < 6 || at == -1 || at == -1 || dot == 0 || dot == email.length - 1)){
            //alert(email_address+"\n"+frm.text_email_reperir.value)
            alert(email + " - Emailadres incorrect.\n");
            return false;
            }   	   

      var elm = frm.rname.value + " (" + frm.remail.value + ")";
      
      for(i=0;i<frm.amigos.length;i++){
          txt = (frm.amigos.options[i]).text;
          //txt = (frm.amigos.options[i]).text;
          if(txt == elm)//aready in the list
              return false;
          }//for
      
      sNewItem = document.createElement("OPTION");
      frm.amigos.options.add(sNewItem,0);
      frm.amigos.options[0].text = elm;
      frm.amigos.options[0].value = frm.rname.value+"~"+frm.remail.value;

      frm.rname.value = "";
      frm.remail.value = "";
      }
}

function delfriend() {
var frm = document.form_contact;
    //alert((frm.selected_topics.options[0]).value);
    if(frm.amigos.length > 0){
        frm.amigos.remove(frm.amigos.selectedIndex);
        //(frm.strseltopics.value).replace(new RegExp("*"+id,"gi"),"");
        }
        
    for(i=0;i<frm.amigos.length;i++){
        vlt = (frm.amigos.options[i]).value;
        if(vlt == ""){
            frm.amigos.remove(i);
            }
        }//for
}

function expanddivs()
{
var frm = document.form_contact;
    document.getElementById('link_shdivs').style.display = "none";
    document.getElementById('listtxt').style.display = "inline";
    document.getElementById('link_addlist').style.display = "inline";
    document.getElementById('div_amigos').style.display = "inline";
    
    if((frm.rname.value != "") && (frm.remail.value != "")){
      var elm = frm.rname.value + " (" + frm.remail.value + ")";          
      sNewItem = document.createElement("OPTION");
      frm.amigos.options.add(sNewItem,0);
      frm.amigos.options[0].text = elm;
      frm.amigos.options[0].value = frm.rname.value+"~"+frm.remail.value;
      frm.rname.value = "";
      frm.remail.value = "";
      }//if

    frm.friends_mails.value = "";
    for(i=0;i<frm.amigos.length;i++){
        vlt = (frm.amigos.options[i]).value;
        //txt = (frm.amigos.options[i]).text;
        frm.friends_mails.value = frm.friends_mails.value+"|"+vlt;
        }//for
}
