[Codage] Une sorte de remplisseur de formulaire

Encore un probleme se dresse devant moi
Bloc de code:
do shell script "/Library/ScriptingAdditions/ClickMouse 10 10"

N'y a t-il pas moyen d'utiliser ce script avec des variables que je définiriais?
Oui, c'est la même chose que concaténer une chaîne
Bloc de code:
do shell script "/Library/ScriptingAdditions/ClickMouse  " & x & space & y -- simple clic

Autres possibilités, double clic ou clic droit
Bloc de code:
do shell script "/Library/ScriptingAdditions/ClickMouse  " & x & space & y & " 2" -- double clic
do shell script "/Library/ScriptingAdditions/ClickMouse  " & x & space & y & " r" -- clic droit
 
Oui, c'est la même chose que concaténer une chaîne
Bloc de code:
do shell script "/Library/ScriptingAdditions/ClickMouse  " & x & space & y -- simple clic

Autres possibilités, double clic ou clic droit
Bloc de code:
do shell script "/Library/ScriptingAdditions/ClickMouse  " & x & space & y & " 2" -- double clic
do shell script "/Library/ScriptingAdditions/ClickMouse  " & x & space & y & " r" -- clic droit

Ca mache ;) Merci!
 
Bonjour, je me permet de réup ce post car j'ai perdu le fichier clickmouse.
Pouvez vous s'il vous plait pascal me le remettre?

Merci!
 
J'ai un autre problème la, j'espere que celui ci est le dernier :)

Donc, quand j'essaye d'écrire dans un fichier texte, je n'arrive pas à supprimer ce qu'il y a avant, et ecrire un nouveau truc.

Voila mon code
Bloc de code:
tell application "Finder"
	set txt to "Voila le texte que je veux ecrire"
	-- Initialisation des variables Mais (répertoire user) et PathFichier (alias du fichier à lire)
	set Mais to a reference to home
	set PathFichier to file "fichiertest.txt" of folder "Desktop" of Mais as alias
	-- Ouverture et lecture du fichier de travail "NomFichier.txt"
	open for access PathFichier with write permission
	write txt to PathFichier
	
	close access PathFichier
	
	
end tell

Donc comment faire pour overwriter.. Comme si je faisait abstraction des données précédentes.

Merci pour votre réponse!
 
Bonjour,

J'ai un autre problème la, j'espere que celui ci est le dernier :)

Donc, quand j'essaye d'écrire dans un fichier texte, je n'arrive pas à supprimer ce qu'il y a avant, et ecrire un nouveau truc.

il faut utiliser "set eof to 0"
Bloc de code:
set txt to "Voila le texte que je veux ecrire"
set PathFichier to (path to desktop folder as string) & "fichiertest.txt"

-- Ouverture et lecture du fichier de travail "NomFichier.txt"
set openFile to open for access file PathFichier with write permission
set eof openFile to 0 -- efface le contenu du fichier
write txt to openFile
close access openFile

Le tell application "Finder" n'est pas nécessaire pour écrire ou lire un fichier
 
Bonjour, ok , Ca permet d'alleger mon script ;)
Et merci ca marche.
 
Un dernier obstacle se dresse sur mon passage :

Suite à l'utilisation de votre script, de temps en temps, de manière aléatoire, j'ai Text edit qui "beug".
Je m'explique :
Si j'ouvre Textedit, j'écrit quelque chose dessus puis j'enregistre et je quitte. Le fichier ne s'enregistre pas. Le fichier enregistré est seulement un fichier contenant des espaces.
En fait, si j'écrit :
" Ceci est un message texte
Ceci est un message texte"

Il enregistre plutôt deux ligne vide.


Aussi, si je veux exploiter un fichier texte écrit sous Textedit ou autre, Applescript déjante et exécute mal les commandes! (Si par exemple, je veux mettre le 5eme mot de la seconde ligne dans une variable, quand ce bug se produit il relève le 4eme mot et non le 5eme).
Ceci est très gênant d'autant plus que si je quitte applescript ou textedit, le bug ne s'estompe pas!
Celui ci s'estompera plus tard de manière aléatoire.

Edit : Je viens de relever un autre beug relatif à celui la
Si j'extraie une ligne d'un fichier texte quand ce bug se produit.
et j'execute le code "
Bloc de code:
	tell application "System Events"
		tell process "Safari"
keystroke txt
end tell
end tell

Si le message stocké dans la variable txt est "Message stocké dans la variable"
Le message ecrit sera "Mqeqsqsqaqgqeq qsqtqoqcqkqéq qdqaqnqsq qlqaq qvqaqrqiqaqbqlqe"

En gros, l'ajout d'un q entre chaque lettre
 
Dernière édition:
Un dernier obstacle se dresse sur mon passage :

Suite à l'utilisation de votre script, de temps en temps, de manière aléatoire, j'ai Text edit qui "beug".
Je m'explique :
Si j'ouvre Textedit, j'écrit quelque chose dessus puis j'enregistre et je quitte. Le fichier ne s'enregistre pas. Le fichier enregistré est seulement un fichier contenant des espaces.
En fait, si j'écrit :
" Ceci est un message texte
Ceci est un message texte"

Il enregistre plutôt deux ligne vide.


Aussi, si je veux exploiter un fichier texte écrit sous Textedit ou autre, Applescript déjante et exécute mal les commandes! (Si par exemple, je veux mettre le 5eme mot de la seconde ligne dans une variable, quand ce bug se produit il relève le 4eme mot et non le 5eme).
Ceci est très gênant d'autant plus que si je quitte applescript ou textedit, le bug ne s'estompe pas!
Celui ci s'estompera plus tard de manière aléatoire.

Edit : Je viens de relever un autre beug relatif à celui la
Si j'extraie une ligne d'un fichier texte quand ce bug se produit.
et j'execute le code "
Bloc de code:
	tell application "System Events"
		tell process "Safari"
keystroke txt
end tell
end tell

Si le message stocké dans la variable txt est "Message stocké dans la variable"
Le message ecrit sera "Mqeqsqsqaqgqeq qsqtqoqcqkqéq qdqaqnqsq qlqaq qvqaqrqiqaqbqlqe"

En gros, l'ajout d'un q entre chaque lettre

et de plus, mon fichier text, ecrit à partir du code
Bloc de code:
set txt to "Voila le texte que je veux ecrire"
set PathFichier to (path to desktop folder as string) & "fichiertest.txt"

-- Ouverture et lecture du fichier de travail "NomFichier.txt"
set openFile to open for access file PathFichier with write permission
set eof openFile to 0 -- efface le contenu du fichier
write txt to openFile
close access openFile

Commence par recout8utxt