public sub Clasificar_Organizar()
...
...
\'lista de estrategias de crear comandos diponibles...
GenerarListaEstrategisasCrearComandosDisponibles()
\'lectura del fichero de datos
\'crear listado de comandos
\' por cada linea del fichero de datos, se crea un comando con sus caracteristicas
For Each linea In Split(File.Load(User.Home & "/.OrganizadorDescargas/reglas.dat"), "\\n")
palabras = Split(linea, gb.Tab)
If palabras.count <> 0 Then
comandoTmp = SelectorEstrategias.operar(palabras[3], linea) \'palabras[3] es la accion, al enviarla como parametro da listaEstrategiasDisponibles duelve la Estrategia
\'ejecuto el comando
comandoTmp.ejecutar()
Endif
Next
Message.Info(("Terminado de ejecutar la clasificación y ordenación de ficheros"))
End