devonthink_search_window.applescript

on alfred_script(keyword)
  set the clipboard to keyword
  tell application id "DNtp"
    activate
  end tell
  tell application id "com.apple.systemevents"
    tell process id "DNtp"
      keystroke "f" using {shift down, command down}
      keystroke "v" using {command down}
      keystroke return
    end tell
  end tell
end alfred_script