Utilizando VBScript para encontrar la fecha de archivo más reciente en una sola carpeta

¿Cómo podría modificar este VBScript para devolver solo el nombre del archivo más reciente y la fecha de Última modificación? Actualmente devuelve todo lo modificado en las últimas 24 horas. Quiero buscar solo el archivo más reciente. Tomé prestado esto de StackOverflow, aún no es un asistente de VBScript.

option explicit  
dim fileSystem, folder, file
dim path   
path = "C:\test"  
Set fileSystem = CreateObject("Scripting.FileSystemObject") 
Set folder = fileSystem.GetFolder(path) 
for each file in folder.Files         
if file.DateLastModified > dateadd("h", -24, Now) then         
'whatever you want to do to process'         
WScript.Echo file.Name & " last modified at " & file.DateLastModified     
end if
next 

Respuestas a la pregunta(2)

Su respuesta a la pregunta