WEB邮件程序

开发平台：

PHP

livor.php：源码内容

							
//script livor
<?
include("page_haut.inc");
require ("xml_domit_parser.php");
require ("xml_domit_utilities.php");
//require ("xml_saxy_parser.php ");
require ("xml_domit_nodemaps.php");
echo"<br><br>";
$client=& new DOMIT_Document();
$success=$client->loadXML("./modules/client/admin/modules/administration/livre.xml");
  $nums=count($client->documentElement->childNodes);
if($nums==0){
$nb=0;
}
else
{
		$currentcl =& $client->documentElement->childNodes[$nums-1];
	        $clid=$currentcl->childNodes[0]->firstChild->nodeValue;
$nb=$clid+1;
}
$newnode=$client->createElement("commentaire");
$client->documentElement->appendChild($newnode);
$newchild=& $client->documentElement->lastChild;
$newchild->appendChild($client->createElement("id"));
$newchild->appendChild($client->createElement("client"));
$newchild->appendChild($client->createElement("email"));
$newchild->appendChild($client->createElement("avis"));
$newtextnode=& $client->createTextNode($nb);
$newtextnode1=& $client->createTextNode($nom);
$newtextnode11=& $client->createTextNode($mail);
$newtextnode2=& $client->createTextNode($avis);
$new=& $client->documentElement->lastChild;
$idnew=& $new->firstChild;
$namenew=& $idnew->nextSibling;
$mailnew=& $namenew->nextSibling;
$avisnew=& $mailnew->nextSibling;
$idnew->appendChild($newtextnode);
$namenew->appendChild($newtextnode1);
$mailnew->appendChild($newtextnode11);
$avisnew->appendChild($newtextnode2);
$succes=& $client->saveXML("./modules/client/admin/modules/administration/livre.xml");
$fichier = "./modules/client/admin/modules/administration/livre.xml";
 $id_fichier = fopen($fichier, "rb");
 $contenu = fread($id_fichier, filesize ($fichier));
@fclose($fichier);
@unlink ("./modules/client/admin/modules/administration/livre.xml");
$f=fopen("./modules/client/admin/modules/administration/livre.xml","w");
fputs($f,"<?xml version='1.0' encoding='ISO-8859-1' ?>r");
fputs($f,$contenu);
?>
<script>
document.location='?m=client&a=livre_dor';
</script>

						