Add navigation on emailing cards

This commit is contained in:
Laurent Destailleur 2008-12-04 17:37:28 +00:00
parent 25d53161d7
commit 03544ef369
3 changed files with 20 additions and 10 deletions

View File

@ -301,7 +301,7 @@ if ($mil->fetch($_REQUEST["id"]) >= 0)
// Liste des destinataires s<>lectionn<6E>s
// List of selected targets
print "\n<!-- Liste destinataires selectionnes -->\n";
print '<form method="post" action="'.$_SERVER["PHP_SELF"].'">';
print '<input type="hidden" name="sortfield" value="'.$sortfield.'">';
@ -326,7 +326,8 @@ if ($mil->fetch($_REQUEST["id"]) >= 0)
if ($search_nom) $addu.= "&amp;search_nom=".urlencode($search_nom);
if ($search_prenom) $addu.= "&amp;search_prenom=".urlencode($search_prenom);
if ($search_email) $addu.= "&amp;search_email=".urlencode($search_email);
print_barre_liste($langs->trans("MailSelectedRecipients"),$page,$_SERVER["PHP_SELF"],$addu,$sortfield,$sortorder,"",$num,$mil->nbemail);
print_barre_liste($langs->trans("MailSelectedRecipients"),$page,$_SERVER["PHP_SELF"],$addu,$sortfield,$sortorder,"",$num,$mil->nbemail,'');
if ($page) $addu.= "&amp;page=".$page;
print '<table class="noborder" width="100%">';

View File

@ -526,7 +526,11 @@ else
print '<table class="border" width="100%">';
print '<tr><td width="25%">'.$langs->trans("Ref").'</td><td colspan="3">'.$mil->id.'</td></tr>';
print '<tr><td width="25%">'.$langs->trans("Ref").'</td>';
print '<td colspan="3">';
print $html->showrefnav($mil,'id');
print '</td></tr>';
print '<tr><td width="25%">'.$langs->trans("MailTitle").'</td><td colspan="3">'.$mil->titre.'</td></tr>';
print '<tr><td width="25%">'.$langs->trans("MailFrom").'</td><td colspan="3">'.htmlentities($mil->email_from).'</td></tr>';
print '<tr><td width="25%">'.$langs->trans("Status").'</td><td colspan="3">'.$mil->getLibStatut(4).'</td></tr>';

View File

@ -18,22 +18,27 @@
*/
/**
\file htdocs/comm/mailing/mailing.class.php
\ingroup mailing
\brief Fichier de la classe de gestion des mailings
\version $Id$
* \file htdocs/comm/mailing/mailing.class.php
* \ingroup mailing
* \brief Fichier de la classe de gestion des mailings
* \version $Id$
*/
require_once(DOL_DOCUMENT_ROOT ."/commonobject.class.php");
/**
* \class Mailing
* \brief Classe permettant la gestion des mailings
*/
class Mailing
class Mailing extends CommonObject
{
var $id;
var $db;
var $error;
var $element='mailing';
var $table_element='mailing';
var $id;
var $statut;
var $titre;
var $sujet;