فصل اسم العائلة من خانة الإسم

[aaa]

السلام عليكم

لدي حقل واحد متكون من الإسم وإسم الأب وإسم الجد وإسم العائلة.

السؤال : كيف يمكنني فصل إسم العائلة عن خانة الإسم وجعله في خانة أخرى بإسم إسم العائلة؟

وشكرا

[aaa]

هل من مساعدة ؟

[rudwan]

انظر الاستعلام في الملف المرفق

ExtractNames.rar

[Nofalnss]

على طول أستاذ كبير يا أستاذ رضوان

[aaa]

شكرا أخي وأستاذي رضوان على الرد ولكن حسب المثال المرفق إذا كان الإسم مثلا احمد محمد حازم علي

فإن النتيجة تكون الإسم الأول أحمد والأسم الأخير محمد حازم على وهذا خطأ والصواب الذي أريده هو أن تكون النتيجة في الإسم الأخير فقط علي مع العلم ليس من المهم عندي فصل جميع الأسم عن إسم الأب عن إسم الجد عن إسم العائلة ، ما هو مطلوب فقط فصل إسم العائلة ( آخر إسم )عن باقي الإسماء

وشكرا لتعاونكم

تم تعديل أكتوبر 4, 2008 بواسطه aaa

[rudwan]

أضف الحقل التالي الى الاستعلام الموجود لتحصل على اسم العائلة

FamilyName: Right([Name],InStr(1,[Name]," ")-1)

[malik68]

يا اخي الكريم Rudwan

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

First Name

Father Name

Surname

اصلا انت في النموذج الذي صممته عندك المطلوب الاول والاخير فلو انك تجعل اسم الاب يكون جيد وبالتالي يكون عندك اسم مكون من ثلاث وعندما تكتبه يوزعه على اسم , اب , عائلة وبورك فيك

تم تعديل أكتوبر 5, 2008 بواسطه malik68

[aaa]

شكرا أستاذي رضوان على الرد السريع ولكن هناك ملاحظة أخرى على الكود:

إكتب الإسم التالي في الجدول احمد محمد حازم الدوسري

النتيجة في إسم العائلة كالتالي : وسري وهذا الخطا والصواب أن يكون الدوسري

ملاحظة : حقل الإسم قد يحمل الإسم الثلاثي أو الرباعي أو الخماسي.

تحياتي القلبية

تم تعديل أكتوبر 5, 2008 بواسطه aaa

[aaa]

أين أنت يا رضوان أرجوك ساعدني بارك الله فيك

[Enjoy]

وجدت المثال المرفق في جهازي لحل مشكلتك

وهو من تصميم الاخت زهره

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

http://support.microsoft.com/kb/286238/ar

za_SplitName_UP.rar

تم تعديل أكتوبر 7, 2008 بواسطه Enjoy

[aaa]

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

[Accessna]

هذه دالة لطلب أي جزء من الإسم حتى لو كان رقم 25 مثلا . أما في حالة طلب الإسم الأخير ولنعتبره اسم العائلة أو القبيلة فنستخدم رقم 0 ( صفر ) :

http://www.officena.net/ib/index.php?s=&am...ost&p=21396

واستدعاؤها كالتالي :

كود

Me.txtName = LaborNameSplit(Nz(ClientName), 1)

Me.txtFather = LaborNameSplit(Nz(ClientName), 2)

Me.txtGrand = LaborNameSplit(Nz(ClientName), 3)

Me.txtFamily = LaborNameSplit(Nz(ClientName), 0)

[aaa]

شكرا أكسسنا على الرد والسؤال هل ممكن تطبيق هذه الدالة على إستعلام؟

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

ولو ممكن مثال جزاك الله خيرا.

[Accessna]

مثال مرفق

NameSplit.rar

[aaa]

شكرا أكسسنا على تعاونك، والنتيجة بالضبط مثل ما أريد جزاك الله خير إلا أني عندما قمت بتطبيقة على مثال من عندي تظهر لي هذه الرسالة لماذا وكيف أتخلص منها، بوركت.

الرسالة (( Unde fined function 'LaborNameSplit' inexpressin ))

[aaa]

مرفق المثال الذي يظهر الرسالة المذكورة أعلاه

______________.rar

[Accessna]

يجب استيراد الموديول الموجود في المثال إلى برنامجك أولا

فبدون الموديول أنت تستدعي دالة غير موجودة !

حاول بنفسك . لذلك لن أنزل مثالك .

[aaa]

جزاك الله خيرا أكسسنا على تعاونك وتجاوبك المثمر عسى الله أن يجعل ذلك في ميزان حسناتك احسنت وبوركت