منتصر الانسي

اخي فؤاد يبدو انك لم تشاهد اخر تعديل قمت بوضعه في اخر مشاركة لي في هذا الموضوع ولكن عموماً افتح المثال وقم بفتح استعلام جديد في وضع التصميم SQL ثم قم بلصق جملة SQL التالية SELECT tblNames.FullName, StName([FullName]) & " " & FatherName([FullName]) & " " & StGrndName([FullName]) & " " & NdGrndName([FullName]) AS FatherFullName1, LastName([FullName]) AS TheLastName FROM tblNames; وشاهد النتيجة تحياتي,,,

اخوي خويلد وفؤاد مرفق لك المثال بعد إضافة استعلام جديد لتوضيح كيفية إعادة تركيب الإسم الأولى طريقة تجزئة وإعادة تركيب الاسم داخل الاستعلام الثانية اعادة تركيب اجزاء الاسم بعد تقسيمها داخل الجدول ارجو ان يجيب هذا المثال على تساؤلاتكم تحياتي,,, تقسيم الاسماء.rar

اخي العزيز فؤاد هل بالامكان توضيح اين يتم التكرار...؟ رغم اني لا اعتقد ذلك بسبب انه تم تقسيم الاسم الى (الاسم الاول - اسم الاب - الجد الاول - الجد الثاني - اللقب) وبالتالي يمكنك دمج اي االاسماء تريدها كما يلي [مقطع 1]&" "&[مقطع2]&" "&[مقطع 3] ارجو ان يكون الشرح واضح تحياتي,,,

عفواً اخي خويلد لم افهم سؤالك هل بالإمكان توضيح السؤال من خلال اسمي في المثال ؟ تحياتي,,,

اخي العزيز لو تمعنت في الرد السابق لم اذكر ترابطها فهذا شيئ مفروغ منه ولكن ما مدى تكرارها للموظف الواحد فاذا كانت تتكرر اكثر من مرة فعليك ان تجعلها في جدول اخر يرتبط بالجدول الرئيسي بحقل المفتاح الرئيسي (رقم الموظف) فكما سبق وقلت لك فجدول ارقام الهاتف سيشمل جميع بيانات الهاتف ويرتبط بجدول الموظفين عن طريق رقم الموظف بعلاقة رأس لأطراف (One To Many) ارجو ان تكون الفكرة قد اتضحت تحياتي,,,

شوف يا اخي بشكل مبسط الحقول التي لا تتكرر للموظف الا مرة واحدة فمن الافضل بقائها في نفس الجدول مهما كان عددها (مثال الاسم او النوع او الوظيفة....الخ) اما الحقول التي يحتمل ان تتكرر فيفضل فصلها في جدول فرعي يرتبط مع الجدول الرئيسي برقم الموظف (مثال رقم الهاتف فيمكن ان يكون للموظف اكثر من رقم فبدلا ان اعمل حقل تلفون1 وحقل ثاني اسمه تلفون2 ...الخ اقوم بعمل جدول فرعي يحتوي على ثلاثة حقول هي رقم الموظف - نوع الهاتف - الرقم... وهكذا) وكما سبق وقلت لك فيمكن انك لاتحتاج لهذا الجدول اذا ما كنت متأكد انه لايمكن ان يكون للموظف الا رقم واحد المهم انها هذه هي الفكرة الرئيسية من وجهة نظري تحياتي,,,

اخي العزيز لايمكن لاحد ان يفتيك في هذا الموضوع كون هذه العملية تكون ضرورية في حالات وغير محببة في حالات اخرى وذلك بحسب نوعية بيانات الحقل وتكرارها وغيرها من العوامل التي لايلم بها الا مصمم القاعدة ولكن يجب ان تعلم ان تصميم قواعد البيانات يعتبر علم في حد ذاته يفضل ان تأخذ وقتك الكافي في دراسته مرفق لك كتابين ارجو ان تفيدك... تحياتي,,, مذكرات حول تصميم قواعد البيانات وتطبيقاتها.rar الأساسيات في التعامل مع قواعد البيانات.zip

الحمدلله والشكر لله الله يوفقك اخي العزيز تحياتي,,,

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

الله يصيب الارهاق باين اني نسيت ارفاق الملف المعذرة db2.rar

قمت بوضع حل أرجو أن ينجح اولاً قم بإستيراد الجدول الذي في المثال المرفق الى قاعدة بياناتك وهذا الجدول يقوم بعملية تقدر تقول عليها وساطة بين شكل البيانات عندك والشكل الذي اريده فستلاحظ ان الدرجة (الأولى/أ) يقابلها (11) وهكذا لذا يرجى التأكد من أن طريقة كتابة الدرجات هي كما وردت في الجدول ثانيا قم بإعادة تسمية الصور بإضافة الرقم المقابل للدرجة في الجدول مثال الرقم 2222 اذا كان في الدرجة الأولى/أ سيكون عنوان الصورة 11222 وهكذا ثالثاُ قم بتعديل الكود ليكون كما يلي Private Sub Form_Current() On Error GoTo ERRPIC Dim MyDgree as String MyDgree=Dlookup("DegreeTo","tblDegreesConv","DegreeFrom=Form!الدرجة") Me.MYPIC.Picture = Trim("C:\PHOTOS\") & MyDgree & Trim(Me.الرقم) & Trim(".jpg") Exit_FORM_CURRENT: Exit Sub ERRPIC: Me.MYPIC.Picture = "" End Sub مع تعديل إسم الحقل (الدرجة) كما هو في برنامجك بالضبط وذلك في السطر MyDgree=Dlookup("DegreeTo","tblDegreesConv","DegreeFrom=Form!الدرجة") ارجو ان يكون الشرح واضح ... جرب واخبرني حيث لم اقوم بتجربته تحياتي,,,

آخر سؤال ان شاء الله ماهو النص الذي يكون في مربع النص هل هو (الأولى أ) ام ان كلمة (الأولى) تأتي في حقل و (أ) تأتي في حقل آخر ...؟ ولو كان بالامكان ارفاق المثال يكون أفضل ليتم التعديل فيه مباشرة . تحياتي,,,

مافيش مشكلة ممكن تقول لي كم درجات معك...؟ ولو امكن تذكرها بالنص

في هذه الحالة يمكن ان يصبح الكود كما يلي Private Sub Form_Current() On Error GoTo ERRPIC Me.MYPIC.Picture = Trim("C:\PHOTOS\") & Format(Me.الدرجة,"00") & Trim(Me.الرقم) & Trim(".jpg") Exit_FORM_CURRENT: Exit Sub ERRPIC: Me.MYPIC.Picture = "" End Sub عدل اسم حقل الدرجة كما هو في الواقع واكتبه بدل Me.الدرجة إذا كان هناك اختلاف وهذا يتطلب اولاً ان تكون قيمة حقل الدرجة رقما أي (1 و 2 ....) وليس (الأولى - الثانية.....) ثانياً تعديل عناوين الصور كذلك فمثلا الموظف الذي برقم 2222 وفي الدرجة الأولى سيكون عنوان صورته 012222 والذي في الدرجة الثالثة سيكون 032222 ارجو ان يكون التعديل واضحا ومفيداً تحياتي,,,

ياخي والله عليك تصميم فني واخراج للنماذج يعقّد وهذا لا يقلل من القدرة البرامجية بل يضيف لها فالذي يكون فاهم للكود وتصميمه يجب أن يتعلم من فنيات التصميم والعكس الله يوفقك اخي العزيز تحياتي,,,

اخي العزيز من خلال إسم البرنامج (أكسس) ومن شعاره (المفتاح) من الواجب أن تعلم أن أهم ماعلى مصمم قاعدة البيانات مراعاته لوضع قاعدة بيانات قوية (في أي بيئة كانت من اكسس وحتى اوراكل) ان يتم تصميم جداول رئيسية ترتبط بجداول أخرى فرعية من خلال حقل فريد يكون هو المفتاح الرئيسي للجدول (ومن وجهة نظري) وقد يكون هو المفتاح الرئيسي لقاعدة البيانات كلها (كرقم الموظف في أي قاعدة بيانات للموظفين) لذا فمن الأفضل إعادة التصميم بجعل رقم الموظف فريد لايتكرر تحت أي ظرف مهما كان هذا الحل صعب ولكنه في الأخير هو الأفضل فكما ترى فمن خلال مثالك هذا تقول ان الرقمين متشابهين ولكن تختلف الدرجة الوظيفية فاذا ما سلمنا جدلا بذلك فان تعديل درجة احد الموظفين سيؤدي الى - ضرورة تعديل عنوان الصورة الخاصة به - ستواجه مشكلة اخرى اذا ماتصادف رقم مكرر لشخصين في نفس الدرجة في الأخير وحتى لا أطيل عليك سألخص إقتراحي في : - كما قلت لك فالأفضل هو إعادة النظر في تصميم القاعدة (أو على الأقل في طريقة ترقيم الموظفين) - أو إضافة حقل خاص لهذا الغرض يتم فيه وضع رقم فريد لكل موظف ويتم الربط بموجبه - الحل الاخير (والغير مستحسن) تعديل الكود بحسب رغبتك ولكن بعد توضيح اكثر لحقول بيانات الموظف للتوصل الى توليفة يمكن من خلالها ان يتفرد كل موظف برمز خاص وتعديل الكود بناء على ذلك (ولكن ذلك سيتطلب منك تعديل عنوان صورة الموظف بعد تعديل اي عنصر من عناصر التوليفة هذه) تحياتي,,,

اخي العزيز حسب علمي فإنه لايمكن لأكسس أن يقوم بتشفير أي كائن خارج نطاق قاعدة البيانات لذا ولكي تستطيع ان تقوم بالتشفير عليك حفظ الفيديو في حقل من نوع OLE ثم قم بحذف الفيديو من القرص وبالتالي فبتشفير قاعدة البيانات فكأنك شفرت الفيديو ولكن يجب أن يراعى هنا حجم ملفات الفيديو فيجب ان لا يزيد عن 2 جيجابايت لذا ففي رأيي - إذا كان حجم ملفات الفيديو صغير فيمكن إستخدام هذه الطريقة (مرفق لك مثال يوضح ذلك) - اذا كان الحجم كبير فمن الأفضل إستخدام احد برامج تشفير الملفات مثال برنامج MySecretFolder ويعتبر من اقوى برامج التشفير حيث لايمكن تجاوزه حتى من خلال الوضع الآمن تحياتي,,, Athan.rar

ومرفق لكم مثال الأستاذ محمد طاهر (وبتدخل بسيط مني) وبصراحة أعتبره أفضل مثال لتقسيم الأسماء حيث يشمل 1- تقسيم الإسم كاملاً 2- تجاهل المسافات بين الأسماء 3- تحديد أجزاء الإسم التي يجب ربطها بما قبلها أو بما بعدها (مثال عبد و أمة) أو تجاهل (مثال بن و بنت) وبالإطلاع على المثال سيتضح المقصود إن شاء الله تحياتي,,, تقسيم الاسماء.rar

اولاً اسألك سؤال كيف ستضع صورتين بنفس الإسم ونفس الإمتداد في ملف واحد...؟ فبحسب الكود يتم إستدعاء الصورة التي اسمها مطابق للرقم (باضافة s) وامتدادها jpg فكيف سيكون صورتين لهما نفس الاسم والامتداد في ملف PHOTOS ...؟ وبالإجابة على هذا السؤال يمكن عمل التعديل تحياتي,,,

تفضل اخي جرب التعديل المرفق تحياتي,,, sample.rar

بعد اذن صاحب الموضوع قمت بالتحميل من خلال الرابط الموجود في الكتاب وهذا الرابط هنـــا تحياتي,,,

اسمحوا لي اخواني بهذه المداخلة ارجو الاطلاع على التعديل المرفق تحياتي,,, AK_NA_33.rar

اخواني الأعزاء نواصل حلول التقارير في اكسس مرفق لكم المثال السابق بعد إضافة مدول جديد وتقريرين وذلك لعمل خلفية تقرير برمجيا دون إثقال البرنامج بصور لجعلها خلفية للتفارير ارجو ان تكون مفيدة تحياتي,,, التقارير.rar

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

دائماً ما تحرجني بكلامك ... فأنا أبعد ما أكون عن الإبداع ولكن لا أقول إلا جزاك الله خير تحياتي,,,