منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : طريقة استخراج السجلات المكررة في ملف نصي
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم ورحمة الله وبركاته

اخواني لدي برنامج اقوم فيه بقراءة الاسطر الخمس الاولى من الملفات نصية بداخل مجلد ووضع الخمسه الاسطر في سطر واحد في ملف نصى آخر
اي كل ملف نصي في سطر

المطلوب استخراج المكرر منها بشرط عدد من الحقول يعني لا يشترط في التكرار تشابه جميع السطر
التكرار بناء على عدد من الخانات فقط وهي ممثلة في المثال
PHP كود :
TSD = (var3 "@" var4 "@" var5 "@" var6 "@" var7 "@" var20 "@" var8 "@"

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

طيب بمعنى آخر

اللست بوكس فيه مثلا عدد 2 اسطر

PHP كود :
123@hh@78@hkj@258@
123@mm@78@hrr@258

هذه الاسطر تعتبر بالنسبة لطلبي مكررة
لأني قمت بتقسيم الأسطر حسب @ ووضع كل جزء في متغير
واعتمدت التغيير في المتغيرات
الاول والثالث والخامس
اي في المثال اعلاة في 123 , 78 , 258

اما في هذه الحالة

PHP كود :
123@hh@78@hkj@258@
333@mm@78@hrr@258


فهي غير مكرر لأن المتغيير الاول مختلف في
123 , 333

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

فقط
لم أفهم طلبك بالتحديد لاكن حسب فهمي إنك تريد معرفة السطر مكرر ام لا

أولا قم بتعريف مصفوفه مفتوحة إي لا تحدد عدد الأسطر
طريقة تعريف مصفوفه مفتوحة
Dim Name() As String

الأن تستطيع عند قرآءة سطر تقوم بإدخاله في شرط الشرط هو إذا كان هذا السطر موجود بالمصفوفه يقوم بإضافته في listBox3 خلاف ذالك يقوم بإضافته في المصفوفه
وعند الإنتهاء من قرآءة جميع الأسطر تقوم بتفريغ المصفوفه
الف شكر اخي العزيز Easy 4ever على الرد

انا اريد استخراج المكرر بناء على جزء محدد في السطر وليس كامل السطر
قمت بتقسيم السطر حسب كركتر الـ (@)
السطر لدي عبارة عن ارقام وحروف يفصل بينهم @
فوضعت كل جزء في متغير أي قمت بتقسيم السطر بناء على @ معتبراًان @ فاصل لكل حقل

واريد التكرار بناء على جزء من هذه المتغيرات مثلا الاول والثالث والخامس
إن كان هناك تشابه في هذه المتغيرات يكون السطر مكرر

وإلا فلا يكون مكرر

وضحت
من يجيبني على سؤالي هذا مشكورين
لم اجد الجواب الشافي الى الآن