現在FileMakerとAppleScriptを組み合わせて開発を行っています。
下記のような作業をしたくコーディングをしたのですが、うまく動作させる事ができません。何が原因なのでしょうか?
作業:特定のフォルダに入っているパワーポイントのファイルを特定のバージョンのパワーポイントで開きたい。
環境:MacOS X 10.5.6、PowerPC G4、FileMaker 9
コード:
tell application "Finder"
repeat with i in folder "Data" of startup disk
if file type of i = "SLD8" then i select
open selection using file "Microsoft PowerPoint" of folder "Microsoft Office 2004" of folder "Applications" of startup disk
end repeat
end tell
問題1:ファイルを開く事はできるが「Macintosh HD:Data:test.pptはUser1が編集中です。読取専用で開きますか?」とエラーが表示され、延々とループしてしまう。
問題2:そもそもPPTのファイルを開いてくれない時がある。
PPTファイルのフルパスを指定すれば、問題なく開く事ができるのですが、
業務都合上色々なファイル名のPPTが入ってくるため、対象フォルダの中をFileTypeで探してオープンしています。
そもそものコードの部分から間違っているなどご指摘頂けると幸いです。
何か解決方法をお持ちの方、お力をお貸し下さい。
よろしくお願い致します。
A 回答 (1件)
- 最新から表示
- 回答順に表示
No.1
- 回答日時:
--ファイル名末尾の拡張子らしき物を判定
--単純に最後の4文字がpExtと一致するかを判定
on mFileNameExtChk(pFileName, pExt)
set len to length of pFileName
set ext to text (len - 3) thru len of pFileName
--display dialog ext
if pExt = ext then
return true
else
return false
end if
end mFileNameExtChk
on run
set appPath to "\"/Applications/iWork '08/Keynote.app\""
set extStr to ".ppt"
tell application "Finder"
repeat with i in folder "テストデータ日本語パス" of startup disk
--keynote(08)で試しています
--Keynote(08)は".ppt"書き出し時にファイルタイプ値"SLD8"を設定しないようです
--手動でタイプ設定して試しました
--
--Keynote、もしくは他OS環境からやってくる".ppt"の場合
--リソースフォークが無くてタイプ判定を素通りすると思います
--タイプ判定、拡張子判定、両方行った方が確実です
i select
set fileNameStr to POSIX path of (selection as text)
set filePath to "\"" & fileNameStr & "\""
set cmdStr to "open -a " & appPath & " " & filePath
if file type of i = "SLD8" then
--確実に開けるようにシェルスクリプトとして実行してみました
--コマンド:open -a App File
do shell script cmdStr
else
if (my mFileNameExtChk(fileNameStr, extStr)) then
do shell script cmdStr
end if
end if
end repeat
end tell
end run
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) VBAでの共有パスにつきまして 1 2023/03/04 17:24
- Visual Basic(VBA) VBA This Workbookモジュールを別ファイルにコピーする方法 1 2022/09/14 01:51
- Visual Basic(VBA) 動かなくなってしまった古いVBAを動くようにしたい 8 2022/09/20 13:57
- Excel(エクセル) エクセルのファイルが開かない 4 2022/04/22 15:07
- フリーソフト イーファンビューでwebpファイルが開けません 1 2022/07/12 07:07
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/07/06 17:46
- Visual Basic(VBA) VBAが止まります。 2 2022/09/02 14:02
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/02/20 10:00
- Excel(エクセル) 【マクロ】同じフォルダ内にある複数ブックから1つのブック内の1シートにデータを集めたい 6 2022/09/28 18:16
- その他(プログラミング・Web制作) python OpenPyXLを使って出力結果をエクセルに書き込み 2 2022/06/04 19:46
関連するカテゴリからQ&Aを探す
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
コマンドプロンプトの「%1」と...
-
コマンドプロンプトで変数が数...
-
コマンドプロンプトでファイル...
-
access,vbaでフォルダ内のファ...
-
ExcelVBAのDirでスペース含むフ...
-
バッチコマンドでファイル名の...
-
[DOS] コピー先に同じファイル...
-
フォルダ内の更新日時が一番新...
-
ファイル名の頭5桁と同名のフォ...
-
ftp処理でmove(移動)を行いたい
-
バッチファイルで、iniファイル...
-
サブフォルダからファイルをコ...
-
aタグのhrefにネットワークパス...
-
VBA GetAttrについて教えてくだ...
-
.batでファイル名から抽出して...
-
Windowsコマンドプロンプトで、...
-
Excel VBA マクロ ファイル名ソ...
-
word VBA ファイル名 保存
-
ExifToolでの文字化け対策
-
【vbs】ファイル名の検索と該当...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
コマンドプロンプトの「%1」と...
-
コマンドプロンプトで変数が数...
-
コマンドプロンプトでファイル...
-
バッチファイルで、iniファイル...
-
[DOS] コピー先に同じファイル...
-
バッチコマンドでファイル名の...
-
ftp処理でmove(移動)を行いたい
-
access,vbaでフォルダ内のファ...
-
ExcelVBAのDirでスペース含むフ...
-
フォルダ内の更新日時が一番新...
-
DOSのバッチ作成について‐FORの...
-
word VBA ファイル名 保存
-
.batでファイル名から抽出して...
-
ファイル名に ” を使うと エク...
-
サブフォルダからファイルをコ...
-
ファイル名を該当フォルダ内か...
-
【vbs】ファイル名の検索と該当...
-
【DOSバッチ開発】末尾のタブの...
-
VBA GetAttrについて教えてくだ...
-
バッチ処理で16進数でファイル...
おすすめ情報