getHtml()
getDate()

function getHtml(){
  var str='<table border="1" cellpadding="1" cellspacing="1" width="350"><tr><td align="center">';
  str+='<style>.Box{font:12px Verdana;font-weight:bold}</style>';
  str+='<form name="frm" onSubmit="return getIt();"><table border="0" cellpadding="4" cellspacing="2" width="340">';
  str+='<tr><td width="50" class="Box">Date</td>';
  str+='<td width="310" class="Box">DD '+getBox('DD',2)+' MM '+getBox('MM',2)+' YYYY '+getBox('YY',4)+' </td></tr>';
  str+='<tr><td width="50" class="Box">From</td><td width="250">'+getCals()+'</td></tr>';
  str+='<tr><td width="50" class="Box">To</td><td width="250">'+getLocs()+'</td></tr>';
  str+='<tr><td colspan="2" align="center"><input type="Submit"> <input type="Reset"></td></tr>';
  str+='</table></form>';
  str+='<IFrame ID="ifrm" src="" width="300" height="100" marginwidth="0" marginheight="0" scrolling="auto" border="0" frameborder="0"></IFrame>';
  str+='<br>&copy;DataTech.com.sa</td></tr></table>';

  document.write(str);
}
function getBox(pN,pS){
  return '<input type="text" class="Box" name="txt'+pN+'" size="'+pS+'" maxlength="'+pS+'">';
}
function getCals(){
  var Cal = 'Gregorian,Hebrew,Hijri,Japanese,Julian,Korean,Taiwan,Thai Buddhist';
  var listcal = '<select size="1" name="txtFrom">';
  var arrC = Cal.split(',');
  for(i=0;i<arrC.length;i++){
   listcal += '<option value="'+(i+1)+'">'+arrC[i]+' Calendar';
  }
  return listcal + '</select>';
}
function getLocs(){
  var Loc = 'Hijri Calendar:1025,Gregorian Calendar:1033,Hebrew Calendar:1037,Japanese Calendar:1041,Korean Calendar:1042,Taiwan Calendar:1028,Thai Buddhist Calendar:1054,';
  Loc += "Arabic (Saudi Arabia):1025,Arabic (Egypt):3073,Bulgarian (Bulgaria):1026,Catalan (Catalan):1027,Chinese (Taiwan):1028,Chinese (China):2052,Chinese (Singapore):4100,Czech (Czech Republic):1029,Danish (Denmark):1030,German (Germany):1031,English (United States):1033,";
  Loc += "Spanish (Mexico):2058,Spanish (Spain):3082,Finnish (Finland):1035,French (France):1036,Hebrew (Israel):1037,Hungarian (Hungary):1038,Icelandic (Iceland):1039,Italian (Italy):1040,Japanese (Japan):1041,Korean (Korea):1042,Dutch (Netherlands):1043,Norwegian (Bokm?l) (Norway):1044,";
  Loc += "Norwegian (Nynorsk) (Norway):2068,Polish (Poland):1045,Portuguese (Brazil):1046,Portuguese (Portugal):2070,Romanian (Romania):1048,Russian (Russia):1049,Croatian (Croatia):1050,Serbian (Latin) (Serbia):2074,Serbian (Cyrillic) (Serbia):3098,Slovak (Slovakia):1051,Albanian (Albania):1052,Swedish (Sweden):1053,Thai (Thailand):1054,Turkish (Turkey):1055,Urdu (Pakistan):1056,Indonesian (Indonesia):1057,Ukrainian (Ukraine):1058,Belarusian (Belarus):1059,Slovenian (Slovenia):1060,Estonian (Estonia):1061,Latvian (Latvia):1062,Lithuanian (Lithuania):1063,Farsi (Iran):1065,Vietnamese (Viet Nam):1066,Armenian (Armenia):1067,Azeri (Latin) (Azerbaijan):1068,Azeri (Cyrillic) (Azerbaijan):2092,Basque (Basque):1069,FYRO Macedonian:1071,Afrikaans (South Africa):1078,Georgian (Georgia):1079,Faroese (Faroe Islands):1080,Hindi (India):1081,Malay (Malaysia):1086,Malay (Brunei Darussalam):2110,Kazakh (Kazakhstan):1087,";
  Loc += "Kyrgyz (Kyrgyzstan):1088,Swahili (Kenya):1089,Uzbek (Latin) (Uzbekistan):1091,Uzbek (Cyrillic) (Uzbekistan):2115,Tatar (Russia):1092,Punjabi (India):1094,Gujarati (India):1095,Tamil (India):1097,Telugu (India):1098,Kannada (India):1099,Marathi (India):1102,Sanskrit (India):1103,Mongolian (Mongolia):1104,Galician (Galician):1110,Konkani (India):1111,Syriac (Syria):1114,Divehi (Maldives):1125";
  var listLoc = '<select size="1" name="txtTo">';
  var arrL = Loc.split(',');
  var arr;
  for(i=0;i<arrL.length;i++){
   arr = arrL[i].split(':');
   listLoc += '<option value="'+arr[1]+'">'+arr[0];
  }
  return listLoc + '</select>';
}
function getIt(){
  var frm = document.frm;
  var dd = frm.txtDD.value;
  var mm = frm.txtMM.value;
  var yy = frm.txtYY.value;
  var dfr = frm.txtFrom[frm.txtFrom.selectedIndex].value;
  var dto = frm.txtTo[frm.txtTo.selectedIndex].value;  
  var vURL = 'http://www.datatech.com.sa/Services/GlobalDates.aspx?D='+dd+'&M='+mm+'&Y='+yy+'&L='+dto+'&C='+dfr;
  var nv = navigator;
  if(nv.appName=='Microsoft Internet Explorer' || nv.product=='Gecko'){
    var iFrame = document.getElementById("ifrm");
    iFrame.src=vURL;
  }else{
    open(vURL,"","width=300,height=100,directories=0,scrollbars=0,status=0;resizable=0");
  }
  return false;
 }
function getDate(){
  var dt = new Date();
  var frm = document.frm;
  frm.txtDD.value = dt.getDate();
  frm.txtMM.value = dt.getMonth()+1;
  frm.txtYY.value = dt.getFullYear();
}
