<% Dim fs,fo, dte Set fs=Server.CreateObject("Scripting.FileSystemObject") Set fo=fs.GetFolder("c:\test") dte = ("Folder created: " & fo.DateCreated) Response.Write(DateValue(dte)) set fo=nothing set fs=nothing %>
Comment