fileCreatedDate 属性

       

返回 String 类型的值,该值代表文件创建日期和时间。只读。

expression.fileCreatedDate

expression  必选。返回 DispFPHTMLDocument 对象的表达式。

示例

下列示例显示文件的标题及其创建日期和时间。

Sub GetCreationDate()
'Returns the creation date of the current document

    Dim objApp As FrontPage.Application
    Dim objDoc As DispFPHTMLDocument

    Set objApp = FrontPage.Application
    Set objDoc = objApp.ActiveDocument
    'Display name of file and date created.
    MsgBox "The file " & objDoc.nameProp & " was created on " & _
            objDoc.fileCreatedDate & "."

End Sub