طـــــلب :البحث عن ملف مفتوح روابطه لا تعمل ؟؟

[ياسرهتهت]

بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاته
أخواني الكرام
في هذا الموضوع
http://www.abc4web.net/vb/showthread.php?t=26984

رابط الملف محذوف او لا يعمل

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

:abc_023:

[الجارف]

تفضل أستاذ ياسر .. طلبك بالمرفقات

هذا الملف من إعداد الأستاذ : هيثم

ومهمته البحث عن أي ملف أو مجلد أو إمتداد داخل الكمبيوتر

إن شاء الله يلبي طلبك

[فرح صالحي]

السلام عليكم ورحمة الله وبركاته
جزاك الله خيرا كثيرا الاخ (الجارف ) على سرعة الاجابة
موفق بإذن الله .:abc_152:.. لك مني أجمل تحية .

[الجارف]

السلام عليكم ورحمة الله وبركاته
جزاك الله خيرا كثيرا الاخ (الجارف ) على سرعة الاجابة
موفق بإذن الله .:abc_152:.. لك مني أجمل تحية .

وعليكم السلام ورحمة الله وبركاته

أنتم أهل السبق ..
دائمًا سباقون إلى تقديم المساعدة

دمت بود :abc_022:

[ياسرهتهت]

بسم الله الرحمن الرحيم
شكراً لك اخي الجارف
وبارك الله فيك
اخي الكريم هذا الملف يحتاج بلجن ListBoxEx ليعمل ؟
وانا لا املك هذا الاضافة ؟
ثانيا هذا ملف عملاق يحتوي علي اكواد كثيرة ومعقدة :abc_102:
وانا عندما اشاهد اكواد في functionGlobal
:abc_113::abc_113:يصيبني الخوف :abc_113::abc_113:
اتمنا لوعندك ملف مفتوح للبحث ابسط من هذا يبحث في مجلد واحد عن صيغة واحده
شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .
:abc_152::abc_152::abc_152:

[عبود عبود]

سؤالي الثاني -- عندي ملف (فولدر) يحتوي مئات الملفات النصية ؟
هل من الممكن عمل بحث عن طريق input ادخل فيه اسم الملف النصي المراد البحث عنه.
و---listbox-- لاظهار نتائج البحث للاسم المدخل مع مرعات عدم الدقة
اي يظهر كل الملفات التي تتطابق مع الاربع احرف الاولي في الاسم المدخل
مع العلم ان اسماء الملفات بالعربي ، والانجليزي ، تواريخ ، وارقام


السلام عليكم ورحمة الله وبركاته


تفضـــــــــل

[فرح صالحي]

السلام عليكم ورحمة الله وبركاته
جزاك الله كل الخير اخ عبود
موفق بإذن الله ...:abc_152: لك مني أجمل تحية .

[ياسرهتهت]

بسم الله الرحمن الرحيم
شكراً جزيلا استاذ عبود
والله يعطيك العافية
هو الملف المطلوب
:abc_152::abc_152:

[سعيدون]

ما أكثر الكرماء في هذا الصرح الافتراضي
جميل أن أعيش في مدينة كهذه __السخاء السخاء ولا شيء غير العطاء
دمتم في حفظ الله

[ياسرهتهت]

بسم الله الرحمن الرحيم
وهــــذا شــــرح للكود من مبتدء لـــــ اخونا فرح صــــالحي
الهدف من الكود
لوعندك ملف (فولدر) يحتوي مئات الملفات ؟
هذة الملفات قد تكون اغاني ( mp3) او ملفات نصية (txt) او فيديو (mp4) او صور (png.gif.jpg) الـــــخ
وتريد ان تظهر هذا الملفات كلها اومجموعة تحددها في قائمة ( ) في البرنامج ليسهل التعامل معا.
==========================
اول شيئ نفتح صفحة في البرنامج وندرج ( Input1) و ( ListBox1 ) و ( Button1 )
==========================

شــــرح الكــــــــــــــــــــود
نحدد مسار المجلد المراد البحث ونحفظه في متغير
ALMGLD =( "AutoPlay\\Docs\\arshef\\");
في هذا الكود انا حددت المجلد المراد البحث في بــ بمجلد (arshef ) الموجود في (Docs )
وخزنته باسم (ALMGLD )
طبعا ممكن يكون المجلد في اي مكان في الجهاز
كما في كود الاستاذ عبود
جعل تحديد مسار الملف المراد البحث بداخله يحدد من خلال (Dialog.FolderBrowse)
ويخزن في المتغير (t)
t = Dialog.FolderBrowse("Please select a folder:", _WindowsFolder);

الان تم تحديد المجلد المراد البحث فيه ياتي دور تحديد اسم الملف المراد البحث عنه وتخزينه في متغير

result = Input.GetText("Input1");
بهذا الكود اسم الملف سوف ياخذ من (Input1) ويخزن في المتغير (result)

طبعا ( result) اسم افتراضي يضعه البرنامج يستحسن تغيرة

بعد ذالك ناتي لعملية البحث عن الملفات في المجلد من خلال كود

طبعا (t) في الكود مسار المجلد
و(result) اسم الملف
و(".txt") هي امتداد (نوع) الملف المراد تغير حسب الملف المطلوب
اغاني ( mp3) او ملفات نصية (txt) او فيديو (mp4) او صور (png.gif.jpg)
او توضع بهذا الشكل ("*.*") وتعني كل الصيغ والامتدادات
---- طبعا عملية البحث تم تخزينها في متغير (f) وعلى الاصح جدول
-----------------------------------
الان الجزء الاخير من الكود وهو اظهار نتيجة البحث او المتغير (f) في قائمة (ListBox)
سنستخدم الدالة (for) التكرار لاظهار جميع عناصر البحث (f) ولا هذا الجدول مجهول بالنسبة لنا
يعني جدول عشوائي ناتج من البحث داخل الملف المطلوب لا نعرف ترتيب العناصر داخل هذا الجدول
سنستخدم مع الدالة (for) الوظيفة ()pairs
هى وظيفة تستخدم لإعطاء أزواج من " مفتاح و قيمة " لكل عنصر من عناصر الجدول .
(هذا من شرح الاستاذ عبود)
يعني عند كتابة
((pairs(f) يصبح لكل عنصر من عناصر الجدول (f) مفتاح وقيمة يمكن التعامل معهم
ويكون الكود بالشكل التالي

for i, s in pairs(f) do
ListBox.AddItem("ListBox1", s, "");
end
طبعا i المفتاح و s القيمة التي تعبر هنا عن اسم الملف

الكود كامل بهذا الشكل

result = Input.GetText("Input1");
if result~="" then
t = Dialog.FolderBrowse("Please select a folder:", _WindowsFolder);
if t~="CANCEL" then
f = File.Find(t, "*"..result.."*"..".txt", false, false, nil, nil);
if f~=nil then
for i, s in pairs(f) do
ListBox.AddItem("ListBox1", s, "");
end
end
end
end


-----------------------

if result~="" then تعني الانبت ليس فارغ
if t~="CANCEL" then تعني تم تحديد مجلد
والاربع (end) في نهاية الكود لاغلاق (if , for)
==================================
طبعا هذا الكود يوضع في زر (Button1)
------
موفق بإذن الله ... لك مني أجمل تحية .
:abc_152::abc_152::abc_152:

[minomars]

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

كتبت في Input1 العدد 1 وهو ملف نصي موجود في القرص c

بجانبه ثلاث ملفات نصية أخرى باسماء مختلفة لاتشترك فيما بينها
بعد اجراء البحث و تحديد القرص c

هل نتائج البحث تكون مضبوطة ؟ :abc_152:

[عبود عبود]

الحمد لله ..... الشرح جاب نتيجة مع 1 ......... عقبال الباقيين

ممتاز ياسر :abc_138:

[minomars]

أستاذ عبود
أنا نسبة واحدة من الباقيين
وحاول تجاوبني على تساؤلي مشكورا :abc_152:
هل البحث تم أم جلب كل الملفات ؟ لم تضبط معي العملية

أخشى أن يتحول المستند 1 عائقا :abc_128:

[فرح صالحي]

السلام عليكم ورحمة الله وبركاته
اخي ياسر بارك الله فيك على الشرح
عندي سؤالين :
1. الجدول هل هو جدول حقيقي متكون من اعمدة وصفوف وخلايا ام انه شيء آخر باسم جدول ؟
2. بماذا تكتب انت وبقية الاخوة الاكواد ؟
موفق بإذن الله ..:abc_152:. لك مني أجمل تحية .

[عبود عبود]

أستاذ عبود
أنا نسبة واحدة من الباقيين
وحاول تجاوبني على تساؤلي مشكورا :abc_152:
هل البحث تم أم جلب كل الملفات ؟ لم تضبط معي العملية

أخشى أن يتحول المستند 1 عائقا :abc_128:


إذا كان لديك على سبيل المثال 3 ملفات نصية فى مجلد الويندواز وأسماؤهم تحتوى على 1 سواء كان قبلة أو بعدة أى شيى سوف يتم إيجادهم بأسمائهم كما هى على سبيل المثال كان إسم الملف الأول 01 و 10 و 010

إذا كتبت فى إينبوت البحث أن يبحث عن جميع الملفات التى يدخل فيها أو تحتوى على 1 سوف يتم الحصول على نتيجة البحث لكل الملفات المشتمل أسماؤهم على 1

[ياسرهتهت]

بسم الله الرحمن الرحيم
اخي فرح
أي شيئ اكثر من واحد هو جدول
لا يوجد لا صفوف ولا اعمدة في المثال السابق ما يوجد في ملف البحث هو جدول
مثل قائمة اليست بكس والكمبوبكس تعتبر جداول
فقط اخي الكريم
ولفهم الموضوع اكثر راجع موضيع الاستاذ عبود الخاص
سلسلة شروحات الأكشن سكريبت رقم 2 المصفوفات جزء أول

سلسلة شروحات الأكشن سكريبت رقم 3 المصفوفات جزء ثانى
موفق بإذن الله ... لك مني أجمل تحية .

[minomars]

السلام عليكم ورحمة الله وبركاته
أستاذ عبود

سأعيد بعد إذنك سؤالي بأكثر وضوح

--- نضع في القرص c ثلاث مستندات مثلا :
الأول اسمه : 1
الثاني اسمه : طريق الاحتراف
الثالث اسمه : information
------------------------
عندما نكتب 1 هل تظهر نتيجة ما ابحث عنه
أم هذا 1 يجلب معه الأخطاء ؟؟؟؟
مشكور:abc_139:

[عبود عبود]

سوف يظهر نتيجة البحث هو الملف الذى إسمة 1


أما باقى الملفات التى كانت
الثاني اسمه : طريق الاحتراف
الثالث اسمه : information

لا تحتوى على 1 فى أسمائها

[minomars]

لم تجبني ... تظهر في الليست ام لا ؟
مشكور

[عبود عبود]

لم تجبني ... تظهر في الليست ام لا ؟
مشكور

http://i.imgur.com/BalT4rp.jpg


أيوه هـــ تظهر فى الليست بوكس الملف الذى إسمة 1 فقط .

وطبعا إنت إخترت مسار او مجلد البحث من الديالوج الذى ظهر لك عندما تم الضغط على زر البحث .

[minomars]

ههههههههه برجاء لا تحذف يوما الصورة المضحكة
http://i.imgur.com/BalT4rp.jpg
سأتوقف هنااا

وسأترك كذلك هذه الصورة ---

http://www11.0zz0.com/2015/01/31/00/610922503.jpg (http://www.0zz0.com)

وقد تكون كذلك
تقديري :abc_138:

[عبود عبود]

ههههههههه برجاء لا تحذف يوما الصورة المضحكة

سأتوقف هنااا

وسأترك كذلك هذه الصورة ---

http://www11.0zz0.com/2015/01/31/00/610922503.jpg (http://www.0zz0.com)

وقد تكون كذلك
تقديري :abc_138:


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


عموما تحياتى لإكتشافك هذا الخطأ البرمجى الذى يمكن إصلاحه :abc_152:

[فن فن فن]

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

[عبدوعزيز]

مشكووووووووووووور

[محمد بن عطية]

السلام عليكم ورحمة الله وبركاته
بسم الله الرحمن الرحيم
والله الأخ عبود يكفي ويشفي
أقترح أن تطالبوه بأن ينجز دورة للبرنامج
وأفضل أن تكون الدورة عبارة عن تطبيقات
:abc_028::abc_028::abc_028::abc_028::abc_028:

[الجفون]

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

[ربيع]

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

[محمد بن أحمد أبو حذيفة]

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

[سمير نبيل]

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

[السعيد الجزائري]

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