إعـــــــلان

تقليص
لا يوجد إعلان حتى الآن.

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

تقليص
هذا الموضوع مغلق.
X
X
تقليص
 
  • الصفحة لـ 8
  • تصفية - فلترة
  • الوقت
  • عرض
إلغاء تحديد الكل
مشاركات جديدة
السابق 1 2 3 4 5 6 8 template التالي
  • #1

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

    بسم الله الرحمن الرحيم

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



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


    البحث يكون في المسارلمجلدات دال مجلد الاوديو





    الملف مرفق
    الكلمات الدلالية: الاسطوانة, البحث, تداخل, داخل, لأحداث, مفتوح, ملف, ملفات, يوجد
  • #2
    ممكن تسنفيد من هذا الموضوع

    http://sites.ienajah.com/vb2/showthread.php?t=34004

    تعليق

    • #3
      المشاركة الأصلية بواسطة عبد الهادي بهاب مشاهدة المشاركة
      ممكن تسنفيد من هذا الموضوع

      http://sites.ienajah.com/vb2/showthread.php?t=34004
      بارك الله فيك هل ممكن رابط اخر على الميدافر لها
      http://sites.ienajah.com/vb2/showpost.p...9&postcount=14

      تعليق

      • #4
        المشاركة الأصلية بواسطة محمد بن أحمد أبو حذيفة مشاهدة المشاركة
        بارك الله فيك هل ممكن رابط اخر على الميدافر لها
        http://sites.ienajah.com/vb2/showpost.p...9&postcount=14
        https://up.top4top.net/downloadf-6088d3041-rar.html

        تعليق

        • #5
          المشاركة الأصلية بواسطة عبد الهادي بهاب مشاهدة المشاركة
          https://up.top4top.net/downloadf-6088d3041-rar.html
          بارك الله فيك
          يوجد خلل في البرنامج

          السطر 8

          [HTML]Extension = {".dat",".avi",".mpg",".wmv",".asf",".mpeg",".mp4" ,".mpe",".3gp",".divx",".mov",".ts"};
          Progress.SetCurrentPos("Progress1", 0);
          ListBox.DeleteItem("ListBox1",LB_ALLITEMS);
          liste = Dialog.FolderBrowse("Please select a folder:", _DesktopFolder);
          DLL.CallFunction("AutoPlay\\Docs\\THAMEUR_find.dll ", "THAMEUR_find", "\""..liste.."\"", DLL_RETURN_TYPE_INTEGER, DLL_CALL_STDCALL);
          sour =TextFile.ReadToTable("C:\\belkiss.txt");
          --------
          Progress.SetRange("Progress1", 0, #sour);

          for i,n in pairs(sour) do
          for ii,type in pairs(Extension) do
          if String.SplitPath(n).Extension == type then
          result = ListBox.AddItem("ListBox1", String.SplitPath(n).Filename, n );
          Progress.SetCurrentPos("Progress1", Progress.GetCurrentPos("Progress1")+ i);

          end
          end

          end[/HTML]
          ايضا اظن ان الملفين مختلفين
          انا اريد ان يبحث في مجلد معين بناءا على الكتابه فب الانبوت ويعرض الالنتائج في ليست بوكس

          تعليق

          • #6
            تم تدارك الخطا في تشغيل الاسطوانة كمسؤول
            لكن بقيت مشكلة البحث لم اهظمها بعد

            تعليق

            • #7
              المشاركة الأصلية بواسطة محمد بن أحمد أبو حذيفة مشاهدة المشاركة
              تم تدارك الخطا في تشغيل الاسطوانة كمسؤول
              لكن بقيت مشكلة البحث لم اهظمها بعد
              الكود يستدعي كل الملفات .......و انت نريد البحث

              تعليق

              • #8
                المشاركة الأصلية بواسطة عبد الهادي بهاب مشاهدة المشاركة
                الكود يستدعي كل الملفات .......و انت نريد البحث
                بارك الله فيك اخي

                تقبل الله منا ومنكم

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

                تعليق

                • #9
                  المشاركة الأصلية بواسطة محمد بن أحمد أبو حذيفة مشاهدة المشاركة
                  بارك الله فيك اخي

                  تقبل الله منا ومنكم

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

                  كود PHP:
                  ListBox.DeleteItem("ListBox1", LB_ALLITEMS);
                  SerchAudio = Input.GetText("Input1");  
                  find = File.Find("AutoPlay\\Audio", "*.mp3", true, true);
                  for                   i,n in pairs(find) do
                    if                   SerchAudio == String.SplitPath(n).Filename then
                    ListBox                  .AddItem("ListBox1",String.SplitPath(n).Filename , n);
                                      end
                  end 

                  تعليق

                  • #10
                    المشاركة الأصلية بواسطة عبد الهادي بهاب مشاهدة المشاركة
                    من اجل ملفات mp3 ثم نضع ابوت لكتابة الاسم ز سعرض في اليسبوكس الملف و في الداتا مساره

                    كود PHP:
                    ListBox.DeleteItem("ListBox1", LB_ALLITEMS);
                    SerchAudio = Input.GetText("Input1");  
                    find = File.Find("AutoPlay\\Audio", "*.mp3", true, true);
                    for                     i,n in pairs(find) do
                      if                     SerchAudio == String.SplitPath(n).Filename then
                      ListBox                    .AddItem("ListBox1",String.SplitPath(n).Filename , n);
                                          end
                    end 

                    بارك الله فيك
                    الكود يعمل لكن غير كافي في نظري اقصد لا يبحث في كل المجموعات
                    انظر الملف الذي اعمل عليه
                    http://3rbup.com/949f1a009119055a


                    ايضا هذا الكود جيد جد للبحث

                    لكنه يبحث في المجدل اديوا فقط هل ممكن ان نعدل عليه

                    [HTML] ListBox.DeleteItem("ListBox2", -1);

                    get_txt = Input.GetText("Input2");

                    search_ok = false

                    if get_txt == "" then

                    Dialog.Message("Notice", "حدد كلمة البحث", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);

                    else

                    count = ListBox.GetCount("ListBox1");

                    for i = 1 , count do

                    if String.Find(ListBox.GetItemText("ListBox1", i), get_txt, 1, false) ~= -1 then

                    search_ok = true

                    ListBox.AddItem("ListBox2", ListBox.GetItemText("ListBox1", i), ListBox.GetItemData("ListBox1", i));

                    end -- if String.Find(ListBox.GetItemText("ListBox1", i), "get_txt", 1, false) ~= -1 then

                    end -- for i = 1 , count do

                    end -- if get_txt == "" then

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

                    if search_ok == false and get_txt ~= "" then

                    Dialog.Message("Notice", "لا يوجد نتيجه", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);

                    end[/HTML]

                    تعليق

                    • #11
                      المشاركة الأصلية بواسطة محمد بن أحمد أبو حذيفة مشاهدة المشاركة
                      بارك الله فيك
                      الكود يعمل لكن غير كافي في نظري اقصد لا يبحث في كل المجموعات
                      انظر الملف الذي اعمل عليه
                      http://3rbup.com/949f1a009119055a


                      ايضا هذا الكود جيد جد للبحث

                      لكنه يبحث في المجدل اديوا فقط هل ممكن ان نعدل عليه

                      [html] listbox.deleteitem("listbox2", -1);

                      get_txt = input.gettext("input2");

                      search_ok = false

                      if get_txt == "" then

                      dialog.message("notice", "حدد كلمة البحث", mb_ok, mb_iconinformation, mb_defbutton1);

                      else

                      count = listbox.getcount("listbox1");

                      for i = 1 , count do

                      if string.find(listbox.getitemtext("listbox1", i), get_txt, 1, false) ~= -1 then

                      search_ok = true

                      listbox.additem("listbox2", listbox.getitemtext("listbox1", i), listbox.getitemdata("listbox1", i));

                      end -- if string.find(listbox.getitemtext("listbox1", i), "get_txt", 1, false) ~= -1 then

                      end -- for i = 1 , count do

                      end -- if get_txt == "" then

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

                      if search_ok == false and get_txt ~= "" then

                      dialog.message("notice", "لا يوجد نتيجه", mb_ok, mb_iconinformation, mb_defbutton1);

                      end[/html]
                      هذا يبحث في قائمة اليسبوكس و ممكن اذا استدعيت كل الملفات ثم تبحث فيها ممكن

                      تعليق

                      • #12
                        المشاركة الأصلية بواسطة محمد بن أحمد أبو حذيفة مشاهدة المشاركة
                        بارك الله فيك
                        الكود يعمل لكن غير كافي في نظري اقصد لا يبحث في كل المجموعات
                        انظر الملف الذي اعمل عليه
                        http://3rbup.com/949f1a009119055a


                        ايضا هذا الكود جيد جد للبحث

                        لكنه يبحث في المجدل اديوا فقط هل ممكن ان نعدل عليه

                        [html] listbox.deleteitem("listbox2", -1);

                        get_txt = input.gettext("input2");

                        search_ok = false

                        if get_txt == "" then

                        dialog.message("notice", "حدد كلمة البحث", mb_ok, mb_iconinformation, mb_defbutton1);

                        else

                        count = listbox.getcount("listbox1");

                        for i = 1 , count do

                        if string.find(listbox.getitemtext("listbox1", i), get_txt, 1, false) ~= -1 then

                        search_ok = true

                        listbox.additem("listbox2", listbox.getitemtext("listbox1", i), listbox.getitemdata("listbox1", i));

                        end -- if string.find(listbox.getitemtext("listbox1", i), "get_txt", 1, false) ~= -1 then

                        end -- for i = 1 , count do

                        end -- if get_txt == "" then

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

                        if search_ok == false and get_txt ~= "" then

                        dialog.message("notice", "لا يوجد نتيجه", mb_ok, mb_iconinformation, mb_defbutton1);

                        end[/html]

                        الكود يعمل فقط غير mp3 الى 3gp

                        تعليق

                        • #13
                          المشاركة الأصلية بواسطة عبد الهادي بهاب مشاهدة المشاركة
                          الكود يعمل فقط غير mp3 الى 3gp
                          بارك الله فيك شكرا لم انتبه

                          لكن الكود لابحث اذا ماكتبت كلمة واحدة فقط
                          اقصد
                          مثلا انا اردت ان ابحث عن كلة الفتوى التي تحوي كلمة الصلاة
                          عندما اكتب كلمة الصلاة في البحث لا يعطي نتيجة بالرغم من انه توجد فتوى الصلاة

                          ايضا الكود اي زعته لكل بالمشاركة
                          http://sites.ienajah.com/vb2/showpost.p...3&postcount=10

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

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

                          تعليق

                          • #14
                            http://sites.ienajah.com/vb2/showthread.php?t=35766

                            ممكن يفيدك

                            تعليق

                            • #15
                              المشاركة الأصلية بواسطة عبد الهادي بهاب مشاهدة المشاركة
                              http://sites.ienajah.com/vb2/showthread.php?t=35766

                              ممكن يفيدك

                              بارك الله فيك
                              صعب علي فهم كود مركب مثل المشار اليه
                              حاولت دون جدوى

                              تعليق

                              السابق 1 2 3 4 5 6 8 template التالي

                              مواضيع تهمك

                              تقليص
                              الرياضة وأثرها الشامل على صحة الإنسان
                              المنتدى: القسم العام نشرت بواسطة: Reem2Rabeh الوقت: 04-23-2025 الساعة 04:27 PM
                              تكاليف الجودة Cost of Quality
                              المنتدى: ضبط وتوكيد الجودة نشرت بواسطة: HeaD Master الوقت: 04-15-2025 الساعة 09:30 AM
                              تصميم أنظمة التصنيع
                              المنتدى: التصنيع والانتاج نشرت بواسطة: HeaD Master الوقت: 04-11-2025 الساعة 01:08 PM
                              شركة رواد الحرمين
                              المنتدى: القسم العام نشرت بواسطة: نوال الخطيب الوقت: 03-19-2025 الساعة 03:07 AM
                              Adobe Acrobat Pro DC 2025.001.20428 لتحرير وتعديل وتحويل وإنشاء وقراءة وطباعه pdf
                              المنتدى: الكمبيوتر والإنترنت نشرت بواسطة: عوض السوداني الوقت: 03-18-2025 الساعة 07:22 AM
                              يعمل...
                              X