WSH/touch
をテンプレートにして作成
Search in
this wiki
and
or
[
トップ
] [
新規
|
一覧
|
単語検索
|
最終更新
|
ヘルプ
]
開始行:
「あるファイルのタイムスタンプを、別のファイルのタイム...
ちなみに、変更するのは"更新時刻"のみ。
*** touch.vbs [#jcaf874e]
#ref(touch.vbs);
'
' 第2引数以降のファイルのタイムスタンプを
' 第1引数のファイルのタイムスタンプで更新する。
'
' @authoer Jomora( kazuhiko@jomura.net http://jomura.net )
' @version 2010.07.18 初版作成
'**Start Encode**
Set objArgs = WScript.Arguments.Unnamed
If objArgs.Count < 2 Then
WScript.Echo "2つ以上のファイルを指定してください。"
WScript.Quit
End If
' main
Set objFSO = WScript.CreateObject("Scripting.FileSystemO...
Set objShell = CreateObject("Shell.Application")
' タイムスタンプ取得
modifyDate = objFSO.GetFile(objArgs.Item(0)).DateLastMod...
' タイムスタンプ設定
For i = 1 To objArgs.Count - 1
Set objFile = objFSO.GetFile(objArgs.Item(i))
' WScript.Echo "path:" & objFile.ParentFolder.Path & " n...
Set shellFolder = objShell.NameSpace(objFile.ParentFold...
Set shellFile = shellFolder.ParseName(objFile.Name)
shellFile.ModifyDate = modifyDate
Next
WScript.Quit
- 使い方
++ 対象のファイル(複数)を選択状態にして、そのうちの元タイ...
++ touch.vbsをコンテキストメニューの"送る"に登録しておく...
終了行:
「あるファイルのタイムスタンプを、別のファイルのタイム...
ちなみに、変更するのは"更新時刻"のみ。
*** touch.vbs [#jcaf874e]
#ref(touch.vbs);
'
' 第2引数以降のファイルのタイムスタンプを
' 第1引数のファイルのタイムスタンプで更新する。
'
' @authoer Jomora( kazuhiko@jomura.net http://jomura.net )
' @version 2010.07.18 初版作成
'**Start Encode**
Set objArgs = WScript.Arguments.Unnamed
If objArgs.Count < 2 Then
WScript.Echo "2つ以上のファイルを指定してください。"
WScript.Quit
End If
' main
Set objFSO = WScript.CreateObject("Scripting.FileSystemO...
Set objShell = CreateObject("Shell.Application")
' タイムスタンプ取得
modifyDate = objFSO.GetFile(objArgs.Item(0)).DateLastMod...
' タイムスタンプ設定
For i = 1 To objArgs.Count - 1
Set objFile = objFSO.GetFile(objArgs.Item(i))
' WScript.Echo "path:" & objFile.ParentFolder.Path & " n...
Set shellFolder = objShell.NameSpace(objFile.ParentFold...
Set shellFile = shellFolder.ParseName(objFile.Name)
shellFile.ModifyDate = modifyDate
Next
WScript.Quit
- 使い方
++ 対象のファイル(複数)を選択状態にして、そのうちの元タイ...
++ touch.vbsをコンテキストメニューの"送る"に登録しておく...
ページ名:
![[Return to Top Page]](image//logo.png "[Return to Top Page]"){kind=logo}
