• Open Menu Close Menu
  • Apple
  • Shopping Bag
  • Apple
  • Mac
  • iPad
  • iPhone
  • Watch
  • TV
  • Music
  • Support
  • Search apple.com
  • Shopping Bag
 

Lists

Open Menu Close Menu
  • Terms and Conditions
  • Lists hosted on this site
  • Email the Postmaster
  • Tips for posting to public mailing lists
Re: AppleScript Enigma
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: AppleScript Enigma


  • Subject: Re: AppleScript Enigma
  • From: email@hidden
  • Date: Fri, 28 Sep 2001 18:37:16 +0200

At 14:26 +0100 01/09/28, Steve Thompson wrote:
>They're FaceSpan commands. Do you have the FaceSpan extension installed?

Hi, Steve !

No, I haven't. And I don't have FaceSpan on the 8.6 machine either, but it works. As far as I know, it's nothing to do with FaceSpan at all, since this other script below works perfectly with 9.2.1:

tell application "Finder"
activate
set UpperLeft to 715
if the (count of container windows) = 0 then
my PostError("No folder window currently open")
else
set the view of the first container window to name
set the view of the first container window to kind
set has custom view settings of the first container window to true
set zoomed of the first container window to true
set position of the first container window to {UpperLeft, 43}
end if
end tell

while this one doesn't:

tell application "Finder"
activate
set folderList to folders in selection
set UpperLeft to 715
if folderList is {} then
if the (count of container windows) = 0 then
my PostError("No folder window currently open")
else
set the view of the first container window to name
set the view of the first container window to kind
set has custom view settings of the first container window to true
set zoomed of the first container window to true
set position of the first container window to {UpperLeft, 43}
end if
else
set windowList to container windows
repeat with theFolder in folderList
tell theFolder
open
set view of its container window to name
set view of its container window to kind
if folders is not {} then set expanded of folders to false
set has custom view settings of its container window to true
set zoomed of its container window to true
set position of its container window to {UpperLeft, 43}
if windowList does not contain its container window then close
end tell
end repeat
end if
end tell


References: 
 >Re: AppleScript Enigma (From: Steve Thompson <email@hidden>)

  • Prev by Date: Changing screen resolution
  • Next by Date: Re: Sorting handler
  • Previous by thread: Re: AppleScript Enigma
  • Next by thread: Re: AppleScript Enigma
  • Index(es):
    • Date
    • Thread