Ahora bien, la parte de cambiar el icono ya está hecha. Date cuenta de cambiar el nombre del archivo lanzador en el escritorio (Este solo es el nombre) y la ruta completa (TODA la ruta, en el caso del archivo con el icono)

Me ha llevado un ratillo pero funciona perfectamente.
(*
IMPORTANTE:

Es necesario cambiar las siguientes partes:
“/compartida/icono” –> Debe ser la RUTA COMPLETA al icono personalizado que queremos usar
“sample.webloc” –> Es, SOLAMENTE EL NOMBRE del archivo LANZADOR en el escritorio.

Solo es necesario cambiar esas dos partes
*)

– Creamos IconoPersonalizado con la ruta al Icono que queremos
set IconoPersonalizado to (POSIX file “/compartida/icono”) as alias
– Ahora Creamos Lanzador con la ruta al lanzador en el escritorio
set Lanzador to POSIX path of (path to desktop as alias)
set Lanzador to Lanzador & “sample.webloc”
set Lanzador to (POSIX file Lanzador) as alias

– Creamos una variable con la ventana de informacion del icono
tell application “Finder”
activate
set VentanaInformacion to open information window of IconoPersonalizado
set VentanaInformacionAbierta to name of VentanaInformacion
end tell

– Copiamos el icono
tell application “System Events”
tell application process “Finder”
tell window VentanaInformacionAbierta
keystroke tab
delay 1
keystroke “c” using command down
end tell
end tell
end tell

– Cerramos la ventana de info y RE-creamos de nuevo la variable VentanaInformacion pero con la info del lanzador
tell application “Finder”
close VentanaInformacion
set VentanaInformacion to open information window of Lanzador
set VentanaInformacionAbierta to name of VentanaInformacion
end tell

–Pegamos el icono
tell application “System Events”
tell application process “Finder”
tell window VentanaInformacionAbierta
keystroke tab
delay 1
keystroke “v” using command down
end tell
end tell
end tell

–Cerramos la ventana de info
tell application “Finder”
close VentanaInformacion
end tell

El script que te envié en el post, es para colocarlo dentro de un pendrive y que al insertarlo en el ordenador se ejecute automaticamente y te coloque en el escritorio un icono (webloc) que te lleve directamente al sitioweb. Por eso es la necesidad de cambiar el icono para que visualmente una persona identifique el icono del producto que a comprado.

Con lo creo que la solucion seria una vez creado el webloc con el icono que deseo a traves de command+c y command+v. es hacer un sencillo escript que lo copie del pendrive al escritorio del usuario. Ahora como seria ese script?

Saludos y muchas gracias por tu pronta respuesta.

Hola, dependiendo del objetivo que busques se puede complicar un poco el tema.
Me explico: El tema de cambiar los iconos de los archivos con AppleScript mediante “comandos simples” hoy por hoy, no es posible aunque de formas más o menos indirectas se puede hacer.

Las 2 primeras soluciones que se me ocurren son:

a.- Que el Script principal (El que ejecuta el usuario) lo guardes como paquete de aplicación o de script. Esto te crearía un directorio .app que, a los ojos del usuario seria un archivo .app común, es decir, una aplicación más, pero en cuyo contenido tendrías la estructura de carpetas y archivos de tu aplicación. Dentro de esta estructura podrías meter el enlace a la WEB ya hecho previamente y con un icono personalizado de forma que, para tener dicho lanzador en el escritorio, desde el script principal no tendrías que crearlo con un icono diferente sino que bastaría con solo copiarlo del App principal.

b.- La otra opción, si realmente necesitas o quieres crearlo desde cero, te obligaría a recurrir a las pulsaciones de teclado “Virtuales”, es decir, realizar con código los mismos pasos que realizarías para cambiar el icono de forma manual. Sería algo así como esto:
1.- Crear el lanzador
2.- Seleccionar el icono deseado y copiarlo con las teclas “Comando+C”
3.- Seleccionar el lanzador
4.- Abrir la ventana de información del mismo y pegar el icono, desde el portapapeles, mediante las teclas “comando+v”

Ten en cuenta que también en la segunda deberías tener “a mano” el icono original. Si no es un icono estándar en el sistema tendrás que incorporarlo en la estructura del script principal como en la opción A. Si en cambio usas un icono que si esté siempre en el sistema, por ejemplo, el de Safari, creo que podrías ahorrarte esa parte.

Espero haberte ayudado

He creado un script que al ejecutarlo me crea un icono en el escritorio de mac web a modo de acceso directo que al hacer click en el me lleva a la pagina. El script es el siguiente:

tell application “Finder”
make new internet location file at desktop to ¬
“http://www.maxflats.com/” with properties {name:”maxflats”}
end tell

lo hace bien… me crea un icono en el escritorio y cuando hago click en el me lleva a la pagina indicada. Pero el icono que crea me pone un simbolo de arroba, y la pregunta hay alguna manera que le indique que me ponga otro icono.

Espero puedas ayudarme. Muchas gracias, es importante.

Saludos.