		function click_email_this_page()
		{

			if (document.getElementById("area_email").style.display=="block")
			{
				document.getElementById("area_email").style.display="none";
				document.getElementById("area_message").style.display="none";
				document.getElementById("waiting").style.display="none";
			}
			else
			{
				document.getElementById("area_email").style.display="block";
				document.getElementById("area_message").style.display="none";
				document.getElementById("waiting").style.display="none";
			}

		}

		function check_email_address(obj)
		{
			var receiver_email=obj.value;
			if(receiver_email =="")
			{
				alert("Please enter Email Address");
				obj.focus();
				return false;
			}
			var emailPat=/^(.+)@(.+)$/;
			var specialChars="\\(\\)<>@,;:\\\\\\\"\\.\\[\\]";
			var validChars="\[^\\s" + specialChars + "\]";
			var quotedUser="(\"[^\"]*\")";
			var atom=validChars + '+';
			var word="(" + atom + "|" + quotedUser + ")";
			var userPat=new RegExp("^" + word + "(\\." + word + ")*$");
			var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$");
			var matchArray = receiver_email.match(emailPat);
			if (matchArray==null)
			{
				alert("Email address seems incorrect (check @ and .'s)");
				obj.focus();
				return false;
			}
			var user=matchArray[1];
			var domain=matchArray[2];
			if (user.match(userPat)==null)
			{
				alert("Email address is invalid: " + receiver_email);
				obj.focus();
				return false;
			}
			var domainArray=domain.match(domainPat)
			if (domainArray==null)
			{
				alert("Email address is invalid.");
				obj.focus();
				return false;
			}
			return true;
		}


		function send_email()
		{
			if(check_email_address(document.getElementById("receiver")))
			{
				document.getElementById("waiting").style.display="block";
				var email_address = document.getElementById("receiver").value;
				var message = document.getElementById("message").value;
				if(window.XMLHttpRequest) {
					email_xml = new XMLHttpRequest();
				} else {
					email_xml = new ActiveXObject("MSXML2.XMLHTTP");
				}
				var pageUrl="";
				pageUrl = window.location;
				pageUrl = pageUrl.toString();
				var url = '/cgi-bin/ajax.cgi?type=email_this_page&email=' + email_address + "&message=" + message  + "&url=" + pageUrl;
				email_xml.open("GET", url, true);
				email_xml.onreadystatechange = response_email;
				email_xml.setRequestHeader("If-Modified-Since","0");
				email_xml.send("");
			}
		}

		function response_email()
		{
			if (email_xml.readyState == 4)
			{
				document.getElementById("area_email").style.display="none";
				document.getElementById("area_message").style.display="block";
				document.getElementById("waiting").style.display="none";

			}
		}
