Ménage sur mon ordinateur

Master_loop

Membre enregistré
12 Janvier 2014
5
0
23
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:
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:
il serait aussi judicieux d'utiliser des techniques de capture qui enregistrent directement les captures HORS du bureau
( directement dans images par exemple)
 
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:
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
 
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
 
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: