New: Ajout de la possibilit d'envoyer un mailing tous les utilisateurs Dolibarr
au sein de la pages des mailings.
This commit is contained in:
Laurent Destailleur
parent
e912a662a0
commit
dd13a32719
@ -22,13 +22,13 @@
|
|||||||
* $Source$
|
* $Source$
|
||||||
*/
|
*/
|
||||||
|
|
||||||
/*! \file htdocs/html.form.class.php
|
/*! \file htdocs/html.form.class.php
|
||||||
\brief Fichier de la classe des fonctions prédéfinie de composants html
|
\brief Fichier de la classe des fonctions prédéfinie de composants html
|
||||||
\version $Revision$
|
\version $Revision$
|
||||||
*/
|
*/
|
||||||
|
|
||||||
|
|
||||||
/*! \class Form
|
/*! \class Form
|
||||||
\brief Classe permettant la génération de composants html
|
\brief Classe permettant la génération de composants html
|
||||||
*/
|
*/
|
||||||
|
|
||||||
@ -38,7 +38,7 @@ class Form
|
|||||||
var $errorstr;
|
var $errorstr;
|
||||||
|
|
||||||
/*! \brief Constructeur
|
/*! \brief Constructeur
|
||||||
\param DB handler d'accès base de donnée
|
\param DB handler d'accès base de donnée
|
||||||
*/
|
*/
|
||||||
|
|
||||||
function Form($DB)
|
function Form($DB)
|
||||||
@ -49,12 +49,12 @@ class Form
|
|||||||
}
|
}
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* \brief Retourne la liste déroulante des départements/province/cantons
|
* \brief Retourne la liste déroulante des départements/province/cantons
|
||||||
* avec un affichage avec rupture sur le pays
|
* avec un affichage avec rupture sur le pays
|
||||||
* \remarks La cle de la liste est le code (il peut y avoir plusieurs entrée pour
|
* \remarks La cle de la liste est le code (il peut y avoir plusieurs entrée pour
|
||||||
* un code donnée mais dans ce cas, le champ pays et lang diffère).
|
* un code donnée mais dans ce cas, le champ pays et lang diffère).
|
||||||
* Ainsi les liens avec les départements se font sur un département
|
* Ainsi les liens avec les départements se font sur un département
|
||||||
* independemment de nom som.
|
* independemment de nom som.
|
||||||
*/
|
*/
|
||||||
|
|
||||||
function select_departement($selected='',$htmlname='departement_id')
|
function select_departement($selected='',$htmlname='departement_id')
|
||||||
@ -113,11 +113,11 @@ class Form
|
|||||||
}
|
}
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* \brief Retourne la liste déroulante des regions actives dont le pays est actif
|
* \brief Retourne la liste déroulante des regions actives dont le pays est actif
|
||||||
* \remarks La cle de la liste est le code (il peut y avoir plusieurs entrée pour
|
* \remarks La cle de la liste est le code (il peut y avoir plusieurs entrée pour
|
||||||
* un code donnée mais dans ce cas, le champ pays et lang diffère).
|
* un code donnée mais dans ce cas, le champ pays et lang diffère).
|
||||||
* Ainsi les liens avec les regions se font sur une region independemment
|
* Ainsi les liens avec les regions se font sur une region independemment
|
||||||
* de nom som.
|
* de nom som.
|
||||||
*/
|
*/
|
||||||
|
|
||||||
function select_region($selected='',$htmlname='region_id')
|
function select_region($selected='',$htmlname='region_id')
|
||||||
@ -169,10 +169,10 @@ class Form
|
|||||||
}
|
}
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* \brief Retourne la liste déroulante des pays actifs, dans la langue de l'utilisateur
|
* \brief Retourne la liste déroulante des pays actifs, dans la langue de l'utilisateur
|
||||||
* \param selected code pays pré-sélectionné
|
* \param selected code pays pré-sélectionné
|
||||||
* \param htmlname nom de la liste deroulante
|
* \param htmlname nom de la liste deroulante
|
||||||
* \todo trier liste sur noms après traduction plutot que avant
|
* \todo trier liste sur noms après traduction plutot que avant
|
||||||
*/
|
*/
|
||||||
|
|
||||||
function select_pays($selected='',$htmlname='pays_id')
|
function select_pays($selected='',$htmlname='pays_id')
|
||||||
@ -222,8 +222,8 @@ class Form
|
|||||||
|
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* \brief Retourne la liste déroulante des langues disponibles
|
* \brief Retourne la liste déroulante des langues disponibles
|
||||||
* \param
|
* \param
|
||||||
*/
|
*/
|
||||||
|
|
||||||
function select_lang($selected='',$htmlname='lang_id')
|
function select_lang($selected='',$htmlname='lang_id')
|
||||||
@ -255,8 +255,8 @@ class Form
|
|||||||
|
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* \brief Retourne la liste déroulante des sociétés
|
* \brief Retourne la liste déroulante des sociétés
|
||||||
* \param
|
* \param
|
||||||
*/
|
*/
|
||||||
|
|
||||||
function select_societes($selected='',$htmlname='soc_id')
|
function select_societes($selected='',$htmlname='soc_id')
|
||||||
@ -295,7 +295,7 @@ class Form
|
|||||||
}
|
}
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* \brief Retourne la liste déroulante des contacts d'une société donnée
|
* \brief Retourne la liste déroulante des contacts d'une société donnée
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
|
|
||||||
@ -338,8 +338,8 @@ class Form
|
|||||||
|
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* \brief Retourne le nom d'un pays
|
* \brief Retourne le nom d'un pays
|
||||||
*
|
* \param id id du pays
|
||||||
*/
|
*/
|
||||||
|
|
||||||
function pays_name($id)
|
function pays_name($id)
|
||||||
@ -358,7 +358,7 @@ class Form
|
|||||||
}
|
}
|
||||||
else
|
else
|
||||||
{
|
{
|
||||||
return "Non définit";
|
return "Non défini";
|
||||||
}
|
}
|
||||||
|
|
||||||
}
|
}
|
||||||
@ -368,8 +368,8 @@ class Form
|
|||||||
|
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* \brief Retourne la liste déroulante des civilite actives
|
* \brief Retourne la liste déroulante des civilite actives
|
||||||
* \param selected civilite pré-sélectionnée
|
* \param selected civilite pré-sélectionnée
|
||||||
*/
|
*/
|
||||||
|
|
||||||
function select_civilite($selected='')
|
function select_civilite($selected='')
|
||||||
@ -413,7 +413,7 @@ class Form
|
|||||||
}
|
}
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* \brief Retourne la liste déroulante des formes juridiques avec un affichage avec rupture sur le pays
|
* \brief Retourne la liste déroulante des formes juridiques avec un affichage avec rupture sur le pays
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
|
|
||||||
@ -498,7 +498,7 @@ class Form
|
|||||||
}
|
}
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* \brief selection du taux de tva
|
* \brief Selection du taux de tva
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
|
|
||||||
@ -546,14 +546,13 @@ class Form
|
|||||||
}
|
}
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* Affiche zone de selection de date
|
* \brief Affiche zone de selection de date
|
||||||
* Liste deroulante pour les jours, mois, annee et eventuellement heurs et minutes
|
* Liste deroulante pour les jours, mois, annee et eventuellement heurs et minutes
|
||||||
* Les champs sont présélectionnées avec:
|
* Les champs sont présélectionnées avec:
|
||||||
* - La date set_time (timestamps ou date au format YYYY-MM-DD ou YYYY-MM-DD HH:MM)
|
* - La date set_time (timestamps ou date au format YYYY-MM-DD ou YYYY-MM-DD HH:MM)
|
||||||
* - La date du jour si set_time vaut ''
|
* - La date du jour si set_time vaut ''
|
||||||
* - Aucune date (champs vides) si set_time vaut -1
|
* - Aucune date (champs vides) si set_time vaut -1
|
||||||
*/
|
*/
|
||||||
|
|
||||||
function select_date($set_time='', $prefix='re', $h = 0, $m = 0, $empty=0)
|
function select_date($set_time='', $prefix='re', $h = 0, $m = 0, $empty=0)
|
||||||
{
|
{
|
||||||
if (! $set_time && ! $empty)
|
if (! $set_time && ! $empty)
|
||||||
@ -710,10 +709,9 @@ class Form
|
|||||||
}
|
}
|
||||||
|
|
||||||
/*
|
/*
|
||||||
*
|
* \brief Affiche liste déroulante
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
|
|
||||||
function select($name, $sql, $id='')
|
function select($name, $sql, $id='')
|
||||||
{
|
{
|
||||||
|
|
||||||
@ -820,7 +818,7 @@ class Form
|
|||||||
|
|
||||||
}
|
}
|
||||||
/*
|
/*
|
||||||
* \brief Renvoie la chaîne de caractère décrivant l'erreur
|
* \brief Renvoie la chaîne de caractère décrivant l'erreur
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
|
|
||||||
@ -828,59 +826,49 @@ class Form
|
|||||||
{
|
{
|
||||||
return $this->errorstr;
|
return $this->errorstr;
|
||||||
}
|
}
|
||||||
/*
|
|
||||||
* \brief selection de oui/non en caractere
|
|
||||||
*
|
|
||||||
*/
|
|
||||||
|
|
||||||
function selectyesno($name,$value='')
|
|
||||||
|
/*
|
||||||
|
* \brief Selection de oui/non en caractere
|
||||||
|
* \param name nom du select
|
||||||
|
* \param value valeur présélectionnée
|
||||||
|
* \param option 0 retourne yes/no, 1 retourne 1/0
|
||||||
|
*/
|
||||||
|
function selectyesno($name,$value='',$option=0)
|
||||||
{
|
{
|
||||||
global $langs;
|
global $langs;
|
||||||
|
|
||||||
|
$yes="yes"; $no="no";
|
||||||
|
if ($option) { $yes="1"; $no="0"; }
|
||||||
|
|
||||||
print '<select name="'.$name.'">';
|
print '<select name="'.$name.'">';
|
||||||
|
|
||||||
if ($value == 'yes')
|
if ($value == 'yes' || $value == 1)
|
||||||
{
|
{
|
||||||
print '<option value="yes" selected>'.$langs->trans("yes").'</option>';
|
print '<option value="'.$yes.'" selected>'.$langs->trans("yes").'</option>';
|
||||||
print '<option value="no">'.$langs->trans("no").'</option>';
|
print '<option value="'.$no.'">'.$langs->trans("no").'</option>';
|
||||||
}
|
}
|
||||||
else
|
else
|
||||||
{
|
{
|
||||||
print '<option value="yes">'.$langs->trans("yes").'</option>';
|
print '<option value="'.$yes.'">'.$langs->trans("yes").'</option>';
|
||||||
print '<option value="no" selected>'.$langs->trans("no").'</option>';
|
print '<option value="'.$no.'" selected>'.$langs->trans("no").'</option>';
|
||||||
}
|
}
|
||||||
print '</select>';
|
print '</select>';
|
||||||
}
|
}
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* \brief selection de oui/non en chiffre
|
* \brief Selection de oui/non en chiffre
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
|
|
||||||
function selectyesnonum($name,$value='')
|
function selectyesnonum($name,$value='')
|
||||||
{
|
{
|
||||||
global $langs;
|
selectyesno($name,$value,1);
|
||||||
|
|
||||||
print '<select name="'.$name.'">';
|
|
||||||
|
|
||||||
if ($value == 1)
|
|
||||||
{
|
|
||||||
print '<option value="1" selected>'.$langs->trans("yes").'</option>';
|
|
||||||
print '<option value="0">'.$langs->trans("no").'</option>';
|
|
||||||
}
|
|
||||||
else
|
|
||||||
{
|
|
||||||
print '<option value="1">'.$langs->trans("yes").'</option>';
|
|
||||||
print '<option value="0" selected>'.$langs->trans("no").'</option>';
|
|
||||||
}
|
|
||||||
print '</select>';
|
|
||||||
}
|
}
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* \brief Checkbox
|
* \brief Checkbox
|
||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
|
|
||||||
function checkbox($name,$checked=0,$value=1)
|
function checkbox($name,$checked=0,$value=1)
|
||||||
{
|
{
|
||||||
if ($checked==1){
|
if ($checked==1){
|
||||||
@ -889,6 +877,53 @@ class Form
|
|||||||
print "<input type=\"checkbox\" name=\"$name\" value=\"$value\" />\n";
|
print "<input type=\"checkbox\" name=\"$name\" value=\"$value\" />\n";
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
/*
|
||||||
|
* \brief Affiche la partie de formulaire pour saisie d'un mail
|
||||||
|
* \param withtopic 1 pour proposer à la saisie le sujet
|
||||||
|
* \param withbody 1 pour proposer à la saisie le corps du message
|
||||||
|
* \param withfile 1 pour proposer à la saisie l'ajout d'un fichier joint
|
||||||
|
*/
|
||||||
|
function mail_topicmessagefile($withtopic=1,$withbody=1,$withfile=1,$defaultbody) {
|
||||||
|
global $langs;
|
||||||
|
|
||||||
|
$langs->load("other");
|
||||||
|
|
||||||
|
print "<table class=\"border\" width=\"100%\">";
|
||||||
|
|
||||||
|
// Topic
|
||||||
|
if ($withtopic) {
|
||||||
|
print "<tr>";
|
||||||
|
print "<td width=\"180\">".$langs->trans("MailTopic")."</td>";
|
||||||
|
print "<td>";
|
||||||
|
print "<input type=\"text\" size=\"60\" name=\"subject\" value=\"\">";
|
||||||
|
print "</td></tr>";
|
||||||
|
}
|
||||||
|
|
||||||
|
// Message
|
||||||
|
if ($withbody) {
|
||||||
|
print "<tr>";
|
||||||
|
print "<td width=\"180\" valign=\"top\">".$langs->trans("MailText")."</td>";
|
||||||
|
print "<td>";
|
||||||
|
print "<textarea rows=\"8\" cols=\"72\" name=\"message\">";
|
||||||
|
print $defaultbody;
|
||||||
|
print "</textarea>";
|
||||||
|
print "</td></tr>";
|
||||||
|
}
|
||||||
|
|
||||||
|
// Si fichier joint
|
||||||
|
if ($withfile) {
|
||||||
|
print "<tr>";
|
||||||
|
print "<td width=\"180\">".$langs->trans("MailFile")."</td>";
|
||||||
|
print "<td>";
|
||||||
|
print "<input type=\"file\" value=\"".$langs->trans("Upload")."\"/>";
|
||||||
|
print "</td></tr>";
|
||||||
|
}
|
||||||
|
|
||||||
|
print "</table>";
|
||||||
|
|
||||||
|
}
|
||||||
|
|
||||||
}
|
}
|
||||||
|
|
||||||
?>
|
?>
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user