الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

تقسيم نص طويل لعدة نصوص وتخزينها في جدول جديد

بدأه اسم مخالف 51 في 26 يوليو 2009 · 13 رد · 1,143 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

مرحبا

يوجد عندي نص طويل اريد تقسيمه كل حسب موقعه واضافته الى حقول في جدول جديد مثلاً

النص

يتم صرف مبلغ 20 دولار بتاريخ 06/06/2009

ليصبح الوضع الجديد في الجدول الجديد

الحقل القيمة

الحالة صرف

المبلغ 20

العملة دولار

التاريخ 06/06/2009

فهل يمكن عمل ذلك باستخدام اكسيس ام لا

ومشكورين جميعاً

new.zip

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

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

هذه صفحتي الخاصة

http://s4.ae.bitefight.org/c.php?uid=97932

#2

اخي العزيز.. هل الية وصيغة كتابة هذه الجملة "يتم صرف مبلغ 20 دولار بتاريخ 06/06/2009" ثابته لا تتغير.. ام انها تتبع لطريقة كتابتها كل مرة من قبل المستخدم..

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

1- تقسيم حقل رقمي مثل البطاقة /index.ph...;سم

2-تقسيم اسم الى اول واخير../index.php?showtopic=160475&hl=تقسيم+الاسم

3-تجزاة الاسم الى حقول /index.ph...;سم

4-استعلام لفصل الاسماء /index.ph...;سم

5-او هذه نتائج البحث كاملا.. او ابحث كما تشاء لكن رجاء اجب على استفساري..

/index.ph...;سم

تحياتي

تم تعديل هذه المشاركة بواسطة همام ابوعرقوب في 26 يوليو 2009 في 13:24

وَمِنَ النَّاسِ مَن يُعْجِبُكَ قَوْلُهُ فِي الْحَيَاةِ الدُّنْيَا وَيُشْهِدُ الله عَلَى مَا فِي قَلْبِهِ وَهُوَ أَلَدُّ الْخِصَامِ

مواضيعي ومشاركاتي

#3

تحياتي أخ همام أبو عرقوب

تقريباً الشكل العام لا يتغير وان كان هنالك تغير قد يكون نقطة زيادة أو نقصان حيث أن الإدخال سيكون من خلال إنسان ولكن الشكل العام ثابت تقريباً

ومشكور على مرورك وتزويدي بالأمثلة

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

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

هذه صفحتي الخاصة

http://s4.ae.bitefight.org/c.php?uid=97932

#4

تحياتي. اتمنى ان يفيدك تحديدا مثال تقسم الاسم، واحاول جاهدا عزيزي أن احل المشكلة..

تحياتي

وَمِنَ النَّاسِ مَن يُعْجِبُكَ قَوْلُهُ فِي الْحَيَاةِ الدُّنْيَا وَيُشْهِدُ الله عَلَى مَا فِي قَلْبِهِ وَهُوَ أَلَدُّ الْخِصَامِ

مواضيعي ومشاركاتي

#5

هذا الحل بالتحديد ما طبقت عليه.. وهو رائع من عمل الفنانة زهرة..

/index.ph...st&id=63358 حفظ الهدف باسم..

لتطبق مثالك عليه.. شاهد الصور المرفقة

هكذا الاستعلام ..

post-96695-1248605998_thumb.jpg

احذف الحقول غير المراد عرضها.. بازالة اشارة الصح من امامها في الاستعلام..كما يلي..

post-96695-1248606085_thumb.jpg

شاهد النتيجة الجديدة.. هي المطلوب تماما..

post-96695-1248606071_thumb.jpg

همام... والشكر اولا واخيرا للاخت زهرة..

تم تعديل هذه المشاركة بواسطة همام ابوعرقوب في 26 يوليو 2009 في 14:03

وَمِنَ النَّاسِ مَن يُعْجِبُكَ قَوْلُهُ فِي الْحَيَاةِ الدُّنْيَا وَيُشْهِدُ الله عَلَى مَا فِي قَلْبِهِ وَهُوَ أَلَدُّ الْخِصَامِ

مواضيعي ومشاركاتي

#6

مشكور اخي همام على الاجابة وكان سؤالي أنا أن التقسيم سيتم من خلال قراءة مذكرة وتقسيمها وادخالها في جدول جديد

حيث أن كل ريكورد يحوي عدة سطور وسيتم تقسيمه لعدة ريكوردات

ومشكور

تم تعديل هذه المشاركة بواسطة kiss90 في 26 يوليو 2009 في 14:34

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

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

هذه صفحتي الخاصة

http://s4.ae.bitefight.org/c.php?uid=97932

#7

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

همام

وَمِنَ النَّاسِ مَن يُعْجِبُكَ قَوْلُهُ فِي الْحَيَاةِ الدُّنْيَا وَيُشْهِدُ الله عَلَى مَا فِي قَلْبِهِ وَهُوَ أَلَدُّ الْخِصَامِ

مواضيعي ومشاركاتي

#8

مرحبا جميعاً

هل يمكن ايجاد حل لهذا الموضوع باستخدام اكسيس ام لا برجاء المساعدة

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

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

هذه صفحتي الخاصة

http://s4.ae.bitefight.org/c.php?uid=97932

#9

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

اخي الغالي همام ابو عرقوب

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

اخي السائل

هذه محاولة باستعلام الحاق باستخدام المثال لاستاذتنا الغالية زهرة جزاها الله خير الجزاء .. طبعاً يمكن تشغيل هذا الاستعلام من نموذج دون ان يشعر المستخدم بذلك

ملاحظة : تم تغيير نوع الحقول الى نص نظراً لتعثر الإلحاق بسبب اختلاف نوع البيانات بالحقول عن الحقل المقسم

ايضاً تم تعيين حقل الرقم بالجدول الجديد الى مفتاح اساسي بدون تكرار لمنع تكرار الالحاق

ملاحظة اخرى هامة : لديك حقل اسمه date وهذا الاسم يعتبر اسم محجوز حيث انه اسم لدالة تعيد تاريخ اليوم الحالي واستخدامه يسبب مشاكل برمجية لذا يفضل تغيير اسمه ( وقد تم تغيير الاسم )

ارجو ان يكون هو المطلوب

بالتوفيق للجميع

استدراك : لا نحتاج الى تغيير نوع الحقول الى نص بل نستطيع ان نحول القيم الملحقة كما يلي :

لحقل التاريخ نستخدم الدالة DateValue

لحقل الرقم نستخدم الدالة Value

المرفق الثاني به التعديل الاخير

spilt_string.rar

spilt_string.rar

تم تعديل هذه المشاركة بواسطة يوسف احمد في 27 يوليو 2009 في 16:03

#10

شكراًاً أساتذتي الكرام...

يوسف وهمام :D

الحاقاً لحل أستاذي يوسف احب أن اضيف أنه لا بد من انشاء وتشغيل استعلام الغاء قبل كل عملية الحاق في حالة تكرار الالحاص بين ذات الجدولين

طبتم واهتديتم :)

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

إقرأ معي

رابط متجدد لكتاب أقرؤه فشاركني فيه

======

فضائح الرافضة ومخازيهم حين يكتب عنها أحد خصومهم فهذا شيء متوقع ،فإن كتب عنها أحدهم فهو شيء غير مألوف ، وإن كان الكاتب أحد مراجعهم وأخص خواصهم فهذا شيء متناهي الغرابة ، وإن علمت أن الكاتب قد قتل بعد نشر الكتاب فقد حان وقت قراءة الكتاب

الكتاب :

حسين الموسوي - لله تم للتاريخ ، كشف الأسرار وتبرئة الأئمة الأطهار

اضغط على الصورة لتحميل الكتاب

%E1%E1%E5%20%CB%E3%20%E1%E1%CA%C7%D1%ED%CE.jpg

-----------

كتب سابقة

سعد الدين الشاذلي - مذكرات حرب أكنتوبر

#11

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

اقتباس
ايضاً تم تعيين حقل الرقم بالجدول الجديد الى مفتاح اساسي بدون تكرار لمنع تكرار الالحاق

والمشكلة أن النص يوجد به عدة سطور وكل سطر سيكون عبارة عن ركورد جديد حيث أن نوعية البيانات من نوع مذكرة (Memo) وبناءً عليه فإن المفتاح الاساسي سيكون أي شيء إلا الرقم مقابل النص لأنه سيكون للربط ومن نوع 1-M

ومشكور أخي مرة أخرى

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

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

هذه صفحتي الخاصة

http://s4.ae.bitefight.org/c.php?uid=97932

#12

اقتراح..

عمل دالة تحسب عدد السطور

بناء على عدد السطور يتم تنفيذ كود التقسيم والالحاق

مع بقاء المفاتيح ونوع الحقل كما هو..

تحياتي

وَمِنَ النَّاسِ مَن يُعْجِبُكَ قَوْلُهُ فِي الْحَيَاةِ الدُّنْيَا وَيُشْهِدُ الله عَلَى مَا فِي قَلْبِهِ وَهُوَ أَلَدُّ الْخِصَامِ

مواضيعي ومشاركاتي

#13

اعتقد ان هذا الكود سينجح ..

Public Function CountLines(InString As String) As Integer
Dim Counter As Integer
CountLines = 1
For Counter = 1 To Len(InString)
If Mid(InString, Counter, 1) = Chr(13) Then
CountLines = CountLines + 1
End If
Next
End Function

حيث Chr(13) تعبر عن استخدام سطر جديد..

يتم استدعاء هذه الدالة كما يلي مثلا..

CntLn= CountLines(Me.[Memo1])

تحياتي..

وَمِنَ النَّاسِ مَن يُعْجِبُكَ قَوْلُهُ فِي الْحَيَاةِ الدُّنْيَا وَيُشْهِدُ الله عَلَى مَا فِي قَلْبِهِ وَهُوَ أَلَدُّ الْخِصَامِ

مواضيعي ومشاركاتي

#14

الأخ همام مشكور لمساعدتك ولكن اذا اختلف حرف واحد لن تجدي واتوقع أنه يجب أن ابني بروسيجدر متكامل يقرأ كل حرف وبناءً عليه يتم التقسيم والإدخال وها انا بصدد عمله وأول ما أنجزه سأقوم بإنزاله هنا للإستفاده ومشكور أخي همام

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

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

هذه صفحتي الخاصة

http://s4.ae.bitefight.org/c.php?uid=97932

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…