Koodi: Valitse kaikki
set theWebsite to "hs.fi"
tell application "Safari" to activate
delay 2
tell application "System Events" to tell process "Safari"
keystroke "," using command down
tell window 1
click button -4 of tool bar 1
delay 3
click button -2 of group 1 of group 1
delay 1
keystroke theWebsite
keystroke tab
delay 1
keystroke "a" using command down
delay 1
click button -2 of sheet 1
click button -1 of sheet 1
end tell
keystroke "w" using command down
keystroke "r" using command down
end tell
Muuten scripti on ihan vapaasti hyödynnettävissä, toimiessaan se toimii.
Myöhäinen editointi: Vaihdoin tuonne alalaitaan riville "click button -2 of sheet 1" -2 tilalle -3 ja pääsin yhdestä enterin painalluksesta eroon. Otin myös viiveet pois, alkuperäinen satunnainen ongelma on yhä olemassa.