Apple Script 在一个脚本中关闭和打开文件共享

Question

我正在竭尽全力编写一个在 10.8 中执行以下操作的脚本。 ：

-在“共享”控制面板中取消选中“文件共享”

-检查“共享”控制面板中的“文件共享”

-确保在脚本完成时检查它

我为什么要这样做？因为 10.8 有一个 bug。使用 Samba（无法从另一台机器 smb-login），如果文件共享在启动时被关闭并重新打开，一切都很好。

谁能帮我解决这个问题……？对你们来说应该很容易:-)

非常感谢您，最好的-Ph！L！pp

Answer 1

此代码应切换共享首选项，等待 1 秒，然后再次切换。

tell application "System Preferences"
 activate
end tell

tell application "System Events"
tell process "System Preferences"
click menu item "Sharing" of menu "View" of menu bar 1
delay 2
tell window "Sharing"
  click checkbox 1 of row 3 of table 1 of scroll area 1 of group 1
  delay 1
  if (exists sheet 1) then
    if (exists button "Turn AirPort On" of sheet 1) then
      click button "Turn AirPort On" of sheet 1
      delay 1
    end if
    click button "Start" of sheet 1
  end if
end tell
end tell
end tell
delay 1
tell application "System Events"
tell process "System Preferences"
click menu item "Sharing" of menu "View" of menu bar 1
delay 2
tell window "Sharing"
  click checkbox 1 of row 3 of table 1 of scroll area 1 of group 1
  delay 1
  if (exists sheet 1) then
    if (exists button "Turn AirPort On" of sheet 1) then
      click button "Turn AirPort On" of sheet 1
      delay 1
    end if
    click button "Start" of sheet 1
  end if
end tell
end tell
end tell