MyFileInfo : برای دسترسی به اطلاعات فایل از جمله آخرین زمان دسترسی ، زمان ایجاد فایل ، زمان آخرین تغییر و... به کار میره به شکل زیر :
My.Computer.FileSystem.GetFileInfo(آدرس و نام فایل مورد نظر)
** LastAccessTime : برای اینکه آخرین زمان دسترسی به فایل رو به دست بیارین از این خصیصه استفاده کنید به شکل زیر :
My.Computer.FileSystem.GetFileinfo(مسیر کامل فایل ).LastAccessTime
مثال )My.computer.fileSystem.GetFileinfo("c:\siavash.txt ").LastAccessTime
LastWriteTime : برای اینکه آخرین زمانی که فایل رو ویرایش کردین بدست بیارین از این خصیصه استفاده کنید به شکل زیر :
My.Computer.FileSystem.GetFileInfo(آدرس و نام فایل).LastWriteTime
مثال )My.Computer.FileSystem.GetFileinfo("c:\hello.txt") .LastWriteTime
Extension : برای اینکه پسوند فایل مورد نظر رو بدست بیارین از این خصیصه میتونین استفاده کنید :
My.Computer.FileSystem.Getfileinfo(آدرس و نام کامل فایل).Extension
مثال )My.Computer.FileSystem.Getfileinfo("c:\Jungle.jpg" ).Extension
مثال 2 ) قطعه کد زیر چک میکنه که آیا فایلی با مشخصات وارد شده وجود دارد یا خیر اگر وجود داشت پسوندش رو داخل یک MessageBox نشون میده :
If My.Computer.FileSystem.FileExists("c:\Changes.txt" ) Then
Dim Ext As String = My.Computer.FileSystem.GetFileInfo("c:\Changes.txt ").Extension
MessageBox.Show(Ext)
Else
MessageBox.Show("همچین فایلی وجود ندارد")
End If
** خروجی قطعه کد بالا در صورتی که فایل وجود داشته باشد txt. هست.
پاسخ با نقل قول
