FileDateTime Function

рд╕рд┐рд░реНрдЬрдирд╛ рд╡рд╛ рдЕрдиреНрддрд┐рдо рдкрдЯрдХ рдкрд░рд┐рдорд╛рд░реНрдЬрди рдЧрд░рд┐рдПрдХреЛ рдлрд╛рдЗрд▓рдХреЛ рдорд┐рддрд┐ рд╕рдордп рд╕рдорд╛рд╡реЗрд╢ рдЧрд░реЗрдХреЛ рд╕реНрдЯреНрд░рд┐рдЩ рдлрд░реНрдХрд╛рдЙрдБрдЫ ред

рд╡рд╛рдХреНрдп рд╕рдВрд░рдЪрдирд╛:


рдлрд╛рдЗрд▓ рдорд┐рддрд┐ рд╕рдордп (рд╕реНрдЯреНрд░рд┐рдЩрдХреЛ рд░реВрдкрдорд╛ рдкрд╛рда)

рдкрд░рд╛рдорд┐рддрд┐рд╣рд░реВ:

рдкрд╛рда: рдХреБрдиреИ рд╕реНрдЯреНрд░рд┐рдЩ рдЕрднрд┐рд╡реНрдпрдХреНрддрд┐ рдЬрд╕рд▓реЗ рджреЛрд╣реЛрд░реЛ рдЕрд░реНрде рдирджрд┐рдиреЗ (рд╡рд╛рдЗрд▓реНрдбрдХрд╛рд░реНрдб рдЫреИрди) рдлрд╛рдЗрд▓ рд╡рд┐рд╕реНрддреГрдд рд╡рд┐рд╡рд░рдг рд╕рдорд╛рд╡реЗрд╢ рдЧрд░реНрджрдЫ ред рддрдкрд╛рдИрдБURL рд╕рдЩреНрдХреЗрддрдкрдирд┐ рдкреНрд░рдпреЛрдЧ рдЧрд░реНрди рд╕рдХреНрдиреБрд╣реБрдиреНрдЫ ред

рдпреЛ рдкреНрд░рдХрд╛рд░реНрдпрд▓реЗ рдврд╛рдБрдЪрд╛рдорд╛ "MM.DD.YYYY HH.MM.SS" рдлрд░реНрдХрд┐ рд╕рдХреЗрдХрд╛ рдлрд╛рдЗрд▓рдХреЛ рд╕рд┐рд░реНрдЬрдирд╛ рдЧрд░реНрджрд╛рдХреЛ рджреБрд░реБрд╕реНрдд рд╡рд╛ рдЕрдиреНрддрд┐рдо рдкрд░рд┐рдорд╛рд░реНрдЬрди рд╕рдордп рдирд┐рд░реНрдзрд╛рд░рд┐рдд рдЧрд░реНрджрдЫ ред

рддрдкрд╛рдЗрдБрд▓реЗ рдврд╛рдБрдЪрд╛ рд╕рдВрдЦреНрдпрд╛, рдорд┐рддрд┐рд╣рд░реВ рд░ рдореБрджреНрд░рд╛рд╣рд░реВ LibreOffice рдЖрдзрд╛рд░рднреВрддрдорд╛ рдирд┐рдпрдиреНрддреНрд░рдгрдорд╛ рдкреНрд░рдпреЛрдЧ рдЧрд░реНрди рдкреНрд░рдпреЛрдЧ рдЧрд░рд┐рдПрдХреЛ рд╕реНрдерд╛рди рд╕реЗрдЯ рдЧрд░реНрди рд╕рдХреНрдиреБрд╣реБрдиреНрдЫ - рднрд╛рд╖рд╛ рд╕реЗрдЯрд┐рдЩрд╣рд░реВ - рднрд╛рд╖рд╛рд╣рд░реВрдЖрдзрд╛рд░рднреВрдд рдврд╛рдБрдЪрд╛ рдХреЛрдбрд╣рд░реВрдорд╛, рджрд╢рдорд▓рд╡ рдмрд┐рдиреНрджреБ(.)рд╕рдзреИ рдкреНрд▓реЗрд╕рд╣реЛрд▓реНрдбрд░рдХреЛ рджрд╢рдорд▓рд╡ рд╡рд┐рднрд╛рдЬрдХрдХрд╛ рд░реВрдкрдорд╛ рдкреНрд░рдпреЛрдЧ рдЧрд░рд┐рдиреНрдЫ рддрдкрд╛рдИрдВрдХреЛ рд╕реНрдерд╛рдиреАрдпрдорд╛ рдкрд░рд┐рднрд╛рд╖рд┐рдд рдЧрд░рд┐рдПрдХреЛ рд░ рдпрд╕рдХреЛ рдХреНрдпрд╛рд░реЗрдХреНрдЯрд░рджреНрд╡рд╛рд░рд╛ рдкреНрд░рддрд┐рд╕реНрдерд╛рдкрд┐рдд рдЧрд░рд┐рдиреЗрдЫред

рдорд┐рддрд┐ рд╕рдордп рд░ рдореМрджреНрд░рд┐рдХ рдврд╛рдБрдЪрд╛рд╣рд░реВрдХрд╛ рд▓рд╛рдЧрд┐ рдЙрд╕реНрддреИ рд╕реНрдерд╛рдирд┐рдп рд╕реЗрдЯрд┐рдЩрд╣рд░реВ рд▓рд╛рдЧреВ рд╣реБрдиреНрдЫ ред рдЖрдзрд╛рд░рднреВрдд рдврд╛рдБрдЪрд╛ рд╕рдЩреНрдХреЗрдд рддрдкрд╛рдИрдБрдХреЛ рд╕реНрдерд╛рдирд┐рдп рд╕реЗрдЯрд┐рдЩ рдЖрдиреБрд╕рд╛рд░ рд╡рд░реНрдгрди рд░ рдкреНрд░рджрд░реНрд╢рди рдЧрд░рд┐рдиреЗрдЫ ред

рддреНрд░реБрдЯрд┐ рд╕рдЩреНрдХреЗрддрд╣рд░реВ

5 рдЕрд╡реИрдз рдХрд╛рд░реНрдп-рд╡рд┐рдзрд┐ рдХрд▓

рдЙрджрд╛рд╣рд░рдг:


Sub ExampleFileDateTime
    MsgBox FileDateTime("C:\autoexec.bat")
End Sub