0"; # Jeu de données -> hachage $dataset = MysqlFetchDataset($sql); # Transformation -> format variables formulaire while(list($name,$values) = each($dataset)) { list($table,$field) = explode(".",$name); if ($table == "t1") { $formdata[$field] = $values[0]; } else { $formdata[$field] = $values; } } /* echo "*********","
\n"; while(list($name,$values) = each($formdata)) { echo "$name = ",$values,"
\n"; if (is_array($values)) { echo "$name = ",implode("|",$values),"
\n"; } else { echo "$name = ",$values,"
\n"; } } echo "*********","
\n"; */ return $formdata; } ##### Main ##### Programme principal # Libellés des boutons $form_buttons = array("Ajouter un lot","Supprimer le lot ","Prévisualiser","Réinitialiser"); # Aiguillage if (!$Submit) { # Formulaire vierge $title = "Déposer une annonce"; PageHeader($title); # Contenu des listes d'options $listes = array("Statut","CellTemp","Essence","QualiDom","ModeVente"); GetOptions($nOffDem,$listes); # Initialisation du nombre de lots $NbLots = 1; # Variables à poster $http_post_names = HttpPostNames(); } else { # Variables transmises $http_post_names = explode("|",$JoinPostNames); Hash2Vars(CleanPostedVars(Vars2Hash($http_post_names))); # Prévisualiser if ($Submit == $form_buttons[2]) { # Redirige -> script de vérification des entrées -> enregistrement include("verif.inc.php3"); exit(); # Ajouter un lot } elseif ($Submit == $form_buttons[0]) { # Réaffichage en boucle avec un lot vierge en plus $title = "Déposer une annonce"; PageHeader($title); # Contenu des listes d'options $listes = array("Statut","CellTemp","Essence","QualiDom","ModeVente"); GetOptions($nOffDem,$listes); # Nombre de lots incrémenté $NbLots++; # Supprimer un lot } elseif (ereg($form_buttons[1],$Submit)) { # Indice du lot ereg("([0-9]{1,})",$Submit,$regs); $ind_lot = $regs[1] - 1; # Suppression du lot s'il est déjà dans la base de données if ($nAnnonce) { $sql = "UPDATE ".LOT_TABLE." SET Actif = 0 WHERE nLot = $nLot[$ind_lot]"; ConnectToDb(); mysql_query($sql) or die(mysql_error()); DisconnectFromDb(); } # Décalage des indices for ($i = 0; $i < $NbLots; $i++) { if ($i > $ind_lot) { $nLot[$i-1] = $nLot[$i]; $Essence[$i-1] = $Essence[$i]; $QualiDom[$i-1] = $QualiDom[$i]; $ModeVente[$i-1] = $ModeVente[$i]; $Qte_M3[$i-1] = $Qte_M3[$i]; $Obs[$i-1] = $Obs[$i]; if ($nOffDem == 1) { $PU_FM3[$i-1] = $PU_FM3[$i]; $CP_lot[$i-1] = $CP_lot[$i]; $Commune_lot[$i-1] = $Commune_lot[$i]; } } } # Suppression du dernier indice unset($nLot[$NbLots-1]); unset($Essence[$NbLots-1]); unset($QualiDom[$NbLots-1]); unset($ModeVente[$NbLots-1]); unset($Qte_M3[$NbLots-1]); unset($Obs[$NbLots-1]); if ($nOffDem == 1) { unset($PU_FM3[$NbLots-1]); unset($CP_lot[$NbLots-1]); unset($Commune_lot[$NbLots-1]); } # Réaffichage en boucle avec le lot supprimé en moins $title = "Déposer une annonce"; PageHeader($title); # Contenu des listes d'options $listes = array("Statut","CellTemp","Essence","QualiDom","ModeVente"); GetOptions($nOffDem,$listes); # Nombre de lots décrémenté $NbLots--; # Modifier une annonce } elseif ($Action == "Modif") { # Modification d'annonce $title = "Modifier une annonce"; $menu_script = "modifier.php3"; PageHeader($title); # Enregistrement à modifier list($nAnnonce,$Annonceur) = split("-",$Annonce,2); Hash2Vars(GetRecord($nAnnonce)); #ShowData("form"); # Vérifie la clef CheckKey($ClefPost); # Contenu des listes d'options $listes = array("Statut","CellTemp","Essence","QualiDom","ModeVente"); GetOptions($nOffDem,$listes); # Pré-sélections dans les listes MakeSelected(); # Nombre de lots $NbLots = count($nLot); # Variables à poster $http_post_names = HttpPostNames(); } } ?>

Conditions générales de dépôt:

Le dépôt d'annonce est effectué sous la seule et unique responsabilité du déposant. Il est réservé aux bois sinistrés lors de la tempête survenue à la fin 1999.

Le webmaster de Boiscope attribue automatiquement une clé confidentielle à chaque nouveau déposant. Cette clé lui est redemandée lors de toute intervention ultérieure : prorogation, modification, suppression.

Toute annonce n'ayant pas été prorogée ou modifiée dans un délai de 2 mois est automatiquement supprimée.

Il est demandé aux vendeurs ayant concrétisé de bien vouloir supprimer leur annonce ou de la modifier en conséquence.

Formulaire de composition de l'annonce:

\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; } # Fin de portion itérative ?>
Les rubriques dont le nom figure en gras sont obligatoires.
 Annonceur:
";} else {echo "Etes-vous en relation avec une
Cellule de Suivi Tempête ?\n"; echo DropDownList("CellTemp",$CellTemp,$listcelltemp); echo "\n"; } ?>
Nom:
Adresse:
Commune: Code postal:
Tél: Fax:
Contact: Portable:
Mél:
Statut: ";} echo "",DropDownList("Statut",$Statut,$liststatut); ?>
\n"; echo "\n"; echo "\n"; $numlot = $i + 1; echo "\n"; echo "\n"; echo "\n"; echo "
 Lot $numlot:\n"; echo "\n"; if ($NbLots > 1) { echo ""; } else {echo " ";} echo "
\n"; echo "
\n"; echo "\n"; if ($nOffDem == 1) { echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; $message = "Le prix ne sera utilisé qu'à des fins statistiques, pour permettre au consultant de suivre l'état du marché, en toute indépendance."; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; } else { echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "\n"; } echo "
Essence:\n"; echo DropDownList("Essence[$i]",$Essence[$i],$listessence); echo "Quantité: M3 Prix estimatif:
 (facultatif,
 non publié \"$message\")
\n"; echo "  F/M3\n"; echo "
Qualité
dominante:		\n"; echo DropDownList("QualiDom[$i]",$QualiDom[$i],$listqualidom); echo "Commune:
\n"; echo "\n"; echo "
Mode de vente:\n"; echo DropDownList("ModeVente[$i]",$ModeVente[$i],$listmodevente); echo "Code postal:
Observations:
Essence:\n"; echo DropDownList("Essence[$i]",$Essence[$i],$listessence); echo "Mode de vente:\n"; echo DropDownList("ModeVente[$i]",$ModeVente[$i],$listmodevente); echo "
Qualité demandée:\n"; echo DropDownList("QualiDom[$i]",$QualiDom[$i],$listqualidom); echo "Quantité: M3
Observations:
\n"; echo "
"> ";} ?> "> "> "> ">

\n"; echo "
\n"; echo "Notes:\n"; echo "
    \n"; echo "
  1.  Prix: la mention du prix est facultative et ne sera pas publiée. $message\n"; echo "
\n"; } # Pied de page PageFooter(); ?>