Új hozzászólás Aktív témák

• #17119 Mutt senior tag m.zmrzlina #17111

  Új Válasz 2013-03-05 17:45:03 #17119

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Mutt

  senior tag

  válasz m.zmrzlina #17111 üzenetére

  Hello,

  Ezt is lehet használni:

  Sub FindCreationDate()
  Dim fso As Object
  Dim f As Object
  
  Set fso = CreateObject("Scripting.FileSystemObject")
  Set f = fso.GetFile("c:\autoexec.bat")
  MsgBox f.DateCreated
  End Sub

  Ezek a jellemzők kérdezhetők le:
  Attributes : Return the file attribute (read only,hidden etc.)
  Copy : Copy a file
  DataCreated : Return creation date
  DateLAstModified : Return date of the last modification
  Delete : Delete a file
  Drive : return the drive where the file is
  Move :allow to move the file
  Name : return the file name
  ParentFolder : return the parent folder name of the file
  Path : Return the full file path(include the file name)
  ShortNAme : return the short name of the file
  Size : File dimention
  Type : return file type

  üdv.

Új hozzászólás Aktív témák