Discussion :

[duffman39]

Bonjour je souhaiterais faire un script qui liste des fichiers contenu dans un répertoire selectionné.

Actuellement mon script est le suivant

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
set votreChoix to choose folder with prompt "Selectionner le dossier contenant les pdf"
 
set listeNoms to ""
 
set pointvirgule to ";"
 
set info to ""
 
 
 
 
tell application "Finder"
 
	set liste_Fichiers to every file of entire contents of folder (votreChoix as alias)

La variable liste_fichiers récupère bien tout les fichiers du répertoire mais je souhaiterai qu'il récupère que les fichiers .pdf

Pouvez vous m'aidez à faire cette action?

Merci par avance pour votre aide

[PBELL]

Bonjour Duffman,
tu as 2 méthodes possibles selon ce que tu veux faire.

La première te permet de filtrer la demande à l'utilisateur en limitant son choix aux fichiers pdf. Si le but est de demander à l'utilisateur de sélectionner un fichier pdf et un seul, c'est la plus simple et plus rapide :

Code :

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

1
2
3
tell application "Finder"
	set Fichier_PDF to (choose file with prompt "Sélectionner un fichier pdf:" of type {"pdf"})
end tell

La seconde va demander à l'utilisateur de sélectionner un dossier, puis de lui faire choisir 1 ou plusieurs PDF parmi les fichiers de ce dossier. L'avantage est qu'il peut saisir plusieurs fichiers d'un coup. Par contre, si le nombre de fichiers est grand, le script peut être un peu plus long à tourner :

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
set liste_PDF to {}
tell application "Finder"
	set votreChoix to choose folder with prompt "Selectionner le dossier contenant les pdf"
	set liste_Fichiers to (every file of entire contents of folder (votreChoix as alias)) as alias list
	-- filtre la liste au seuls pdf. chaque éléments à 2 propriétés : Nom=son nom à afficher et Source=l'alias vers le fichier
	-- construit une liste de noms pour affichage
	set Liste_Affiche to {}
	repeat with Fichier in liste_Fichiers
		if (name extension of (info for Fichier) is "pdf") then
			set liste_PDF to liste_PDF & {{Nom:name of Fichier, Source:Fichier}}
			set Liste_Affiche to Liste_Affiche & {name of Fichier}
		end if
	end repeat
	-- demande la sélection multiple
	set Liste_Select to choose from list Liste_Affiche with title "Sélection de vos PDF" with prompt "Utilisez la touche cmd pour une sélection multiple:" with multiple selections allowed
	if Liste_Select is false then return -- l'utilisateur a cliqué Annuler : fin du script	
end tell

Il te reste ensuite à boucler sur chaque nom sélectionné pour retrouver son alias dans la liste List_PDF (avec son nom tu trouves sa source !)
Cette seconde méthode telle qu'elle est présentée ici a cependant une limite : Si 2 fichiers pdf ont le même nom dans 2 sous dossiers, tu ne pourra pas les distinguer...mais l'utilisateur non plus !
Dans ce cas, tu peux contourner en ajoutant des caractéristiques du fichier à la liste affichée pour distinguer (par exemple, tu peux afficher au lieu du nom le dossier_parent:nom_fichier)

Cordialement

[FredoMkb]

Bonjour à tous

Pour compléter la réponse de Philippe, il y aurait, parmi d'autres possibilités (shell par exemple), une solution directe pour récupérer tous les documents d'un type spécifique (suivant son extension) contenus à l'intérieur d'un dossier (et son arborescence), c'est en utilisant un filtre "whose", qui évidemment ralenti un peu l'analyse, comme ceci (à adapter et à optimiser bien-sûr) :

Code :

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

1
2
 
tell application "Finder" to return (every file of (entire contents of (choose folder without invisibles)) whose name extension is "pdf") as alias list

[duffman39]

Merci beaucoup j'ai utilisé le

Code :

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

whose name extension is "pdf"

sa me suffisait.
Sa fonctionne nickel merci encore