2012-04-04 8 views
5

Ho bisogno di "toccare" o aggiornare la proprietà DateLastModified su una cartella utilizzando VB Script.VBS come posso modificare la proprietà DateLastModified su una cartella

PowerShell non è un'opzione, anche se sono interessato se è possibile con PowerShell.

Inoltre, non desidero eseguire un programma esterno come GNU touch.exe. Lo script verrà eseguito su più computer e non posso garantire che PowerShell o programmi esterni verranno installati.

Grazie per qualsiasi porta o di aiuto, Steve

P.S chiesto anche su TechNet.

risposta

3

Da qui:

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 
+3

per fare questo lavoro su una cartella, è necessario impostare lo spazio dei nomi per la cartella principale, avendo cura di aggiungere una barra finale per l'argomento. Quindi puoi specificare la cartella nell'argomento. In ogni caso, la data dell'ultima modifica non sembra essere aggiornata su tutte le versioni di Windows, per le cartelle. – frumbert