' Touch a file - Change the Last-Modified Date of a File

path="c:\test.txt"

Set fso = CreateObject("Scripting.Filesystemobject")
Set file = fso.GetFile(path)
Set objShell = CreateObject("Shell.Application")

Set objFolder = objShell.NameSpace(file.ParentFolder.Path)
objFolder.Items.Item(file.Name).ModifyDate = Now

search for scripts

VbsEdit contains all these sample scripts!





Home   Scripts

Copyright © 2001-2019 adersοft