هــل يمكن أضافة زر لحفظ نتائج البحث في هذا المشروع

[ياسرهتهت]

بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاته
أخواني الأعزاء /أساتذتي الكرام
في هذا المشروع الاكثر من رائع
لاخونا الفاضل Haitham.2012
للبحث عن الملفات والمجلدات في الجهاز
رابط الموضوع
http://www.abc4web.net/vb/showthread.php?t=24479
=============
سؤالي هو؟؟؟؟؟؟؟

هل يمكن عمل اضافة للبرنامج بحيث يتم نقل او نسخ نتائج البحث
الي مجلد انا احدده

http://im49.gulfup.com/J33tT.png

لقد حاولت لساعات طويلة ولكن لاجدوه
وخبرتي لا تسمح :abc_085:
هذا ملف احد محاولاتي الفاشلة


http://www.gulfup.com/?b5Aw3j

شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .

[ثامر أبو بلقيس]

أخي ياسر من المؤكد أنك ستعذرني
إن لم يكن اقتراحي مفيدا ريثما يتدخل المختصون
تحدثت عن نسخ الملفات
التي تم البحث عنها إلى مكان معين
هذا ما عرفت
ضع هذا الكود في زر للتعامل مع الملفات و ليس المجلدات
مع جعل الليست من خصائصها تدعم multiple selection


ListBox.SelectItem("results", LB_ALLITEMS);

get_sel = ListBox.GetSelected("results");
Folder.Create(_DesktopFolder.."\\Docs");
testvar = 1;
tamer = ListBox.GetCount("results");
while (testvar < tamer) do
get_data = ListBox.GetItemData("results", get_sel[testvar]);
File.Copy(get_data,_DesktopFolder.."\\Docs", true, true, false, true, nil);
testvar = testvar + 1;
end
Dialog.Message("Notice", "تم نسخ الملفات على سطح المكتب \r\nDocs");

[Haitham.2012]

يرجى رفع الملف على موقع آخر .. يبدو انا الموقع محجوب او متوقف مؤقتا !!

[ياسرهتهت]

بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاته
اخي الكريم ابو بلقيس
شكراً لك على المحاولة لكن فقط ينسخ الملف الاخير فيListBox
في كل عملية بحث؟؟؟؟؟
:abc_139::abc_139::abc_139::abc_139:
==============

==============
اخي الكريمHaitham.2012
الملف هو نفس الملف الموجود في موضوعك
http://www.abc4web.net/vb/showthread.php?t=24479

وبالفعل موقع الخليج معطل الان ؟؟؟؟؟؟؟؟؟

وهذا رابط ثاني علي الخليج 2

http://www.samaup.com/do.php?id=955

وايضا موجود في المرفقات


:abc_026: شـكــ وبارك الله فيكم ـــرا :abc_026:

[ثامر أبو بلقيس]

==============

اقرأ آخر جملة مكتوبة قبل الكود أعلاه

موفق :abc_152:

[ياسرهتهت]

بالفعل اخي الكريم ابو بلقيس
:abc_102:الخطأ مني لم انتبه multiple selection
:abc_051::abc_051:نجحت العملية نقل جميع الملفات :abc_051::abc_051:
الف شكر وبارك الله فيك

[ثامر أبو بلقيس]

موفق أنا لم أدرج الملاحظة من البداية
أدرجتها فقط قبل ردك بقليل موفق أخي المحترم :abc_152:

[فرح صالحي]

موفق بإذن الله ... لك مني أجمل تحية . :abc_152: