نمایش زمان ایجاد فایل اکسس در فرم (خواهشا فوری) [بایگانی]

ariayekta

جمعه 14 تیر 1392, 00:27 صبح

با عرض ادب واحترام
دوستان و اساتید گرامی
همونطور که همه میدونیم وقتی فایلی رو کپی میکنیم ساعت و زمان ایجاد اون تغییر میکنه من احتیاج دارم در فرمی زمان و ساعت ایجاد فایل اکسی رو نمایش بدم
ممنون و سپاسگزار خواهم شد در صورت امکان راهنمایی بفرمایید
با سپاس

Abbas Amiri

جمعه 14 تیر 1392, 01:14 صبح

با عرض ادب واحترام
دوستان و اساتید گرامی
همونطور که همه میدونیم وقتی فایلی رو کپی میکنیم ساعت و زمان ایجاد اون تغییر میکنه من احتیاج دارم در فرمی زمان و ساعت ایجاد فایل اکسی رو نمایش بدم
ممنون و سپاسگزار خواهم شد در صورت امکان راهنمایی بفرمایید
با سپاس

از تابع زیر استفاده کنید:

Function FileCreated() As Date
Dim fso As Object
Set fso = CreateObject("Scripting.FileSystemObject")
FileCreated = fso.GetFile(CurrentDb.Name).DateCreated
End Function

ariayekta

جمعه 14 تیر 1392, 12:15 عصر

با سلام و عرض ادب
ممنون که پاسخ دادید دوست عزیز

کدتو.ن اشتباهه دوست گرامی

Abbas Amiri

یک شنبه 16 تیر 1392, 19:12 عصر

با سلام و عرض ادب
ممنون که پاسخ دادید دوست عزیز

کدتو.ن اشتباهه دوست گرامی

فایل نمونه :