- 64 名前：デフォルトの名無しさん [2009/12/30(水) 21:47:15 ]
- Win7になってなにか変わった？XPの時に使ってたvbsが使えなくなったんだけど
XPでは、右クリック→送る から以下の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
|
 |
