function loadArea(frm,area,subarea) {
   //alert("Area is " + area);
   // Fill up initial option values
   try {
   
   frm.area.length = 0;
   Areas[Areas.length] = "";
   var same = false;
   for(count = 0; count < Areas.length - 1; count++) {
      same = false;
      if (Areas[count] == area) same = true;
      frm.area.options[count] = new Option(Areas[count], Areas[count], same, same)
   }
fillSubarea(frm,area, subarea)

   } catch (e) {
   }
}

function fillSubarea(frm, area, subarea)
{
   try {
      frm.subarea.length = 0;
      reg = new String(Areas[frm.area.selectedIndex])
      if (reg == "") {
         reg = area;
      }
      var same = false;
      if (reg != "") {
         for(count = 0; count < Subareas[reg].length - 1; count ++)  {
            same = false;
            if (Subareas[reg][count] == subarea) same = true;
            frm.subarea.options[count] = new Option(Subareas[reg][count],Subareas[reg][count], same, same);
         }
     
      }
   } catch (e) {
   }
}