PDA

View Full Version : جستجو فایل ها



mr_esmaily
جمعه 09 اردیبهشت 1384, 20:33 عصر
سلام

قبلاْ یه ماژول برای جستجوی فایل ها داشتم ولی متاسفانه یادم نیست چی شد.
من میخوام نام تمامی فایل های موجود در یک مسیر همچنین تعداد فایل هایی که بخشی از نام آنها عبارت خاصی است و در مسیر خاصی قرار دارند را بدست بیارم.
البته مواد فوق در مورد پوشه ها نیز صدق میکند.

mr_esmaily
سه شنبه 21 تیر 1384, 15:38 عصر
سلام
کسی اینجا اینکارو نکرده ؟

.:KeihanCPU:.
شنبه 02 شهریور 1387, 12:00 عصر
Dim Dir1 as string
Dim file1 as string
Dim DirList() as string
Dim I as integer
Dir1 = "C:\"
File1 = Dir$(Dir1 + "\*.*")
I = 0
Do while Len (file1)
Redim Preserve DirList(I)
DirList(i) = Dir1 + "\" + File1
File1 = Dir$
I = I + 1
Loop


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

ƒxmahdi
شنبه 02 شهریور 1387, 18:30 عصر
یک ماژول همراه با یک نمونه برنامه

scarce
شنبه 02 شهریور 1387, 19:06 عصر
دوست من اگه میشه قسمتی از سورس برنامه رو خودتون بنویسید و اگه جایی مشکل داشتید بتونیم کمکتون بکنیم آخه این یه جور درخواست پروژه هست خودتون که می دونید الان هیچکیی حال و حوصله نوشتن پروژه ندارن چون فصل تعطیلات هست.

xxxxx_xxxxx
یک شنبه 03 شهریور 1387, 09:09 صبح
قبلا بحث شده:

http://barnamenevis.org/forum/showthread.php?t=116693

مهران رسا
یک شنبه 03 شهریور 1387, 09:13 صبح
قبلا بحث شده:

http://barnamenevis.org/forum/showthread.php?t=116693

http://barnamenevis.org/forum/showpost.php?p=518348&postcount=218