lainwir3d/dolibarr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Enhancement in EMailing module

Browse Source
This commit is contained in:
Laurent Destailleur 2009-02-16 20:30:30 +00:00
parent 4837f22648
commit e2721fd48f
3 changed files with 58 additions and 53 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
htdocs/comm/mailing/index.php
View File

@ -1,6 +1,6 @@
<?php <?php
/* Copyright (C) 2005 Rodolphe Quiedeville <rodolphe@quiedeville.org> /* Copyright (C) 2005 Rodolphe Quiedeville <rodolphe@quiedeville.org>
* Copyright (C) 2005 Laurent Destailleur <eldy@users.sourceforge.net> * Copyright (C) 2005-2009 Laurent Destailleur <eldy@users.sourceforge.net>
* *
* This program is free software; you can redistribute it and/or modify * This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by * it under the terms of the GNU General Public License as published by
@ -139,20 +139,22 @@ print '</td><td valign="top" width="70%" class="notopnoleftnoright">';
/* /*
* Liste des derniers mailings * List of last emailings
*/ */
$limit=10;
$sql = "SELECT m.rowid, m.titre, m.nbemail, m.statut"; $sql = "SELECT m.rowid, m.titre, m.nbemail, m.statut, m.date_creat";
$sql .= " FROM ".MAIN_DB_PREFIX."mailing as m"; $sql.= " FROM ".MAIN_DB_PREFIX."mailing as m";
$sql .= " LIMIT 10"; $sql.= " ORDER BY m.date_creat DESC";
$sql.= " LIMIT ".$limit;
$result=$db->query($sql); $result=$db->query($sql);
if ($result) if ($result)
{ {
print '<table class="noborder" width="100%">'; print '<table class="noborder" width="100%">';
print '<tr class="liste_titre">'; print '<tr class="liste_titre">';
print '<td colspan="2">'.$langs->trans("LastMailings",10).'</td>'; print '<td colspan="2">'.$langs->trans("LastMailings",$limit).'</td>';
print '<td align="center">'.$langs->trans("DateCreation").'</td>';
print '<td align="center">'.$langs->trans("NbOfEMails").'</td>'; print '<td align="center">'.$langs->trans("NbOfEMails").'</td>';
print '<td align="right">'.$langs->trans("Status").'</td></tr>'; print '<td align="right"><a href="'.DOL_URL_ROOT.'/comm/mailing/liste.php">'.$langs->trans("AllEMailings").'</a></td></tr>';
$num = $db->num_rows($result); $num = $db->num_rows($result);
if ($num > 0) if ($num > 0)
@ -168,6 +170,7 @@ if ($result)
print "<tr $bc[$var]>"; print "<tr $bc[$var]>";
print '<td><a href="fiche.php?id='.$obj->rowid.'">'.img_object($langs->trans("ShowEMail"),"email").' '.$obj->rowid.'</a></td>'; print '<td><a href="fiche.php?id='.$obj->rowid.'">'.img_object($langs->trans("ShowEMail"),"email").' '.$obj->rowid.'</a></td>';
print '<td>'.dolibarr_trunc($obj->titre,40).'</td>'; print '<td>'.dolibarr_trunc($obj->titre,40).'</td>';
print '<td align="center">'.dolibarr_print_date($obj->date_creat).'</td>';
print '<td align="center">'.($obj->nbemail?$obj->nbemail:"0").'</td>'; print '<td align="center">'.($obj->nbemail?$obj->nbemail:"0").'</td>';
$mailstatic=new Mailing($db); $mailstatic=new Mailing($db);
print '<td align="right">'.$mailstatic->LibStatut($obj->statut,5).'</td>'; print '<td align="right">'.$mailstatic->LibStatut($obj->statut,5).'</td>';

1
htdocs/langs/en_US/mails.lang
View File

@ -4,6 +4,7 @@ Mailing=EMailing
EMailing=EMailing EMailing=EMailing
Mailings=EMailings Mailings=EMailings
EMailings=EMailings EMailings=EMailings
AllEMailings=All eMailings
MailCard=EMailing card MailCard=EMailing card
MailTargets=Targets MailTargets=Targets
MailRecipients=Recipients MailRecipients=Recipients

43
htdocs/langs/fr_FR/mails.lang
View File

@ -1,10 +1,11 @@
# Dolibarr language file - fr_FR - mails # Dolibarr language file - fr_FR - mails
CHARSET=UTF-8 CHARSET=UTF-8
Mailing=Mailing Mailing=EMailing
EMailing=Mailing EMailing=EMailing
Mailings=Mailings Mailings=EMailings
EMailings=Mailings EMailings=EMailings
MailCard=Fiche mailing MailCard=Fiche emailing
AllEMailings=Tous les EMailings
MailTargets=Destinataires MailTargets=Destinataires
MailRecipients=Destinataires MailRecipients=Destinataires
MailRecipient=Destinataire MailRecipient=Destinataire
@ -20,19 +21,19 @@ MailText=Message
MailFile=Fichiers joints MailFile=Fichiers joints
MailMessage=Message du mail MailMessage=Message du mail
ShowEMailing=Afficher emailing ShowEMailing=Afficher emailing
ListOfEMailings=Liste des mailings ListOfEMailings=Liste des emailings
NewMailing=Nouveau mailing NewMailing=Nouvel emailing
EditMailing=Éditer mailing EditMailing=Éditer emailing
DeleteMailing=Supprimer mailing DeleteMailing=Supprimer emailing
DeleteAMailing=Supprimer un mailing DeleteAMailing=Supprimer un emailing
PreviewMailing=Prévisualiser mailing PreviewMailing=Prévisualiser emailing
PrepareMailing=Preparer mailing PrepareMailing=Preparer emailing
CreateMailing=Créer mailing CreateMailing=Créer emailing
MailingDesc=Cette page vous permet d'envoyer des mailings à un groupe de personnes. MailingDesc=Cette page vous permet d'envoyer des emailings à un groupe de personnes.
MailingResult=Résultat de l'envoi de mails MailingResult=Résultat de l'envoi de mails
TestMailing=Tester mailing TestMailing=Tester emailing
ValidMailing=Valider mailing ValidMailing=Valider emailing
ApproveMailing=Approuver mailing ApproveMailing=Approuver emailing
MailingStatusDraft=Brouillon MailingStatusDraft=Brouillon
MailingStatusValidated=Validé MailingStatusValidated=Validé
MailingStatusApproved=Approuvé MailingStatusApproved=Approuvé
@ -69,8 +70,8 @@ MailingModuleDescContactsCategories=Tiers avec e-mail (par categorie)
LineInFile=Ligne %s du fichier LineInFile=Ligne %s du fichier
RecipientSelectionModules=Modules de sélection des destinataires RecipientSelectionModules=Modules de sélection des destinataires
MailSelectedRecipients=Destinataires sélectionnés MailSelectedRecipients=Destinataires sélectionnés
MailingArea=Espace mailings MailingArea=Espace emailings
LastMailings=Les %s derniers mailings LastMailings=Les %s derniers emailings
TargetsStatistics=Statistiques destinataires TargetsStatistics=Statistiques destinataires
NbOfCompaniesContacts=Contacts uniques des sociétés NbOfCompaniesContacts=Contacts uniques des sociétés
MailNoChangePossible=Destinataires d'un mailing validé non modifiables MailNoChangePossible=Destinataires d'un mailing validé non modifiables
@ -80,11 +81,11 @@ SendMail=Envoi mail
SentBy=Envoyé par SentBy=Envoyé par
MailingNeedCommand=Pour des raisons de sécurité, il est recommandé de faire les envois d'un mailing de masse depuis une ligne de commande. Demandez à votre administrateur de lancer la commande suivante pour envoyer le mailing à tous les destinataires : MailingNeedCommand=Pour des raisons de sécurité, il est recommandé de faire les envois d'un mailing de masse depuis une ligne de commande. Demandez à votre administrateur de lancer la commande suivante pour envoyer le mailing à tous les destinataires :
MailingNeedCommand2=Vous pouvez toutefois quand même les envoyer en ligne en ajoutant le parametre MAILING_LIMIT_SENDBYWEB avec la valeur du nombre max de mails envoyés par session d'envoi. MailingNeedCommand2=Vous pouvez toutefois quand même les envoyer en ligne en ajoutant le parametre MAILING_LIMIT_SENDBYWEB avec la valeur du nombre max de mails envoyés par session d'envoi.
ConfirmSendingEmailing=Confirmez-vous l'envoi de l'emailing ?<br>L'envoi en ligne des mailings sont limités par sécurité à <b>%s</b> destinataires par session d'envoi. ConfirmSendingEmailing=Confirmez-vous l'envoi de l'emailing ?<br>L'envoi en ligne des emailings sont limités par sécurité à <b>%s</b> destinataires par session d'envoi.
TargetsReset=Vider liste TargetsReset=Vider liste
ToClearAllRecipientsClickHere=Pour vider la liste des destinataires de ce mailing, cliquer le bouton ToClearAllRecipientsClickHere=Pour vider la liste des destinataires de ce mailing, cliquer le bouton
ToAddRecipientsChooseHere=Pour ajouter des destinataires, choisir dans les listes ci-dessous ToAddRecipientsChooseHere=Pour ajouter des destinataires, choisir dans les listes ci-dessous
NbOfEMailingsReceived=Mailings de masse reçus NbOfEMailingsReceived=EMailings de masse reçus
IdRecord=ID enregistrement IdRecord=ID enregistrement
DeliveryReceipt=Accusé de réception DeliveryReceipt=Accusé de réception
YouCanUseCommaSeparatorForSeveralRecipients=Vous pouvez utiliser le caractère de séparation <b>virgule</b> pour spécifier plusieurs destinataires. YouCanUseCommaSeparatorForSeveralRecipients=Vous pouvez utiliser le caractère de séparation <b>virgule</b> pour spécifier plusieurs destinataires.