Aanmelden voor nieuwsbrief

Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=$db"); if($_GET[id] != "" && $_GET[code] != "") { $email = $_GET[id]; $code = $_GET[code]; //registratie $rs = $conn->Execute("SELECT * FROM reservering WHERE email = '$email' AND code = $code"); $fv = $rs->Fields("id"); if(@is_numeric($fv->value) == TRUE) { $query = "UPDATE reservering SET verify = 'yes', code = '0' WHERE email = '$email' AND code = $code"; $rs = $conn->Execute($query); print("
uw gegevens zijn toegevoegd aan de database.

Hartelijk bedankt!
Occultfest."); } else { print("
Er is iets fout gegaan.
Stuur even de e-mail naar bestuur@occultfest.nl

Excuses voor het ongemak."); } } else { //controle op het doorvoeren van het formulier if($_SERVER['REQUEST_METHOD']=='POST') { //controle op het invullen van de velden if($_POST[email] == "") { print("
Er wordt U verzocht het veld E-mail in te vullen.
U wordt nu terug gestuurd naar het aanmeldingsformulier. "); die(); } //alle 3 velden zijn ingevuld. voer gegevens else { $items = "0123456789"; $active_code = ""; srand((double)microtime() * 1000000); for ($f = 1; $f <= 6; $f++) { $code .= substr($items, (rand() % (strlen($items))), 1); } if($_POST[opmerking] == "") { $_POST[opmerking] = "geen"; } $_POST[datum]= date("Y-m-j G:i"); $rs = $conn->Execute("INSERT INTO reservering (email, opmerking, datum, verify, code) VALUES ('".$_POST[email]."', '".$_POST[opmerking]."','".$_POST[datum]."', 'no', '$code')"); print("
Bedankt voor uw interesse voor de Occultfest nieuwsbrief. U ontvangt binnenkort via

".$_POST[email]."

een mail met een bevestigingslink. Door deze link aan te klikken kunt u, uw gegevens toevoegen aan onze data base.
Indien het boven genoemde emailadres niet correct is verzoeken wij u opnieuw het formulier in te vullen.
"); $id = $_POST[email]; $mailBody = " Hallo Op ons digitale domein www.occultfest.nl is er aangegeven dat ".$_POST[email]." aan onze mailinglist toegevoegd wil worden. opmerkingen: ".$_POST[opmerking]." Indien ".$_POST[email]." inderdaad aan onze mailinglist wil worden toegevoegd vraag ik u de onderstaande LINK aan te klikken om uw gegevens daarmee toe te voegen aan onze data-base. Indien de gegevens niet kloppen, vraag ik u deze mail te verwijderen en zich opnieuw aan te melden. Indien er ten onrechte gebruik is gemaakt van uw e-mail adres hiervoor onze excuses. http://www.occultfest.nl/content/form7.php?id=$id&code=$code Met vriendelijke groeten namens stichting Occultfest, Winanda Altena Gegevens stichting Occultfest: Wijsterseweg 2 7901 TC Hoogeveen bestuur@occultfest.nl tel: 06-54607891"; $mailHeaders = "From: \"Occultfest\" \nReply-To:"; mail($_POST[email], "Occultfest", $mailBody, $mailHeaders); } } //formulier else { print("
Als u op de hoogte wilt blijven met betrekking tot het Occultfest en overige underground festiviteiten kunt u zich via onderstaand formulier aanmelden voor de Occultfest nieuwsbrief.

E-mail:
Opmerking:

"); } } // sluit de geopende objecten af $conn->Close( ); ?>