Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Gilles.SilberzahnNOSPAM
jean-pierre gerbal wrote:
Existe-t-il une moulinette permettant de réécrire tous mes numéros de téléphone carnet d'adresse commençant par 0 en +33espace ?
Bon, je suppose que c'est la suite du thread "Fax et International"...
Pour répondre à ta question, oui, ça existe, et un grand merci à Roberto pour l'énorme coup de main AppleScript de l'époque (Sept 2002). Évidemment, comme il X-No-Archive toutes ses participations, difficile d'en retrouver la trace, mais je l'ai ressortie du fond d'une ancienne machine...
Ci dessous l'AppleScript à copier-coller. ---------------------------------------------------------------------- property OldNum : "0" property NewNum : "+33 " property ChangeCount : 0 on run tell application "Address Book" set ull to get every person repeat with ull2 in ull repeat with ull3 in phones of ull2 if (value of ull3) starts with OldNum then set IDPhone to id of ull3 set IDContact to id of ull2 set vieuxnum to value of ull3 set nouvnum to my OldToNew(vieuxnum) set value of (phone id IDPhone) of (person id IDContact) to nouvnum set ChangeCount to ChangeCount + 1 end if end repeat end repeat end tell return ChangeCount end run
on OldToNew(num) set x to the number of characters of OldNum set num to (characters (x + 1) thru -1 of num) as text return NewNum & num end OldToNew ----------------------------------------------------------------------
Ça fonctionnait avec d'anciennes versions du Carnet d'Adresses, donc une sauvegarde de ta base de données ne sera pas superflue avant d'appliquer le script (Carnet d'Adresses, tout sélectionner, Drag & Drop sur le bureau par exemple).
Après éxécution du script, ce que tu obtiendras sous l'onglet "résultat" est le nombre de numéros changés.
Attention, si tu as des correspondants dans les DOM, le préfixe international n'est pas "+33" : +590, +594, +596, +262 pour Guadeloupe, Guyane, Martinique, Réunion. Pour les TOM, je sais pas... Mais c'est donc par eux qu'il faut commencer, en changeant tous tes numéros commençant par "05 94" en "+594 5 94", et "06 94" en "+594 6 94", pour les fixes et les portables de Guyane, par exemple.
Je fais un passage par "classiques" pour saluer Roberto, et un retour chez nous... -- Gilles http://www.Gilles.Silberzahn.com
Existe-t-il une moulinette permettant de réécrire tous mes numéros de
téléphone carnet d'adresse commençant par 0 en +33espace ?
Bon, je suppose que c'est la suite du thread "Fax et International"...
Pour répondre à ta question, oui, ça existe, et un grand merci à Roberto
pour l'énorme coup de main AppleScript de l'époque (Sept 2002).
Évidemment, comme il X-No-Archive toutes ses participations, difficile
d'en retrouver la trace, mais je l'ai ressortie du fond d'une ancienne
machine...
Ci dessous l'AppleScript à copier-coller.
----------------------------------------------------------------------
property OldNum : "0"
property NewNum : "+33 "
property ChangeCount : 0
on run
tell application "Address Book"
set ull to get every person
repeat with ull2 in ull
repeat with ull3 in phones of ull2
if (value of ull3) starts with OldNum then
set IDPhone to id of ull3
set IDContact to id of ull2
set vieuxnum to value of ull3
set nouvnum to my OldToNew(vieuxnum)
set value of (phone id IDPhone) of (person id IDContact) to nouvnum
set ChangeCount to ChangeCount + 1
end if
end repeat
end repeat
end tell
return ChangeCount
end run
on OldToNew(num)
set x to the number of characters of OldNum
set num to (characters (x + 1) thru -1 of num) as text
return NewNum & num
end OldToNew
----------------------------------------------------------------------
Ça fonctionnait avec d'anciennes versions du Carnet d'Adresses, donc une
sauvegarde de ta base de données ne sera pas superflue avant d'appliquer
le script (Carnet d'Adresses, tout sélectionner, Drag & Drop sur le
bureau par exemple).
Après éxécution du script, ce que tu obtiendras sous l'onglet "résultat"
est le nombre de numéros changés.
Attention, si tu as des correspondants dans les DOM, le préfixe
international n'est pas "+33" : +590, +594, +596, +262 pour Guadeloupe,
Guyane, Martinique, Réunion. Pour les TOM, je sais pas... Mais c'est
donc par eux qu'il faut commencer, en changeant tous tes numéros
commençant par "05 94" en "+594 5 94", et "06 94" en "+594 6 94", pour
les fixes et les portables de Guyane, par exemple.
Je fais un passage par "classiques" pour saluer Roberto, et un retour
chez nous...
--
Gilles
http://www.Gilles.Silberzahn.com
Existe-t-il une moulinette permettant de réécrire tous mes numéros de téléphone carnet d'adresse commençant par 0 en +33espace ?
Bon, je suppose que c'est la suite du thread "Fax et International"...
Pour répondre à ta question, oui, ça existe, et un grand merci à Roberto pour l'énorme coup de main AppleScript de l'époque (Sept 2002). Évidemment, comme il X-No-Archive toutes ses participations, difficile d'en retrouver la trace, mais je l'ai ressortie du fond d'une ancienne machine...
Ci dessous l'AppleScript à copier-coller. ---------------------------------------------------------------------- property OldNum : "0" property NewNum : "+33 " property ChangeCount : 0 on run tell application "Address Book" set ull to get every person repeat with ull2 in ull repeat with ull3 in phones of ull2 if (value of ull3) starts with OldNum then set IDPhone to id of ull3 set IDContact to id of ull2 set vieuxnum to value of ull3 set nouvnum to my OldToNew(vieuxnum) set value of (phone id IDPhone) of (person id IDContact) to nouvnum set ChangeCount to ChangeCount + 1 end if end repeat end repeat end tell return ChangeCount end run
on OldToNew(num) set x to the number of characters of OldNum set num to (characters (x + 1) thru -1 of num) as text return NewNum & num end OldToNew ----------------------------------------------------------------------
Ça fonctionnait avec d'anciennes versions du Carnet d'Adresses, donc une sauvegarde de ta base de données ne sera pas superflue avant d'appliquer le script (Carnet d'Adresses, tout sélectionner, Drag & Drop sur le bureau par exemple).
Après éxécution du script, ce que tu obtiendras sous l'onglet "résultat" est le nombre de numéros changés.
Attention, si tu as des correspondants dans les DOM, le préfixe international n'est pas "+33" : +590, +594, +596, +262 pour Guadeloupe, Guyane, Martinique, Réunion. Pour les TOM, je sais pas... Mais c'est donc par eux qu'il faut commencer, en changeant tous tes numéros commençant par "05 94" en "+594 5 94", et "06 94" en "+594 6 94", pour les fixes et les portables de Guyane, par exemple.
Je fais un passage par "classiques" pour saluer Roberto, et un retour chez nous... -- Gilles http://www.Gilles.Silberzahn.com
Gilles.SilberzahnNOSPAM
Gilles Silberzahn wrote:
un grand merci à Roberto pour l'énorme coup de main AppleScript de l'époque (Sept 2002).
Oups, j'avais oublié Vincent dans les remerciements... Corrigé ! -- Gilles http://www.Gilles.Silberzahn.com
