Este script funciona bien para mí y para la mayoría de mis clientes, pero para algunos clientes se agota el tiempo con el error -1712; No tengo idea de por qué. He intentado aumentar el tiempo de espera, pero no hace ninguna diferencia.
El archivo /tmp/itunes_model.txt no se crea, por lo que no parece estar haciendo nada.
¿Cómo puedo corregir / corregir esto?
with timeout of 1200 seconds
tell application "iTunes"
if (count of every file track of library playlist 1) is equal to 0 then
set thePath to (POSIX file "/tmp/itunes_model.txt")
set fileref to open for access (thePath) with write permission
set eof fileref to 0
close access fileref
return
end if
tell every file track of library playlist 1
script performancekludge
property tracknames : its name
property locs : its location
property persistids : its persistent ID
end script
end tell
end tell
set thePath to (POSIX file "/tmp/itunes_model.txt")
set fileref to open for access (thePath) with write permission
set eof fileref to 0
tell performancekludge
repeat with i from 1 to length of its tracknames
try
set nextline to item i of its tracknames ¬
& "::" & POSIX path of item i of its locs ¬
& "::" & item i of its persistids
write nextline & linefeed as «class utf8» to fileref
end try
end repeat
end tell
close access fileref
end timeout
Se agregó un try-catch alrededor del error según se solicitó y se volvió a hacer; La primera vez que se ejecutó funcionó, lo que es interesante, pero la segunda vez falló nuevamente, ya que no recopila más información útil.
