gå tilbake og prøv igjen!";
$tvungenMelding="ERROR: Alle felt med rød stjerne er tvungen!";
$emailFeilmelding="ERROR: Ugyldig email!";
$order=array("tittel", "forfattere", "navn", "poster" , "email" , "foredrag");
$required=array("tittel", "forfattere", "navn" , "email");
##################################################################################
##################################################################################
##################################################################################
// Rens alle POST variablan for uhumskheta
foreach($_POST as $varName=>$value)$postVars[$varName]=trim(clean($value));
if($postVars["action"]=="submit")
{
// Sjekk at alle tvungne felt e fyllt inn
$error=false;
foreach($required as $item)if(strlen($item)<1)$error=true;
// Sjekk email
if(!eregi("^[_a-z0-9-]+(\.[_a-z0-9-]+)*@[a-z0-9-]+(\.[a-z0-9-]{2,})+$", $postVars["email"])){$error=true; $emailError=true;}
if(!$error)
{
// Sleng alle variablan inn i ei tekst blokk
$msg="";
foreach($order as $item)$msg.=$item.": ".$postVars[$item]."
\n";
// Lag linjeskift (litt knotat pga. tekstfelt - dette bruke å funke)
$msg=urldecode(str_replace("%0D%0A", " \n", urlencode($msg)));
// Send meldinga som email
if(mail($mottaker."\r\n", $kadetgjeld."\r\n", "".stripslashes($msg)."\r\n", "Cc: ".$CCmottaker."\r\nFrom: ".$postVars["email"]."\r\nMIME-Version: 1.0\r\nContent-type: text/html\r\n"))$result=$gladMelding;
else $result=$feilMelding;
}
}
function clean($input, $maxLength=false)
{
$input=str_replace("\\", "", $input);
if($maxLength)$input=substr($input, 0, $maxLength);
$input=addslashes($input);
return $input;
}
?>