Suscripción al boletín

Su dirección de email es incorrecta.

'; } if (!isset($err)) { $f = openfile($cfg['listfile']); $exists = false; while ($item = readitem($f)) { if ($item['addr'] == $addr) {$exists = true;break;} } if ($exists) { $err = '

Esa dirección de email ya esta dada de alta.

'; } } if (!isset($err)) { // send confirmation email $headers = 'From: '.$cfg['from']; if ($cfg['headers']) { foreach ($cfg['headers'] as $val) $headers .= "\n".$val; } $headers .= "\n".$cfg['header_plain']; if (!@mail($addr, $cfg['subj_conf'], sprintf($cfg['msg_conf'], '?type=confirm&email='.urlencode($addr)), $headers)) { $err = '

Se ha producido un error en el envío. Por favor, inténtelo de nuevo mas tarde.

'; } } if (!isset($err)) { // confirmation sent if (isset($cfg['returnto_conf']) && $cfg['returnto_conf'] != '') { header('Location: '.$cfg['returnto_conf']); } else { printf($cfg['template'], '

     ', ' Por favor compruebe su email '.$addr.' y pulse el enlace de confirmación para completar la suscripción.

'); } } else { // problem with subscription echoerr($err); } } elseif ($type == 'unsub') { // unsubscribe address $f = openfile($cfg['listfile']); $exists = false; while ($item = readitem($f)) { if ($item['addr'] == $addr) {$exists = true;break;} } if ($exists) { delitem($f, $item['id']); } else { $err = '

Su dirección no se encuentra. Por favor, intente suscribirse de nuevo.

'; } if (!isset($err)) { // unsubscribe successful if (isset($cfg['returnto_unsub']) && $cfg['returnto_unsub'] != '') { // header('Location: '.$cfg['returnto_unsub']); } else { printf($cfg['template'], '

    Baja: ', ' Su dirección de email, '.$addr.' ha sido borrado de nuestra lista.

'); } } else { // problem with unsubscription echoerr($err); } } elseif ($type == 'confirm') { // subscribe a confirmed address if (!preg_match('#^([a-z0-9\-_.]+?)@([\w\-]+\.([\w\-\.]+\.)?[\w]+[^\".,?! ])$#i', $addr)) { $err = '

Su dirección de email no es correcta. Compruebe que la ha escrito correctamente.

'; } if (!isset($err)) { $f = openfile($cfg['listfile']); $exists = false; while ($item = readitem($f)) { if ($item['addr'] == $addr) {$exists = true;break;} } if ($exists) { $err = '

Esa dirección ya esta suscrita.

'; } } if (!isset($err)) { // subscribe successful writeitem($f, $addr); if (isset($cfg['returnto_sub']) && $cfg['returnto_sub'] != '') { @header('Location: '.$cfg['returnto_sub']); } else { printf($cfg['template'], '

    Suscripción correcta: ', 'Se ha suscrito con la dirección de email, '.$addr.', a nuestro boletín de noticias!

'); } } else { // problem with subscription echoerr($err); } } function echoerr($err) { printf($GLOBALS['cfg']['template'], '', ' '.$err.''); } ?>

Subscribirse    Darse de baja