delay で遅延させるサンプル
【スクリプトエディタで開く】 |
8_テストサンプル[open file].scpt.scpt | ソース |
|---|
| 001 | #!/usr/bin/env osascript |
| 002 | #coding: utf-8 |
| 003 | ----+----1----+----2----+-----3----+----4----+----5----+----6----+----7-- |
| 004 | (* |
| 005 | テスト用のサンプルスクリプト |
| 006 | 複数のファイルをFinderで開きます |
| 007 | この時、開くアプリケーションを指定しないで行う処理です・ |
| 008 |
|
| 009 | ７つのHTMLファイルをデフォルトのWEBブラウザ |
| 010 | （HTMLと関連づけられているアプリケーション）で開きます |
| 011 |
|
| 012 |
|
| 013 | 処理待ち時間をつけているので |
| 014 | この方法だと発生しない |
| 015 | noteの記事用のデモスクリプト |
| 016 | https://note.com/quicktimer/n/nd0342b80d2f7 |
| 017 | com.cocolog-nifty.quicktimer.icefloe *) |
| 018 | ----+----1----+----2----+-----3----+----4----+----5----+----6----+----7-- |
| 019 | use AppleScript version "2.8" |
| 020 | use scripting additions |
| 021 |
|
| 022 | #開くファイルのパスのリスト |
| 023 | set listFilePath to {"/Library/Documentation/License.lpdf/Contents/Resources/English.lproj/License.html", "/Library/Documentation/License.lpdf/Contents/Resources/German.lproj/License.html", "/Library/Documentation/License.lpdf/Contents/Resources/French.lproj/License.html", "/Library/Documentation/License.lpdf/Contents/Resources/Dutch.lproj/License.html", "/Library/Documentation/License.lpdf/Contents/Resources/Italian.lproj/License.html", "/Library/Documentation/License.lpdf/Contents/Resources/Japanese.lproj/License.html", "/Library/Documentation/License.lpdf/Contents/Resources/Spanish.lproj/License.html"} as list |
| 024 |
|
| 025 |
|
| 026 | #UNIXパスリストをエイリアスパスリストに変換 |
| 027 | set listAliasFilePath to {} as list |
| 028 | repeat with itemFilePath in listFilePath |
| 029 | set itemAlisFilePath to (POSIX file itemFilePath) as alias |
| 030 | set end of listAliasFilePath to itemAlisFilePath |
| 031 | end repeat |
| 032 |
|
| 033 | #エイリアスリストに変換 |
| 034 | tell application "Finder" |
| 035 | set listAliasFilePath to listAliasFilePath as alias list |
| 036 | end tell |
| 037 |
|
| 038 | #エイリアスリストを１つづ処理していく |
| 039 | repeat with itemAliasFilePath in listAliasFilePath |
| 040 | #エイリアス形式を確定させておく |
| 041 | set aliasFilePath to itemAliasFilePath as alias |
| 042 | ####### |
| 043 | #問題の処理 |
| 044 | delay 0.2 |
| 045 | tell application "Finder" |
| 046 | open file aliasFilePath |
| 047 | end tell |
| 048 | end repeat |
| 049 | return |
| AppleScriptで生成しました |
|---|
