TIPS: RÉCUPÉRER SON IDENTIFIANT CARAMAIL.

<?


function tri($texte_user,$mot1_user,$mot2_user)
{
$texte = $texte_user; 
$mot_1 = $mot1_user;
$mot_2 = $mot2_user;
$temp_texte = "";
$temp_find = "";

$etape_1 = "false";
$etape_2 = "false";

	for ($i=0;$i<strlen($texte);$i++) 
	{ 

	$yop = $texte[$i];
	$temp_texte .= $yop;

	if ( (ereg($mot_1, $temp_texte)) && ($etape_1 == "false") && ($etape_2 == "false")) {$etape_1 = "true"; $yop = $texte[$i+1];}
	if ( $mot_2 == $yop && $etape_1 == "true" && $etape_2 == "false") {$etape_2 = "true"; }
	if ( $etape_1 == "true" && $etape_2 == "false" ) {$temp_find .= $yop;}

	} 

return $temp_find;

}

$fp = fsockopen ("www16.caramail.lycos.fr", 80);

$data ="LOGIN1=".$login."&PASSWORD1=".$password."&TZ=0";

	if ($fp > 0)
	{
	fputs($fp, "POST /scripts/baltop HTTP/1.1\n");
	fputs($fp, "Host: $host\n");
	fputs($fp, "Content-type: application/x-www-form-urlencoded\n");
	fputs($fp, "Content-length: " . strlen($data) . "\n");
	fputs($fp, "User-Agent: MSIE\n");
	fputs($fp, "Connection: close\n\n");
	fputs($fp, $data);

	while (!feof($fp))
	$buf .= fgets($fp,128);
	fclose($fp);
	}
 
$a = tri($buf,"IDENTIFIANT=",";");
echo "<font size=2 face=verdana color=black>IDENTIFIANT est tadam : ".$a."</font>";

?>