- ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:WSH VBScriptについて)
WSH VBScriptのフォルダ更新バッチの作成方法
このQ&Aのポイント
- WSH VBScriptの初心者(プログラミングも)なのですが、フォルダの有無を確認し、更新を行うバッチを作成したいです。
- 更新内容は、ファイルの更新日付をみて、20081120よりも前のファイルだった場合は更新し、同じかそれよりも新しければ更新は行いません。
- 更新を行う場合は、パスワードを入力してから、新しいファイルと入れ替えます(上書き)。どのようなプログラムにすればよいか教えてください。
- みんなの回答 (1)
- 専門家の回答
質問者が選んだベストアンサー
フォルダ/ファイルの操作ですとWSHではなく、FileSystemObjectを 使う方が普通です。 Sub Sample(FolderName) 'パラメータはフォルダ名 Dim FSO, FLD, FLS Set FSO = CreateObject("Scripting.FileSystem.Object") If Not FSO.FileExists(FolderName) Then Exit Sub '存在しなければ終了 End If For Each FLS In FSO.GetFolder(FolderName).Files If FLS.DateLastModified < CDate("2008/11/20") Then '★パスワードの入力 '★更新処理 End If Next パスワードの入力、ファイルの更新は仕様がはっきりしないので、 何とも言えません。InputBoxが安直ですが文字が隠蔽されません。 ファイルのコピーはFileSystemObjectのCopyFileメソッドが普通 ですが、ShellApplicationのCopyHere等もあり、好みによるとしか 言えません。 FileSystemObjectは下記URLを参照してください。 http://msdn.microsoft.com/ja-jp/library/cc409798.aspx
お礼
お早い回答、ありがとうございました。 作成することができました。