Ménage sur mon ordinateur

Master_loop

Membre enregistré
12 Janvier 2014
5
0
20
Bonjour !!!

Je travaille toujours avec mon ordinateur, et je prend souvent des captures d'écran. Le problème, c'est que je me retrouve souvent avec mon bureau inondé de captures d'écran. J'ai fait un script pour faire le ménage, mais il me rend toujours un message d'erreur.

Mon script:

Bloc de code:
tell application "Finder" to make new folder with properties ¬
	{name:"Captures d'écran"} at desktop
if the fileName contains "Capture d'écran" then
	tell application "Finder" to move the file in the folder "Captures d'écran"
end if

merci d'avance

Master_loop
 
Dernière édition par un modérateur:

gmaa

Membre expert
Club MacG
8 Janvier 2005
5 842
170
Bonsoir,
C'est normal...
FileName n'est pas défini.
Je ne suis pas guru d'AS mais il faudrait une boucle pour passer en revue les noms des fichiers du Desktop.
Tu dois pouvoir trouver des exemples...
Il y en a pas mal en cherchant un peu.

Et avec un pseudo comme le tien ce devrait être évident! :)
 
Dernière édition:

pascalformac

Membre vénérable
Club MacG
23 Novembre 2003
58 737
1 814
il serait aussi judicieux d'utiliser des techniques de capture qui enregistrent directement les captures HORS du bureau
( directement dans images par exemple)
 

Master_loop

Membre enregistré
12 Janvier 2014
5
0
20
J'ai fait un nouveau script, mais à chaque fois, il me donne le message d'erreur: "Il est impossible d'obtenir name of the file"



mon script:
Bloc de code:
tell application "Finder" to make new folder with properties ¬
	{name:"Captures d'écran"} at desktop
if the name of the file contains "Capture d'écran" then
	
	tell application "Finder" to move the file in the folder "Captures d'écran"
	
	
	
end if
 
Dernière édition par un modérateur:

Nyx0uf

Zetsubou Sensei
Club MacG
1 Janvier 1970
805
55
The net is vast and infinite.
whine.fr
Il manque une boucle dans ton code dans tous les cas :)

Bloc de code:
set desktopPath to "NuubOS:Users:nyxouf:Desktop"
set folderName to "blah"
tell application "Finder"
	if not (exists folder folderName of folder desktopPath) then
		make new folder at desktopPath with properties {name:folderName}
	end if
end tell

tell application "Finder" to set myFiles to every file of folder desktopPath

repeat with aFile in myFiles
	if (name of aFile) contains "Screen" then
		move aFile to desktopPath & ":" & folderName
	end if
end repeat
 

Master_loop

Membre enregistré
12 Janvier 2014
5
0
20
Ton script à l'air de marcher en général, mais il m'envoie un message d'erreur : "Le gestionnaire AppleEvent à échoué" et il me dit que c'est la ligne qui dit de créer un fichier qui à un problème.

Je vais faire des recherches de mon côté.

Master_loop
 

gmaa

Membre expert
Club MacG
8 Janvier 2005
5 842
170
Bonjour,
Si on l'adapte correctement à son environnement, il marche très bien.
Je l'ai modifié chez moi pour utiliser un dossier "particulier" (TOTO).
C'est un peu moins "générique"...

Bloc de code:
set desktopPath to "Macintosh HD:Users:XXXX:Desktop"
-- "Macintosh HD:Users:XXXX: Desktop" (pas de blanc entre : et D)
-- XXXX = le nom de ta petite maison
-- Gag ... Deux-pointsD est un smiley... d'ou l'affichage ici :Desktop
--
set folderName to "blah"
tell application "Finder"
	if not (exists folder folderName of folder desktopPath) then
		make new folder at desktopPath with properties {name:"TOTO"}
	end if
end tell

tell application "Finder" to set myFiles to every file of folder desktopPath

repeat with aFile in myFiles
	if (name of aFile) contains "Capture" then
		move aFile to desktopPath & ":" & "TOTO"
	end if
end repeat
 
Dernière édition par un modérateur: