ファイルに関する概要情報を書き換えるには？ (ID:110952)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 ファイルに関する詳細な概要情報の取得は以下のサンプルで行えることが確認できたのですが、逆に書き換えるにはどのようにすればよいのでしょうか？ Set objShell = CreateObject ("Shell.Application") Set objFolder = objShell.Namespace ("C:\Scripts") Set objFSO = CreateObject("Scripting.FileSystemObject") Dim arrHeaders(13) For i = 0 to 13 arrHeaders(i) = objFolder.GetDetailsOf (objFolder.Items, i) Next For Each strFileName in objFolder.Items For i = 0 to 13 If i <> 9 then Wscript.echo arrHeaders(i) _ & ": " & objFolder.GetDetailsOf (strFileName, i) End If Next Wscript.Echo Next