function checkEmail(f,fld) {

    var s = f.elements[fld].value;
    if (s) {
	var atsymbol = "@";
	var atoffset = s.indexOf(atsymbol);
	if (atoffset == -1) {
	    alert(s + "このメールアドレスは無効です。＠が入っていません");
	    return false
	} else {
	    if (atoffset > s.lastIndexOf(".") || atoffset < s.lastIndexOf(atsymbol)) {
	        alert(s + "このメールアドレスは無効です。ドメイン名がない、あるいは＠が2個以上入っています");
	        return false
	    } else {
			var re = /[^A-Za-z0-9_@\.\-]/;
			var foundArray = re.exec(s);
			if (foundArray) {
			    if (foundArray == " ") {
				alert("メールアドレスにはスペースは使用できません")
			    } else {
				alert("メールアドレスには「" + foundArray + "」は使用できません")
			    }
			    return(false)
			} else {
			    return(true)
			}
	    }
	}	
    } else {
	alert("メールアドレスを入力して下さい");
	return(false)
    }
}

function checkEmail_e(f,fld) {

    var s = f.elements[fld].value;
    if (s) {
	var atsymbol = "@";
	var atoffset = s.indexOf(atsymbol);
	if (atoffset == -1) {
	    alert("Please input your correct E-mail address");
	    return false
	} else {
	    if (atoffset > s.lastIndexOf(".") || atoffset < s.lastIndexOf(atsymbol)) {
	        alert("Please input your correct E-mail address");
	        return false
	    } else {
			var re = /[^A-Za-z0-9_@\.\-]/;
			var foundArray = re.exec(s);
			if (foundArray) {
			    if (foundArray == " ") {
				alert("Please input your correct E-mail address")
			    } else {
				alert("Please input your correct E-mail address")
			    }
			    return(false)
			} else {
			    return(true)
			}
	    }
	}	
    } else {
	alert("Please input E-mail address");
	return(false)
    }
}