modified: c/CtrlCheckLinks.rb

modified:   c/Main.rb
	deleted:    c/ff~
	modified:   v/Vue1.rb
	modified:   v/VueResult.rb

c/CtrlCheckLinks.rb

@@ -2,10 +2,8 @@ class CtrlCheckLinks
   def saisie
     liste_dir = "../fichier/".liste_rep 
     #Va checher les fichiers et arborecenses dans le dossier fichier (Méthode dans ReadFolder)
-
     Gtk.init
     @v1 = Vue1.new(liste_dir, self)
-
     @v1.getWindow.show_all
     Gtk.main
     
@@ -15,7 +13,18 @@ class CtrlCheckLinks
   def recupUrls(str)
     f = ReadFile.new(str)
     @urls = f.getUrls
-    self.destructionFen
+    self.vueResult(self.verifLiens(@urls))
+  end
+  
+  def recupUrlsDoss(str)
+    d = Dir.open(str)
+    liste_exclus = [".", ".."]
+    liste_dir = d.sort - liste_exclus
+    liste_dir.each { |fichier| #pour chaque fichier touvé
+      if (File.ftype(str + "/" + fichier) == "file")
+          self.recupUrls(str + "/" + fichier)
+      end
+     }            
   end
   
   def destructionFen
@@ -24,7 +33,6 @@ class CtrlCheckLinks
   end
   
   def verifLiens(urls)
-
     resultats = ""
     urls.each { |n| 
     p = Net::Ping::HTTP.new n , 80