WEB邮件程序

开发平台：

PHP

effacer_commande1.php：源码内容

							
//script effacer_commande1
<?
include "configuration.php";
include "page_haut.inc";
require ("xml_domit_parser.php");
require ("xml_domit_utilities.php");
require ("xml_domit_nodemaps.php");
$cmd=& new DOMIT_Document();
              $success=$cmd->loadXML("./modules/administration/commande.xml");
              
             $comp = count($cmd->documentElement->childNodes);
          
       for($i=0;$i<$comp;$i++){
            $currentcmd =& $cmd->documentElement->childNodes[$i];
	    $cmdid=$currentcmd->childNodes[0]->firstChild->nodeValue;
if($cmdid==$id){
$n=$i;
                 
                 $lastcmd =& $cmd->documentElement;
                 $lastcmd->removeChild($cmd->documentElement->childNodes[$n]);
                 $succes=& $cmd->saveXML("./modules/administration/commande.xml");
$i--;
}
}
$fichier = "./modules/administration/commande.xml";
 $id_fichier = fopen($fichier, "rb");
 $contenu = fread($id_fichier, filesize ($fichier));
@fclose($fichier);
@unlink ("./modules/administration/commande.xml");
$f=fopen("./modules/administration/commande.xml","w");
fputs($f,"<?xml version='1.0' encoding='ISO-8859-1' ?>r");
fputs($f,$contenu);
?>
<script>
document.location="?m=administration&a=clients";
</script>

						