Discussion :

[Seneg33]

Bonjour,

Voila mon problème :
Dans une arborescence (plutôt profonde) je doit recherché tout les fichiers en .qvd . J'arrive a le faire dans un seul dossier, mais pas dans les sous-dossiers, les sous-sous-dossier,...

Une idée ?

Cordialement

Seneg

[FORMULARY]

Dans l'explorateur de fichier, dans la zone recherche on met .qvd et windows recherche tout seul, y compris dans les sous-répertoires ...

Plus sérieusement, pour quel usage voulez-vous cette liste ?

[Seneg33]

Tout les mois nous faisont un état des lieux de nos serveur.
Ce qui implique :
- chercher tout les .qvw du serveur en faire une liste avec leurs taille.
- chercher tout les .qvd du serveur en faire une liste avec leurs taille.

C a prend un temps fous de le faire a la main. Donc je me suis dit que je pourrais automatisé la chose sur Qv voila tout.

Cordialement

Seneg

[FORMULARY]

Voici le script exemple de Qlikview qui fait exactement ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
 
// liste de tous les fichiers liés à QV sur le disque 
 
sub DoDir (Root) 
 
for each Ext in 'qvw', 'qva', 'qvo', 'qvs' 
 
for each File in filelist(Root & '\*.' & Ext) 
 
Load '$(Fichier)' as Nom,
        FileSize( '$(Fichier)' ) as Taille,
        FileTime( '$(Fichier)' ) as DateFichier 
autogenerate 1; 
 
next File 
 
next Ext 
 
for each Dir in dirlist (Root & '\*' ) 
 
call DoDir (Dir) 
 
next Dir 
 
end sub 
 
call DoDir ('C:')

On définit une procédure qui est appelée en lui donnant un nom de répertoire.
La procédure recherche les fichiers aux extensions QV
Puis pour chaque répertoire, elle s'appelle elle-même ....
Chaque appel va donc rechercher les fichiers du répertoire et des sous-répertoires.

Il n'y a plus à la fin qu'à appeler la procédure en partant de C: pour balayer tout le disque C:

[Seneg33]

Bonjour,

Merci ta réponse m'a beaucoup aider, mais il y'a une erreur.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
// liste de tous les fichiers liés à QV sur le disque 
 
sub DoDir (Root) 
FOR each Ext IN 'qvw', 'qva', 'qvo', 'qvs' 
FOR each File IN filelist(Root & '\*.' & Ext) 
LOAD '$(File )' AS Nom,
        FileSize( '$(File )' ) AS Taille,
        FileTime( '$(File )' ) AS DateFichier 
autogenerate 1; 
next File 
next Ext 
FOR each Dir IN dirlist (Root & '\*' ) 
call DoDir (Dir) 
next Dir 
end sub 
call DoDir ('C:')

les variables $(fichier) doivent être remplacer par $(file). Ou alors il faut mettre "FOR each fichier"

Merci beaucoup en tout cas.