Escribir Array en Fichero CSV

[superdober]

Tengo el siguiente codigo en el que quiero escribir un array en un fichero CSV pero no me escribe nada, alguna ayuda o guia por favor.. Gracias ¡¡¡

Código:

//Los ficheros CSV tienen como separador ";"
$separador=';'; 
//Abrimos para escribir y añadir, si no existe se crea el fichero
fopen($nombrefichero, "wa");  

$cabecera_fichero=array('REFERENCIA',$separador,'DESTINATARIO',$separador,'DOMICILIO',$separador,'POBLACION',$separador,'CODIGO POSTAL',$separador,'BULTOS',$separador,'PESO',$separador,'OBSERVACIONES',$separador);

if (is_writable($nombrefichero)) 
{
   for( $i = 0; $i < count($cabecera_fichero); $i ++)
    {
        fputcsv ($nombrefichero,$cabecera_fichero[$i]);        		
    }
}
fclose($nombrefichero);   //Cerramos Fichero

//Opcion al uaurio de Abrirlo o guardarlo directamente
header("Content-type: application/eml");
header("Content-Disposition: attachment; filename=".$nombrefichero."");

[superdober]

¿Alguien sabe por este error?

fwrite(): supplied argument is not a valid stream resource

[superdober]

La solucion es la siguiente:

Código:

$separador=';'; //Los ficheros CSV tienen como separador ";"
//Open for reading and writing. Deletes content and overwrites the file.
$fichero=fopen($nombrefichero, "wb+");  

$cabecera_fichero=array('REFERENCIA',$separador,'DESTINATARIO',$separador,'DOMICILIO',$separador,'POBLACION',$separador,'CODIGO POSTAL',$separador,'BULTOS',$separador,'PESO',$separador,'OBSERVACIONES',$separador);

if (is_writable($nombrefichero)) 
{ 
   for($i = 0; $i < count($cabecera_fichero); $i ++)
    {
	   //fwrite devuelve el numero de bytes escritos       
	   $numbytes = fwrite ($fichero,$cabecera_fichero[$i]);        		
    }     
   fwrite ($fichero,"\r\n"); //Salto de Linea
}

fclose($fichero);   //Cerramos Fichero