スクリプト実行によるファイル移動で「On Error Resume Next」がきかない
スクリプト実行でPDFファイルの移動を実行しております。
ただ、移動するPDFファイルを他の端末が握っていた場合、
移動できないのでエラーにするのではなく、
「On Error Resume Next」でスルーしようとしたのですが、
Winactorでエラーになり「スクリプト実行」でエラーが発生しました。
「スクリプトの実行に失敗しました。内容:書き込みできません。」となります。
vbscriptであれば、問題なくエラーはスルーされるのですが、
Winactorのスクリプトだと「On Error Resume Next」は有効にはならないのでしょうか。
それとも、Winactor独自の特別なステートメントがあるのでしょうか。
'----ソース----------------------------------------------------------------------
Dim objFileSys
Dim objFolder
Dim objFile
Set objFileSys = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFileSys.GetFolder("c:\temp\")
'これで移動できない子は無視するようにする
On Error Resume Next
For Each objFile In objFolder.Files
'PDFなら移動
If LCase(Right(objFile.Name,3)) = "pdf" 0 Then objFileSys.MoveFile "c:\temp\" & objFile.Name, "c:\move\"
Next
'-------------------------------------------------------
ご利用のバージョン:7.4.3
ノード:スクリプト実行