Estoy buscando una forma de crear un nuevo archivo .url en la carpeta actual, pero que tenga un campo de entrada que me permita introducir la dirección web deseada a la que debe enlazar el archivo. Todo el proceso debe ser similar a cómo Windows maneja la creación de un nuevo acceso directo, lo que significa que debe como para la dirección del enlace y luego crear el acceso directo en la carpeta activa.
¿Hay alguna manera de realizar esto con Apple script y/o Keyboard Maestro? Esto sería útil ya que a menudo me encuentro queriendo añadir archivos .url a las carpetas.
Gracias. A2k
EDITAR:
Así que me las arreglé para conseguir el anterior algo de trabajo con el código de abajo, pero todavía se enfrentan a un par de problemas: * El nombre del archivo está codificado como "Shortcut.url". El script se rompe si el nombre del archivo "shortcut.url" ya existe * el script se rompe al pulsar el botón "Cancelar" de la ventana de diálogo del archivo. ¿Cómo puedo abordar este escenario y añadir el manejo de errores?
tell application "Finder"
try
display dialog "Enter URL / IP Address below:" default answer ""
set urlName to the text returned of result
if length of urlName = 0 then
return 0
end if
set fileExt to ".url"
set thisFolder to the target of the front window as alias
set newFile to "Shortcut" & fileExt
make new file at thisFolder with properties {name:newFile, file type:"TEXT", creator type:"ttxt"}
set tFile to open for access (thisFolder as text) & newFile with write permission
try
write ("
[InternetShortcut]
URL=" & urlName & "
IconIndex=0
") to tFile
close access tFile
on error
close access tFile
end try
on error errMsg
display dialog (errMsg)
end try
end tellAgradezco cualquier ayuda, A2k
