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

Look: Utilisation de la fonction info_admin pour afficher alerte securit admin

Browse Source
This commit is contained in:
Laurent Destailleur 2006-08-12 18:17:51 +00:00
parent 13a83c4657
commit 0798e730be
2 changed files with 8 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
htdocs/html.form.class.php
View File

@ -662,18 +662,18 @@ class Form
dolibarr_syslog("html.form.class::select_projects sql=$sql"); dolibarr_syslog("html.form.class::select_projects sql=$sql");
$result=$this->db->query($sql); $resql=$this->db->query($sql);
if ($result) if ($resql)
{ {
print '<select class="flat" name="'.$htmlname.'">'; print '<select class="flat" name="'.$htmlname.'">';
print '<option value="0">&nbsp;</option>'; print '<option value="0">&nbsp;</option>';
$num = $this->db->num_rows($result); $num = $this->db->num_rows($resql);
$i = 0; $i = 0;
if ($num) if ($num)
{ {
while ($i < $num) while ($i < $num)
{ {
$obj = $this->db->fetch_object(); $obj = $this->db->fetch_object($resql);
if (!empty($selected) && $selected == $obj->rowid) if (!empty($selected) && $selected == $obj->rowid)
{ {
print '<option value="'.$obj->rowid.'" selected="true">'.$obj->title.'</option>'; print '<option value="'.$obj->rowid.'" selected="true">'.$obj->title.'</option>';

7
htdocs/index.php
View File

@ -54,10 +54,9 @@ if ($user->admin && ! defined("MAIN_REMOVE_INSTALL_WARNING"))
if (is_dir(DOL_DOCUMENT_ROOT."/install") && is_readable(DOL_DOCUMENT_ROOT."/install")) if (is_dir(DOL_DOCUMENT_ROOT."/install") && is_readable(DOL_DOCUMENT_ROOT."/install"))
{ {
$langs->load("other"); $langs->load("other");
print '<table width="100%"><tr><td>'; $message=$langs->trans("WarningInstallDirExists",DOL_DOCUMENT_ROOT."/install");
print '<div class="warning">'.$langs->trans("WarningInstallDirExists",DOL_DOCUMENT_ROOT."/install").' '; $message.=$langs->trans("WarningUntilDirRemoved",DOL_DOCUMENT_ROOT."/install");
print $langs->trans("WarningUntilDirRemoved",DOL_DOCUMENT_ROOT."/install").'</div>'; print info_admin($message);
print '</td></tr></table>';
print "<br>\n"; print "<br>\n";
} }
} }