PDA

View Full Version : بدست آوردن مشخصات Folder



User SA
جمعه 19 شهریور 1395, 20:10 عصر
سلام و عرض شب بخیر به همه دوستانم

من نیاز به یک تابع یا ocx یا هر چیز دیگه ای دارم که بتونه مشخصات folder رو به من بده
دقیقا مشخصاتی که تو properties فولدر ها نشون میده رو میخوام بدست بیارم

دوستان مینونن کمک کنن؟

تابع GetFileSize و GetFileTime رو هم بررسی کردم

به کارم نمیاد

علیرضا5
شنبه 20 شهریور 1395, 01:06 صبح
در مورد file system object سرچ کن

User SA
شنبه 20 شهریور 1395, 01:38 صبح
یه چیزایی پیدا کردم
ولی اونم فقط دو سه مورد بر میگردونه
شما مثالی چیزی نداری؟ من بتونم استفاده کنم؟

البته یه جا دیدم که fso رو به این شکل تعریف کرده بود

dim fso as new scripting.folder

یه متدهایی شبیه به چیزایی که من میخوام داره
فقط نمیدونم چجوری باید ازش استفاده کنم

علیرضا5
شنبه 20 شهریور 1395, 14:55 عصر
ابتدا از قسمت project -- reference گزینه microsoft scripting runtime رو علامت بزنید
البته من کدها رو همینطوری نوشتم چون وی بی6 رو فعلا نصب نکردم ممکنه موقع کپی خطا بده یکم کار کنی درست میشه
ولی FileSystemObject رو با همین کد شروع کن یاد بگیر و ازش نگذر چون خیلی امکانات خوبی بهت میده


Dim a As New FileSystemObject
Dim b As folder
Set b = a.Getfolder("آدرس پوشه")
msgbox b.size

User SA
شنبه 20 شهریور 1395, 16:27 عصر
دوست عزیزم از راهنماییت صمیمانه سپاسگذارم
فعلا کارم راه افتاد
اگه بازم مشکلی بود دوباره پست میذارم
خیلی خیلی ممنون