Bonjour, voici un petit script pour extraire et afficher diverses
informations sur un fichier. Si cela peut servir :
set ObjetChoisi to choose file with prompt "Choisissez un fichier
quelconque"
get the info for the ObjetChoisi
set useMe to the result
get the name of useMe
set w_name to the result as string
display dialog ("name: " & w_name) buttons {"OK", "Annuler"} default
button 1 with icon note
set w_alias to ObjetChoisi as string
display dialog ("alias: " & w_alias) buttons {"OK", "Annuler"} default
button 1 with icon note
set L to length of w_alias
set R to 0 as integer
repeat with i from 1 to L
if character i of w_alias = ":" then
if R < i then
set R to i
end if
end if
end repeat
set R to R - 1
set chemin to text from character 1 to R of w_alias
display dialog ("last delimiter: " & R) buttons {"OK", "Annuler"}
default button 1 with icon note
display dialog ("chemin: " & chemin) buttons {"OK", "Annuler"} default
button 1 with icon note
get the file type of useMe
set wfiletype to the result
display dialog ("file type: " & wfiletype) buttons {"OK", "Annuler"}
default button 1 with icon note
get the file creator of useMe
set wfilecreator to the result
display dialog ("file creator: " & wfilecreator) buttons {"OK",
"Annuler"} default button 1 with icon note
get the creation date of useMe
set wcreationdate to the result
display dialog ("creation date: " & wcreationdate) buttons {"OK",
"Annuler"} default button 1 with icon note
get the modification date of useMe
set wmodificationdate to the result
display dialog ("modification date: " & wmodificationdate) buttons
{"OK", "Annuler"} default button 1 with icon note
get the size of useMe
set wSize to the result as integer
set wSize to (wSize / 1024) & " Ko" as string
display dialog ("Size: " & wSize) buttons {"OK", "Annuler"} default
button 1 with icon note
Cdt
PJ
-----------------------------------
ATTENTION : Ce message est protégé par les règles relatives au secret
des correspondances. Il peut en outre contenir des informations à
caractère confidentiel ou protégées par différentes règles et notamment
le secret des affaires. Il est établi à destination exclusive de son
destinataire. Toute divulgation, utilisation, diffusion ou reproduction
(totale ou partielle) de ce message, ou des informations qu'il contient,
doit être préalablement autorisée. L'émetteur décline toute
responsabilité au titre de ce message s'il a été modifié ou falsifié. Si
vous n'êtes pas destinataire de ce message, merci de le détruire
immédiatement et d'avertir l'expéditeur de l'erreur de distribution et
de la destruction du message. Toutes divulgations relèvera de la
commission Informatique et Liberté ainsi que des articles 226-15 et
432-9 du code pénal.
Le 05/05/2021 à 19:05, Yvan KOENIG via Applescript_fr a écrit :
>
>> Le 5 mai 2021 à 18:31, Madert Pascal via Applescript_fr <applescript_fr@???> a écrit :
>>
>> Merci Yvan
>> Oui, dans cet exemple, "y" n'est pas utilisé, mais ça va venir. Il va falloir changer le nom du fichier (donc de "y") ensuite.
>> C'est pour cela que j'ai besoin de récupérer le chemin et le nom pour pouvoir le modifier avec les valeurs de certaines cellules.
>> J'ai modifié avec set y to name of (first item of filename) comme proposé, mais j'ai le même message.
>> C'est un seul fichier excel avec 1 seule feuille que je pose sur le Droplet.
>> J'ai enlevé le "sélect", ça fonctionne bien, c'est plus rapide.
>>
>> Pascal
> Je ne suis pas certain de ce que vous souhaitez obtenir
>
> Je suppose qu'il serait possible d'exécuter:
>
> on open fileName
> -- vérification de la nature du paramètre
> if class of filename is list then set filename to first item of filename
> set filePath to filename as text -- retourne le chemin d'accès Hfs
> tell application "Finder"
> set theFileName to name of filename
> end tell
>
> tell application "Microsoft Excel"
> activate
> open fileName
> set x to value of cell "C2"
> end tell
> end open
>
> Yvan KOENIG (VALLAURIS, France) mercredi 5 mai 2021 19:05:43
> _______________________________________________
> Applescript_fr mailing list
> Applescript_fr@???
> http://listes.patpro.net/mailman/listinfo/applescript_fr
> .
>
_______________________________________________
Applescript_fr mailing list
Applescript_fr@???
http://listes.patpro.net/mailman/listinfo/applescript_fr
