OVH Cloud OVH Cloud

[Recherche] Script pour automatiser lrelèvedes news avec MacSOUP

18 réponses
Avatar
derfnam
Bonjour tout le monde,

je cherche donc un script qui me permettrait, une fois MS lancé, de
relever les articles (donc l'équivalent du cmd-k à intervalles réguliers
(toutes les 5 ou 10 mn, par exemple). Comme je suis nul en applescript,
"à vot' bon coeur, M'sieudames!"
Merci ...
--
Manfred
42° 42' 0" N, 9° 26' 59" E.
iMac Intel Core 2 Duo, Mac OS X 10.6.8.

8 réponses

1 2
Avatar
derfnam
MV wrote:


Tu peux essayer ça aussi :
-----
tell application "Finder"
open document file "Applications:MacSOUP:Alphanet:Alphanet" of
startup disk
end tell
tell application "MacSOUP"
activate
connect with checking for new groups
end tell
on idle
with timeout of 60 seconds
tell application "MacSOUP"
connect with fetching news
connect with fetching tagged headers
connect with sending
end tell
end timeout
return 300
end idle
-----



Ok... Si mon doc de paramètes s'appelle "MacSOUP Settings", qu'est-ce
que je dois changer dans le script ci-dessus?
--
Manfred
42° 42' 0" N, 9° 26' 59" E.
iMac Intel Core 2 Duo, Mac OS X 10.6.8.
Avatar
g4fleurot
MV wrote:

-----
tell application "Finder"
open document file "Applications:MacSOUP:Alphanet:Alphanet" of
startup disk
end tell
tell application "MacSOUP"
activate
connect with fetching news and checking for new groups
end tell
on idle
with timeout of 60 seconds
tell application "MacSOUP"
connect with fetching news
connect with fetching tagged headers
connect with sending
end tell
end timeout
return 240
end idle
-----



Oui, mais...
-----
tell application "Finder"
open document file "Applications:MacSOUP:Alphanet:Alphanet" of
startup disk --> OK
end tell
tell application "MacSOUP"
activate
connect with fetching news and checking for new groups -->
relève les news et les nouveaux groupes
end tell
on idle --> date de l'époque où on se connectait en RTC
with timeout of 60 seconds --> date de l'époque où on se
connectait en RTC
tell application "MacSOUP"
connect with fetching news --> 2ème relève,
déjà fait au dessus
connect with fetching tagged headers --> relève
les en-têtes marquées : on a déjà relevé les news
connect with sending --> envoie les messages en
attente
end tell
end timeout
return 240
end idle
-----
Voyons dans la palette Pomme K ce que fait l'application et qu'on
retrouve dans le dictionnaire AppleScript de l'application :

Ramener le courrier = connect with fetching mail
Ramener les nouvelles = connect with fetching news (tous les groupes)
Si on a ramené les nouvelles, Ramener les articles à l'en-tête coché
(connect with fetching tagged headers) est grisé.
Envoyer les messages en attente = connect with sending
Relever les nouveaux groupes = connect with checking for new groups
Relever la liste de tous les groupes = non prévu
Menu "Spécial" de l'application > Purger les vieux articles = purge

Entre tell application "MacSoup", activate pour voir ce qu'il se passe
et end tell, on insère les lignes que l'on souhaite utiliser.
Le reste, iddle, time out, (éventuellement try présent dans les vieux
scripts) ne sert plus à rien en étant connecté en adsl.
--
Gérard FLEUROT plus un
Avatar
mvaukois
Manfred La Cassagnère wrote:

Si mon doc de paramètes s'appelle "MacSOUP Settings", qu'est-ce
que je dois changer dans le script ci-dessus?



Je ne sais pas ce qui se passe quand il y a une espace dans le nom...
T'as qu'à changer le nom du fichier de config pour éliminer l'espace !
Le chemin que j'ai indiqué pour ma part signifie qu'il faut lancer le
fichier de config nommé Alphanet qui se trouve dans le dossier Alphanet
lui même situé dans le dossier MacSOUP du dossier Applications placé
dans le DD de démarrage...
Si j'ai compris les explications de Gérard Fleurot, je dois pouvoir
simplifier "mon" script en :
-----
tell application "Finder"
open document file "Applications:MacSOUP:Alphanet:Alphanet" of
startup disk
end tell
on idle
tell application "MacSOUP"
activate
connect with checking for new groups
connect with fetching news
connect with fetching tagged headers
connect with sending
end tell
return 300
end idle
-----
--
Michel Vauquois
Que Dieu vous garde... Moi j'ai pas le temps (RD)
Avatar
g4fleurot
Manfred La Cassagnère wrote:

Ok... Si mon doc de paramètes s'appelle "MacSOUP Settings", qu'est-ce
que je dois changer dans le script ci-dessus?


-----
tell application "Finder"
open document file "Applications:MacSOUP:Alphanet:MacSOUP Settings" of startup disk
end tell
--on idle
tell application "MacSOUP"
activate
connect with checking for new groups
connect with fetching news
connect with fetching tagged headers
connect with sending
end tell
--return 300
--end idle
----

si le document de paramètres se nomme MacSoup Settings, dans un dossier "Alphanet" dans un dossier
MacSoup du dossier Applications.

Faire un alias du fichier "MacSoup Settings", le renommer "MacSOUP Default Settings" et le placer
dans le dossier Preferences de la bibliothèque "Départ"
--
Gérard FLEUROT plus un
Avatar
g4fleurot
Fleuger wrote:

Pour éviter les soucis avec les espaces dans les noms de fichiers (et
donc dans les chemins de scripts), je les remplace par le tiret bas
obtenu en faisant shift tiret. (shift -> majuscule non verouillée)

--
Gérard FLEUROT plus un
Avatar
mvaukois
MV wrote:

Si j'ai compris les explications de Gérard Fleurot, je dois pouvoir
simplifier "mon" script en



Pour pas que MacSOUP vienne au premier plan quand il relève les
nouvelles, j'ai finalement viré la ligne « activate ».
J'ai aussi ajouté une ligne « delay 1 » car ça allait trop vite et
j'avais un message d'erreur (le fichier de config n'était pas fini de
charger avant de passer au chargement des nouveaux messages qui échouait
donc au lancement initial)
Ça donne donc ce qui suit (j'ai carrémént mis le nom de mon DD dans le
chemin du fichier de config plutôt que startup disk) :
-----
tell application "Finder"
open document file "MV Mac:Applications:MacSOUP:Alphanet:Alphanet"
delay 1
end tell
on idle
tell application "MacSOUP"
connect with sending
connect with fetching news
connect with fetching tagged headers
end tell
return 10
end idle
-----
--
Michel Vauquois
Que Dieu vous garde... Moi j'ai pas le temps (RD)
Avatar
mvaukois
MV wrote:

return 10



C'est 300 et non 10 !
--
Michel Vauquois
Que Dieu vous garde... Moi j'ai pas le temps (RD)
Avatar
derfnam
Pour éviter les soucis avec les espaces dans les noms de fichiers (et
donc dans les chemins de scripts), je les remplace par le tiret bas
obtenu en faisant shift tiret. (shift -> majuscule non verouillée)



Ok, merci à toi et à tous pour ces explications. Dés que j'ai un peu de
temps je m'y attèle...
A+
--
Manfred
42° 42' 0" N, 9° 26' 59" E.
iMac Intel Core 2 Duo, Mac OS X 10.6.8.
1 2