Escribir mensaje nntp

[dobeto]

Hola otra vez.
Ya lo resolví.
El script que he visto es "nntp_class" sacado de www.phpclasses.org.
Os posteo mi ejercicio: (El código justo para que funcione )

Código PHP:

  <?    /*
if(!isset($_POST['enviar']))
{
 //mostramos el formulario
?>
 aquí va el formulario
<?
}
else//enviamos el formulario
{      */
 $servidor= "servidor de noticias";
 $grupo= "grupo";
 $usuario= "usuario";
 $clave= "clave";
 $dominio= "midominio.com";
 $asunto= "mensaje de prueba";
 $body= "Este es un mensaje del curso avanzado de php.\r\n";
 $body .= "Si este mensaje se ve, es que lo he hecho bien :-D";
 $error= false;
 $de= "[email protected]";
 
 //conectamos con elservidor
 $conex= @fsockopen($servidor,119,$errno,$errstr,5);
 $error= (bool)(!$conex || (fgets($conex, 1024) != 200));
 echo ($error)? "Sin conexión" : "conectado<br />";
 
 //seleccionamos el grupo
 fputs($conex,"group ".$grupo."\n");
 $x=fgets($conex, 1024);
 $error= (bool)(substr($x,0,3)!=211);
 echo ($error)? "Error al seleccionar grupo" : "grupo seleccionado<br />";
 
 //enviamos el mensaje
 fputs($conex, "post\n");
 $x=fgets($conex, 1024);
 $error= (bool)(substr($x, 0,3) != 340);
 
 //identificador del mensaje
 mt_srand ((double) microtime() * 10000000 );
 $int_id = "<".mt_rand(10000000,99999999)."@$dominio>";
 $Today = date("l, j M y g:i:s") . " GMT";
 $id = '<' . $_SERVER['REMOTE_ADDR'] . '.' . time()
                . '.CURSO_AVANZADO_PHP.' .$_SERVER['SERVER_NAME'] .'>';
 echo "id: ".$id."<br />";
 
 $message = "Subject: $asunto\nFrom: $de\nPath:London!\nNewsgroups: $grupo\nMessage-ID: $id\nDate: $Today\n\n$body\n.\n";
 fputs($conex, $message);
 $x=fgets($conex, 1024);
 $error= (bool)((substr($x, 0,3) != 240));
 echo ($error)? "Error al enviar el mensaje: ".$x : "Mensaje enviado correctamente";
 
 fclose($conex);
//}
?>