VBScriptについて必死に話し合うスレ
■ このスレッドは過去ログ倉庫に格納されています
0064デフォルトの名無しさん
2009/12/30(水) 21:47:15XPでは、右クリック→送る から以下のvbsでファイル更新日を変えてたんだけどWin7では更新日が変わってくれなくなった。なんでだろ?
もちろんcygwinはちゃんとセットアップしてあるし、touch.exe 単体で更新日は変えれてる。
option Explicit
Dim objFSO
Dim objWshShell
dim objArg
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objWshShell = CreateObject("Wscript.Shell")
for each objArg in Wscript.Arguments
if objFSO.FileExists(objArg) then
' 更新日変更
objWshShell.Run "C:¥cygwin¥bin¥touch '"+ objArg + "'", 0
end if
Next
■ このスレッドは過去ログ倉庫に格納されています