VBS Wie kann ich die DateLastModified-Eigenschaft in einem Ordner ändern?

Question

Ich muss die DateLastModified-Eigenschaft in einem Ordner mit VB Script "berühren" oder aktualisieren.

PowerShell ist keine Option, obwohl ich interessiert bin, wenn es mit PowerShell möglich ist.

Ich habe auch keine Wunsch, ein externes Programm wie GNU touch.exe zu starten. Das Skript wird auf mehreren Computern ausgeführt, und ich kann nicht garantieren, dass PowerShell oder externe Programme installiert werden.

Dank für irgendwelche Leitungen oder Hilfe, Steve

P. S auch auf technet gefragt.

Answer 1

Von hier aus:

http://www.tek-tips.com/viewthread.cfm?qid=1372273

ModFileDT "c:\rootdir", "folder", "1/01/2007 4:18:02 PM" 

Function ModFileDT(strDir, strFileName, DateTime) 

    Dim objShell, objFolder 

    Set objShell = CreateObject("Shell.Application") 
    Set objFolder = objShell.NameSpace(strDir) 
    objFolder.Items.Item(strFileName).ModifyDate = DateTime 
End Function