代碼如下:
    set fso=createobject("Scripting.FileSystemObject")
    set fn=fso.GetFile("E:\AD.txt")
    msgbox "文件創(chuàng)建時間："&fn.DateCreated
    msgbox "文件最后修改時間："&fn.DateLastModified
    msgbox "文件最后訪問時間："&fn.DateLastAccessed
    set fn=nothing
    set fso=nothing
    FileSystemObject 對象簡介：
    FileSystemObject 對象用于訪問服務器上的文件系統(tǒng)。此對象可對文件、文件夾以及目錄路徑進行操作。也可通過此對象獲取文件系統(tǒng)的信息。
    下面的代碼會創(chuàng)建一個文本文件 (c:\test.txt)，然后向這個文件寫一些文本：
    復制代碼 代碼如下:<%
    dim fs,fname
    set fs=Server.CreateObject("Scripting.FileSystemObject")
    set fname=fs.CreateTextFile("c:\test.txt",true)
    fname.WriteLine("Hello World!")
    fname.Close
    set fname=nothing
    set fs=nothing
    %>