RECHERCHER UN TYPE DE FICHIER DANS TOUTE UNE ARBORESCENCE

int CBatch::Cherch_Fic_Rep(CString rep, CString nom)
{
    rep = rep + "\\";
   CString sous_repertoire = "";
   CString fichier = "";
   FILE * file;

    // attribut d'ecriture en "a" car on ecrit plusieurs fois dans le fichier (à la suite)
    file = fopen(nom,"a");

   HANDLE hfind; 
   WIN32_FIND_DATA wfd; 

   hfind = FindFirstFile (rep + "*.*", &wfd );

   if ( hfind != INVALID_HANDLE_VALUE )
   {
       do
       {
                // vérifie que ce n'est pas le répertoire racine
	if( wfd.cFileName[0] != '.')
	{
	    // vérifie si c'est un répertoire ou non
	    if ( wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY ) 
	    {
	         // répertoire
	        sous_repertoire  = rep + wfd.cFileName;
	        Cherch_Fic_Rep(sous_repertoire, nom);	
	    }
	    else 
	    {
	        // fichier
	        fichier = "CALL " + rep + wfd.cFileName;
	        // recherche de "." et positionnement dessus
	       fichier.Find(".");
	       // renvoi l'extension des fichiers
	       CString  ext = fichier.Right(3);
	       // ecriture uniquement si ext = ".bat"
	       if (ext == "bat")
	       {
		fichier += "\n";
		if (file != NULL)	fprintf (file,"%s",fichier);
		else AfxMessageBox("Impossible d'ecrire le fichier");
	       }
	       else continue;
	    }
                 }
        }
        // suite de la recherche
        while(FindNextFile( hfind, &wfd));
        // recherche terminé
        FindClose(hfind);
        fclose(file);
    }
return 0;
}