Posso sostituire velocemente un separatore nei numeri di telefono della Rubrica Indirizzi?
Capita che si debba cambiare il centralino oppure il fornitore di servizi e tutti e 700 numeri fax della rubrica non funzionano più ... :-( che si fa?

Si riscrivono?? Noo!

Si usa lo script qui sotto: si copia il codice, si incolla in /Applicazioni/AppleScript/Script Editor.app, si modificano i separatori vecchio e nuovo, quindi si avvia... fatto.
 

property VecchioSeparatore : "*"
property NuovoSeparatore : ","

tell application "Address Book"
 activate
 set Contatti to every person
 repeat with Contatto in Contatti
  set Telefoni to every phone of Contatto as list
  repeat with Telefono in Telefoni
   set QuestoNumero to value in Telefono
   set NuovoNumero to my Sostituisci(QuestoNumero, VecchioSeparatore, NuovoSeparatore)
   set value of Telefono to NuovoNumero
  end repeat
 end repeat
end tell

on Sostituisci(Stringa, Cerca, Cambia)
 set AppleScript's text item delimiters to Cerca
 set Lista to every text item of Stringa
 set AppleScript's text item delimiters to Cambia
 set NuovaStringa to Lista as string
 set AppleScript's text item delimiters to ""
 return NuovaStringa
end Sostituisci
 


[ Home | Elenco delle FAQ | Forum | Segnalazioni | Risorse | Feed RSS ]