المساعد الشخصي الرقمي

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


احمد كبه
04-04-2016, 09:48 AM
السلام عليكم ورحمة الله وبركاته
الى اعضاء هذا المنتدى المميز في كل ماتحمل هذه الكلمة من معنى
ارجو من حضراتكم ان تساعدوني في طريقة عمل البحث عن مجلد داخل الاسطوانة التجميعية
لانني عملت مكتبة متكاملة من الكتب وتحوي على مءات الكتب و اود عمل طريقة للبحث عن الكتاب
واكون شاكرا لكم:abc_152:

عبود عبود
04-04-2016, 02:51 PM
إن شاء الله إن لم يبادر أحد الزملاء بالرد والإجابة أضع لك الإجابة اليوم ليلا لضيق الوقت الآن .

:abc_152:

احمد كبه
04-04-2016, 09:49 PM
شكرا جزيلا استاذنا الغالي ياريت يكون الشرح مفصل شاكرين سعة صدركم

عبود عبود
04-04-2016, 11:21 PM
هذا ملف مفتوح يوضح طريقة البحث عن إسم ملف
ويعرض النتيجة عند العثور على جميع الملفات التى لها إمتداد " txt , exe , pdf "


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


https://dl.dropboxusercontent.com/u/29881160/Search%20All.rar

بالتوفيق
:abc_152:

احمد كبه
05-04-2016, 08:10 AM
شكرا جزيلا استاذنا الغالي بس ماهو التعديل اللي اجريه حتى يكون البحث داخل الاسطوانه وليس على جهاز الكمبيوتر شاكر سعة صدرك وروحك العالية

عبود عبود
05-04-2016, 12:17 PM
ضع هذا الكود بدلا من الكود السابق وذلك للبحث فى مجلد الإسطوانة عن الإسم الذى يتم كتبته فى الإينبوت :

--
result = Input.GetText("Input1");
if result~="" then
x={".pdf",".exe",".txt"};
for i, s in pairs(x) do
find = File.Find(_SourceFolder, result..s, true, false, nil, nil);
if find~=nil then
ListBox.DeleteItem("ListBox"..i, -1);
for v, t in pairs(find) do
ListBox.AddItem("ListBox"..i, t, "");
end
ListBox.SetUpdate("ListBox"..i, true);
end
end
else
Dialog.Message("Notice", "من فضلك أكتب الإسم المراد البحث عنه أولا", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
Page.SetFocus("Input1");
end

عبود عبود
05-04-2016, 12:24 PM
شاكر سعة صدرك وروحك العالية


من حق الجميع أن يسأل عن ما يريد فى أى وقت

التعاون بين الجميع موجود فى أى وقت إن شاء الله

عبود عبود
05-04-2016, 07:34 PM
إليك بهذا الملف للبحث عن جميع الملفات البى دى إف الموجودة فى الإسطوانة
فيتم وضع أسماء الملفات فى الليست بوكس وعند الضغط 2 كليك على أى إسم يتم فتح الملف البى دى إف المحدد

إضغط على زر بحث


https://dl.dropboxusercontent.com/u/29881160/Search%20all%20Pdf.rar

احمد كبه
05-04-2016, 11:32 PM
الف مليون ترليون بليون شكرا
يا استاذنا الغالي ربنا يجعلها في ميزان حسناتك :abc_152:

ياسرهتهت
05-04-2016, 11:58 PM
بسم الله الرحمن الرحيم
بارك الله فيك استاذ عبود
كل ما هو منك مفيد
الكتب المرفقة مع الملف المفتوح
مفيده جدا بالاخص لي
موفق بإذن الله ... لك مني أجمل تحية .
:abc_152::abc_152:

هبة الرحمن
06-04-2016, 06:03 AM
السلام عليكم ورحمة الله وبركاته بارك الله فيكم

نجوم ليبيا
06-04-2016, 07:37 PM
السلام عليكم ورحمة الله وبركاته
شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .

احمد مجدى
06-04-2016, 09:25 PM
جارى التجربة

امل الماضي
06-05-2016, 05:30 PM
:abc_152:مشكووووووووووووووووو وووووووووووووووووووووووو ووووووووووور

فرح صالحي
06-05-2016, 05:36 PM
شـكــ وبارك الله فيك ـــرا لك ..:abc_152:. لك مني أجمل تحية .

رانيا حسن
16-05-2016, 02:35 PM
شكرا جزيلا استاذ

الجفون
20-05-2016, 12:39 AM
البحث عن الصفحات داخل المشروع

:abc_050:أفضل وأسهل مشروع وتقدر تعدل عليه مع اضافات عدد لانهايتة له من الصفحات
وتكتب اسم الكلمة المراد الدخول الي صفحتها الخاصة ولإظافة صفحة ماعليك إلا تكرار الكود ولك مني أجمل تحية :abc_091:

رانيا حسن
27-05-2016, 11:32 AM
شكرا جزيلا

الجفون
27-05-2016, 12:09 PM
أستغفراللة والحمدللة
أستغفراللة والحمدللة
أستغفراللة والحمدللة
أستغفراللة والحمدللة

محمد بن أحمد أبو حذيفة
09-06-2016, 08:02 PM
السلام عليكم ورحمة الله وبركاته
بسم الله الرحمن الرحيم
شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .

الاغواط
08-07-2016, 07:07 PM
شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .

حسن الجيلانى
24-12-2016, 02:26 AM
Thanks a lot my dear

محمد مصطفى البرنس
01-03-2017, 01:23 PM
شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية . مشكووور

أبو قصي
02-03-2017, 11:43 PM
شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .

محمد بن أحمد أبو حذيفة
04-04-2017, 11:16 PM
هل ممكن اعادت رفع الملف

كمال وليد
21-05-2017, 05:50 AM
مشكور يا غالي للامام

محمد رمضان أبو يوسف
21-05-2017, 07:45 AM
بارك الله فيك أخى عبود و أخى ياسر

السعيد الجزائري
12-06-2017, 04:18 AM
موفق بإذن الله ... لك مني أجمل تحية . jbh:abc_026::abc_026:

ابو عبد الرحمن ماني
05-10-2017, 12:50 PM
شكراااااااااا

منار بربرة
04-12-2018, 12:54 PM
مشكوور اخى

ابراهيم ابو الوليد
30-03-2019, 02:40 PM
السلام عليكم ورحمة الله وبركاته





الف مليون ترليون بليون شكرا

يا استاذنا الغالي ربنا يجعلها في ميزان حسناتك :abc_152:

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

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

رعاش وليد
02-04-2019, 12:55 AM
شكرا جزيلا

سانكوفى
24-06-2019, 08:15 PM
جزاك الله خيرا:abc_022:

سمسم يو
28-10-2019, 11:40 PM
موفق بإذن الله ... لك مني أجمل تحية .