mailto.inc

来自「开源邮件管理系统」· INC 代码 · 共 50 行

<?php

/*
 +-----------------------------------------------------------------------+
 | program/steps/addressbook/mailto.inc                                  |
 |                                                                       |
 | This file is part of the RoundCube Webmail client                     |
 | Copyright (C) 2007, RoundCube Dev. - Switzerland                      |
 | Licensed under the GNU GPL                                            |
 |                                                                       |
 | PURPOSE:                                                              |
 |   Compose a recipient list with all selected contacts                 |
 |                                                                       |
 +-----------------------------------------------------------------------+
 | Author: Thomas Bruederli <[e-mail]>                        |
 +-----------------------------------------------------------------------+

 $Id: copy.inc 471 2007-02-09 21:25:50Z thomasb $

*/

$cid = get_input_value('_cid', RCUBE_INPUT_GET);
$recipients = null;
$mailto = array();

if ($cid && preg_match('/^[a-z0-9\-_=]+(,[a-z0-9\-_=]+)*$/i', $cid) && $CONTACTS->ready)
{
  $CONTACTS->set_page(1);
  $CONTACTS->set_pagesize(100);
  $recipients = $CONTACTS->search($CONTACTS->primary_key, $cid);

  while (is_object($recipients) && ($rec = $recipients->iterate()))
    $mailto[] = format_email_recipient($rec['email'], $rec['name']);
}

if (!empty($mailto))
{
  $mailto_str = join(', ', $mailto);
  $mailto_id = substr(md5($mailto_str), 0, 16);
  $_SESSION['mailto'][$mailto_id] = $mailto_str;
  $OUTPUT->command('redirect', rcmail_url('compose', array('_mailto' => $mailto_id), 'mail'));
}
else
  $OUTPUT->show_message('nocontactsfound', 'warning');


// send response
$OUTPUT->send();

?>