<!--
/* Copyright © 2004-07, Planet Networks. All rights reserved.
This Script is copyrighted Web-design material by Planet Networks.
Under no circumstances does any individual or entity have the right to distribute,
copy or modify this program without the exclusive written permission of Planet Networks.
*/

// Function to prevent SpamBots from picking up address from webpage: 

function OpenMail(ea_name) { if (!ea_name) return false

tdl = "AllTimeParty"
tdlext = ".com"

e_address = ea_name + "@" + tdl + tdlext

location = "mailto:" + e_address + "?subject=Contact via AllTimeParty..."

}



function LinkMail() {
document.FMail.SendTo.selectedIndex = 2
document.FMail.SendTo.focus()

if (document.FMail.SenderName.value == "") {
document.FMail.SenderName.focus()
 } else { 
document.FMail.Subject.focus() }
}



// Begining of Email Interactive helper

function CorrectNowEmail() {
if (document.FMail.ReplyType.selectedIndex == 0) { VerifyEmail() }
}


function VerifyEmail() {

var xEmail = document.FMail.ReplyTo.value
  if (xEmail != "")
 {
var  crucial1 = xEmail.indexOf("@");
var  crucial2 = xEmail.indexOf(".");
if (crucial1 < 1 || crucial2 < 1)
	{
  alert("The Email address you just entered is NOT in a VALID format. Please revise.");
  document.FMail.ReplyTo.focus();
  return (false);
	}
 }
}
// END of Email Interactive helper


function EmailSubmit(mForm) {

if (mForm.SenderName.value == "") {
alert("Please enter your name in the \"Your [sender's] name\" field.")
mForm.SenderName.focus(); return false }

if (mForm.ReplyTo.value == "") {
alert("Please enter your Email address or your phone number in the \"Reply to\" field")
mForm.ReplyTo.focus(); return false }

if (mForm.Msg.value == "" && mForm.Subject.value == "") {
alert("You forgot to type in your comment[s] in the message body and Subject fields.")
mForm.Subject.focus(); return (false) }

if (mForm.Msg.value.length > 10000) {
alert("You have entered more than 10kb in the message body. This Form-Mail application is "+
"intended for short messages. Please enter at most 10,000 characters in the message field.")
mForm.Msg.focus(); return (false) }

}




function GetKeyCode() { // Disable CTRL+N
if (event.keyCode == 78 && event.ctrlKey) { event.returnValue=false }
}


//-->