مرحبا إخواني في المنتدى الرائع و أشكر إدارة المنتدى و المشرفين على هذا العمل الرائع
في الحقيقة لديّ مشكلة و أتمنى ان يكون الحل سريع و في أقرب وقت ممكن ، اريد ان أعمل ترتيب حسب الرقم أو الإسم أو تاريخ الميلاد ، و أيضا عملية البحث بمجرد إدخال حرف أو جزء من الإسم و أتمنى أن يكون هناك شرح وافي لأني مبتدئ جدا و إني اتعلم من هذا المنتدى وشكرا لكم واسمحوني على الاستعجال لإني في صدد إعداد مشروع .
عزيزي يبدو ان الملف المرفق معطوب وذلك لاني جربت اضافة الكود وعند التشغيل يظهر خطا يدل على عدم التوافق بين لغة البرنامج ولغة الأوفيس
الرجاء القيام بما يلي:
اما تغيير البرنامج
او تغيير واجهة التطبيق للأوفيس الى الانجليزية
او تغيير التسميات للجداول والنماذج الى الانجليزية
وَمِنَ النَّاسِ مَن يُعْجِبُكَ قَوْلُهُ فِي الْحَيَاةِ الدُّنْيَا وَيُشْهِدُ الله عَلَى مَا فِي قَلْبِهِ وَهُوَ أَلَدُّ الْخِصَامِ
ان شاء الله غدا الجمعة سيكون كل شي جاهز
وبين يدبك لكن ارجو المعذرة لانني كنت مشغول فالوالدة الله يطول عمرها ويعطيها الصحة في المستشفى لاجراء فحوصات وانا تقريبا لا اجلس على النت الا بعد العودة من هناك متاخرا
همام
تم تعديل هذه المشاركة بواسطة همام ابوعرقوب في 16 فبراير 2007 في 00:50
وَمِنَ النَّاسِ مَن يُعْجِبُكَ قَوْلُهُ فِي الْحَيَاةِ الدُّنْيَا وَيُشْهِدُ الله عَلَى مَا فِي قَلْبِهِ وَهُوَ أَلَدُّ الْخِصَامِ
أشكر ،اشكر يا أخي همام على الإهتمام
الله يطول في عمر والدتك و ادعوا الله لها الصحة و العافية و الهناء
و تحياتي الخالصة لك و لوالدتك وشكرا لك مرة اخرى
بارك الله فيك اخي الحمد لله الوالدة بخير ان شاء الله
دعواتك ان شاء الله مستجابة والله يعطيك العافية
تفضل هالمرفق فيه شرح ايضا لما قمت بعمله
الفضل يعود في عمله لاحد الأخوة وقامت زهرة المنتدى بالتعديل عليه
وانا قمت باضافة تعديل أخر
الفائدة التي تريدها وحسب الشكل الذي تريده اختره انت
همام
وَمِنَ النَّاسِ مَن يُعْجِبُكَ قَوْلُهُ فِي الْحَيَاةِ الدُّنْيَا وَيُشْهِدُ الله عَلَى مَا فِي قَلْبِهِ وَهُوَ أَلَدُّ الْخِصَامِ
شكرا لك اخي همام و لزهرة المنتدى حقا لقد أفرحتني فهذا تقريبا كلّ ما انتظره
فقد أخذت كلّ شيء وعملت آخر من جديد إلاّ انه واجهتني مشكلتين إذا كان بالإمكان حلّها
اولا : لا أستطيع إدخال التاريخ كاملا في خانة txt فهو يعطني إمكانية إدخال رقم واحد فقط من التاريخ (date )رغم أنني اخذت خيار التاريخ و بالنسبة للرقم و الإسم فهما يعملان بشكل جيد ، أمّا في المرفق الذي بعثته لي فالتاريخ يعمل بشكل جيد
ثانيا : وهو اهتزاز النموذج و حدث هذا لي عندما ادخلت الكود الخاص بالنموذج عند خيار الفتح او الحالي ، امّا من قبل لم يحدث الاهتزاز فكان كلّ شيء طبيعي فقط مشكلة إدخال التاريخ
و لديّ طلب و رجاء ان تضع مرفق خاص بشرح اكواد هذا البرنامج خاصة كود (combo3 ) فمعرفتي سطحية في برمجة VBA
واسمحني إن كنت أثقلت عليك بالطلبات و شكرا لك مرّة أخرى
أين أنت يا اخي همام هل يمكن التواصل و أرجوك أن تستحملني قليلا
عزيزي الفاضل
لم تواجهني اي مشكلة في البرنامج عللى الاطلاق
بالنسبة لللمشكلةالأولى فتحت البرنامج واستطعت وضع تاريخ كامل يوم شهر سنة
الحل: اذهب الى لوحة التحكم وغير خصائص الوقت والتاريخ الى اربع خانات بالنسبة للتاريخ
المشكلة الثانية لم يظهر اي اهتزاز للنموذج او ماذا تقصد تحديد بالاهتزاز
لاني لم الاحظ اي شي غريب
اخوك همام
وَمِنَ النَّاسِ مَن يُعْجِبُكَ قَوْلُهُ فِي الْحَيَاةِ الدُّنْيَا وَيُشْهِدُ الله عَلَى مَا فِي قَلْبِهِ وَهُوَ أَلَدُّ الْخِصَامِ
بالنسبة لشرح كود Combo3 هو مايلي:
Private Sub Combo3_AfterUpdate() Dim Ct As String Dim S1 As String, S2 As String Ct = """" Select Case Me.OptSearch Case 2: S1 = "": S2 = "*" Case 1: S1 = "*": S2 = "*" Case 3: S1 = "*": S2 = "" End Select Me.TXT_Search.SetFocus Me.List6.RowSource = "SELECT names.num, names.nom, names.date " & _ "FROM names WHERE names." & Me.Combo3 & " " & "Like " & Ct & S1 & Trim(Nz(Me.TXT_Search.Text)) & S2 & Ct & " " & _ "ORDER BY names.num" Me.nam.Form.RecordSource = "SELECT names.num, names.nom, names.date " & _ "FROM names WHERE names." & Me.Combo3 & " " & "Like " & Ct & S1 & Trim(Nz(Me.TXT_Search.Text)) & S2 & Ct & " " & _ "ORDER BY names.num" End Sub
في السطر الأول: التعريقات الخاصة بمتغيرات نوعها نص وهي التي يتحدد بناء عليها عامل الفلترة او معيار التصفية لعرض السجلات في القائمة
Select Case Me.OptSearch هو مجموعة خيار تحدد قيمة متغير الفلترة او التصفية وهذا واضح من الكود في تغيير قيم S التي استخدمت لاحقا في جملة SQL التي تعرض السجلات في القائمة
Me.List6.RowSource هنا يتم تغيير مصدر السجل للقائمة تبعا للحقل الذي تم اختياره من Combo3
كذلك Me.nam.Form.RecordSource تقوم بفلترة السجلات التي ستعرض في النموذج الفرعي وهنا تم اضافة ذلك لكي تتمكن من اختيار الطريقة المناسبة لعرض نتائج البحث حسبما تشاء
جمل Select هي جمل SQL معروف الهدف منها وهو هنا تغيير مصدر السجل الى ما ترجعه هذه الجمل من بيانات لكل من القائمة والنموذج الفرعي وهذه الجمل كما ذكرت سابقا تعتمد في جزء كبير منها على متغير S الذي يحدد نوع البحث كما هو موضح في مجموعة الخيار وكذلك تعتمد على المتغير txtSearc الذي يكتب فيه النص الذي يتم البحث عنه
اي استفسار اخر انا جاهز
وَمِنَ النَّاسِ مَن يُعْجِبُكَ قَوْلُهُ فِي الْحَيَاةِ الدُّنْيَا وَيُشْهِدُ الله عَلَى مَا فِي قَلْبِهِ وَهُوَ أَلَدُّ الْخِصَامِ
مرحبا أخي همام ، في الحقيقة لا أعرف كيف أشكرك على هذا الشرح لقد أعطيتني ضوء أمشي به
أمّا فيما يخص مشكلة التاريخ فالمشكلة حلت والحمد لله ، وآسف على تأخري في الرد وإن شاء الله سنتابع التحاور
فلدي بعض الاستفسارات سأقدمها في حينها إن شاء الله
بارك الله فيك اخي الكريم وابق على تواصل ستجدني في مساعدتك باذن الله
همام
وَمِنَ النَّاسِ مَن يُعْجِبُكَ قَوْلُهُ فِي الْحَيَاةِ الدُّنْيَا وَيُشْهِدُ الله عَلَى مَا فِي قَلْبِهِ وَهُوَ أَلَدُّ الْخِصَامِ
هذا الموضوع مغلق.