jjafferr

وهذا شرح بالصور لما قاله اخي شفان ، للأكسس 2010 عليك عمل زر امر ، ويكون عليه الاختيار ، ثم . ثم . . . . وهناك نماذج مختلفة . ونماذج بأزرار خاصه . وهذه لتغيير نمط النموذج ، بخطوط والوان ووو . جعفر

وهذه مشاركتي ، بطريقة النموذج الفرعي ، وطبعا تستطيع اخفاء الحقول التي لا تريدها . جعفر 855.الحذف بشرط رصيد صفر.mdb.zip

السلام عليكم يمكن عملها مثل ما تفضل وقال اخي شفان ، ولكن الافضل عملها في الجدول مباشرة ، وانا اضيف هذين الحقلين في كل جدول اعمله ، فالترقيم التلقائي يسفيد منه الاكسس لفهرسة الجدول وسرعة الوصول الى السجل ، والتاريخ التلقائي ، لمعرفة وقت حفظ السجل ، بالاضافة ، ان هذين الحقلين هما من اساسيات تحويل جداول قاعدة البيانات الى SQL server او MySQL مثلا . حيث يتم اضافة الوقت تلقائيا عند حفظ السجل ، ولا دخل للمستخدم به ، وكما ترى في الصور في الاسفل ، فقد وضعت التاريخ في احد اطراف النموذج ، وعملته بحيث لا يستطيع المستخدم تغييره . جعفر 856.Database11.accdb.zip

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

السلام عليكم اسمح لي اخوي ابو خليل اشارك معاك المشكلة انك اقتطفت كود من وسط اكواد اخرى ، ولم تأخذ القدر الصحيح من الكود ، فاختلط الحابل والنابل!! والكود الذي اعطاك اخوي ابو خليل متكامل ، ولكن لما تحطه وسط كودك فيجب عليك تغييره ليناسب المطلوب. اليك هذا التصحيح (لوسمحت مرة ثانية ارفق الكود بالنص ، حتى نستطيع تعديله بسهولة ) . كما انك تقول في الكود ، انه اذا كنت في سجل جديد ، اعمل رسالة "الرجاء ادراج صوره جديده" . ثم انت تقول ان هذا الكود في تقرير !! فكيف يكون الكود على حدث "نقر الزر" جعفر

وعليكم السلام هذا الربط به طلبك جعفر

وعليكم السلام انت قلت بأن لديك 5 اعمدة/حقول ، ولكنك لا تظهر العمود الخامس . في النموذج ، لديك اسم الحقل في النموذج ، ومصدر بيانات الحقل من الجدول ، وفي اي مكان بين النماذج او الكود ، اذا اشرت لهذا الحقل ، فيجب ان تشير الى اسم الحقل ، وفي هذه الحالة فإن اسم الحقل عندك هو Text13 . والخطأ في الكود ، بأنك لم تُشر الى اسم الحقل في النموذج ، فكنت تحصل على خطأ . هل لازلت محتاج الاجابة على سؤالك الآخر؟ جعفر 854.قيد مزدوج2.accdb.zip

تفضل هناك عدة طرق لجلب البيانات من استعلام التوحيد (مثلها مثل جلب البيانات من اي استعلام عادي او من الجدول) ، بإستخدام Recordset او Dlookup مثلا ، ولكنني سأستعمل استعلام التوحيد بطريقه اخرى ، علشان في النهاية يكون عندنا سجل واحد فقط استعلام التوحيد الحالي ، بتغيير اسم الحقول ليتناسب مع T = تبريد . اخذت البيانات اعلاه الى ملف اكسل ، لشرح الطريقة التي سنتبعها في تفكيك الحقول اعلاه ، وعمل الاستعلامات لاحقا: 1. السطر رقم 1 ، عملنا جميع الحقول الموجودة في الاستعلام اعلاه ، ولكن بشكل افقي ، 2. السطر رقم 2و3و4 ، لاحظ بالالوان ، اخذنا كل رقم تحت اسمه ، والحقول الغير موجودة ، نكتب مكانها صفر (للارقام) ، واسم القسم لكل السجلات ، 3. السطر رقم 5 ، ثم سنعمل استعلام اجمالي ، بهذه الطريقة لكل حقل ، 4. السطر رقم 6 ، وهو المطلوب كإستعلام اخير ، لإستعماله كمصدر بيانات للإستعلام . تسلسل النشوء والتطور والتحول في الاستعلامات . بالنتائج . والنتيجة في التقرير . جعفر 853.2.db2.mdb.zip

السلام عليكم سؤالك كان يدل على انك تريد احصائية ، لهذا السبب اخذت طريق استعلام التوحيد ، ولكن بما ان السؤال اصبح واضح ، فالاجابة اقرب يجب ان يكون عندك بيانات صحيحة في الجدول علشان تجرب الاستعلام T المرفق ، واللي هو مصدر بيانات للتقرير تقرير_إحصائية_مفصلة ، واللي عملت تعديل على قسم التبريد (والباقي عليك ) ، في خطأ في استعلاماتك ، فجرب هذا الاستعلام SELECT Sum(IIf([Wrship]="مسيحى" And [SumTotal]>=[A] And ([Trshh]="تبريد" Or IsNull([Trshh])),1,0)) AS T_مسيحى, Sum(IIf([Wrship]="مسلم" And [SumTotal]>=[A] And ([Trshh]="تبريد" Or IsNull([Trshh])),1,0)) AS T_مسلم, Sum(IIf([Case]="مستجد" And [SumTotal]>=[A] And ([Trshh]="تبريد" Or IsNull([Trshh])),1,0)) AS T_مستجد, Sum(IIf([Case]="منقول" And [SumTotal]>=[A] And ([Trshh]="تبريد" Or IsNull([Trshh])),1,0)) AS T_منقول, Sum(IIf([Case]="باق" And [SumTotal]>=[A] And ([Trshh]="تبريد" Or IsNull([Trshh])),1,0)) AS T_باق, Sum(IIf([Wrship]="مسيحى" And [SumTotal]<[B] And ([Trshh]="زخرفة" Or IsNull([Trshh])),1,0)) AS Z_مسيحى, Sum(IIf([Wrship]="مسلم" And [SumTotal]<[B] And ([Trshh]="زخرفة" Or IsNull([Trshh])),1,0)) AS Z_مسلم, Sum(IIf([Case]="مستجد" And [SumTotal]<[B] And ([Trshh]="زخرفة" Or IsNull([Trshh])),1,0)) AS Z_مستجد, Sum(IIf([Case]="منقول" And [SumTotal]<[B] And ([Trshh]="زخرفة" Or IsNull([Trshh])),1,0)) AS Z_منقول, Sum(IIf([Case]="باق" And [SumTotal]<[B] And ([Trshh]="زخرفة" Or IsNull([Trshh])),1,0)) AS Z_باق, Sum(IIf([Wrship]="مسيحى" And [SumTotal]>=[B] And [SumTotal]<[A] And ([Trshh]="ملابس" Or IsNull([Trshh])),1,0)) AS M_مسيحى, Sum(IIf([Wrship]="مسلم" And [SumTotal]>=[B] And [SumTotal]<[A] And ([Trshh]="ملابس" Or IsNull([Trshh])),1,0)) AS M_مسلم, Sum(IIf([Case]="مستجد" And [SumTotal]>=[B] And [SumTotal]<[A] And ([Trshh]="ملابس" Or IsNull([Trshh])),1,0)) AS M_مستجد, Sum(IIf([Case]="منقول" And [SumTotal]>=[B] And [SumTotal]<[A] And ([Trshh]="ملابس" Or IsNull([Trshh])),1,0)) AS M_منقول, Sum(IIf([Case]="باق" And [SumTotal]>=[B] And [SumTotal]<[A] And ([Trshh]="ملابس" Or IsNull([Trshh])),1,0)) AS M_باق FROM Tbl_Basic, tbl_student; جعفر 853.1.db1.mdb.zip

سبحان الله ، نحن الاثنين اتجهنا الى نفس طريقة الحل اعطني دقائق لوسمحت

احنا ما عندنا هذا الشرط !! عندك شرطين: 1. إذا اخترت من القائمة ( نقداً ) أريد يكون مبلغ الخدمة إجبارياً مساوي سعر الخدمة 2. عند أختيار من القائمة ( آجل الدفع ) أريد المبلغ ينتقل من حقل مبلغ الخدمة إلى حقل المتبقي جعفر

وعليكم السلام اذن ، حقل المتبقي = القيمة السابقة في حقل المتبقي + مبلغ الخدمة ثم ، مبلغ الخدمة = صفر Private Sub Payment_type_BeforeUpdate(Cancel As Integer) If Me.Payment_type = "نقدا (cash )" Then Me.Amountofservice = Nz(Me.Net, 0) ElseIf Me.Payment_type = "آجل (Posterior)" Then Me.Residua = Nz(Me.Residua, 0) + Nz(Me.Amountofservice, 0) Me.Amountofservice = 0 'اذا اردت ان تصبح قيمة الحقل (مبلغ الخدمة) = صفر بعد نقل القيمة الى الحقل (المتبقي) End If End Sub جعفر 850.2.تجريي2.accdb.zip

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

الجدول كان . وبعد الاضافة ، اصبح الجدول . اما عرض البيانات في النموذج ، فموضوع آخر جعفر

البرنامج اللي ارفقته في مشاركتي الاخيرة: . . وقيمة الحقل هو رقم الصنف. ولا يمكن ان تُظهر القيمة والاسم مع بعض بعد ان ترك الماوس ، واذا اردت ، تقدر ان تعمل حقل مستقل لكل معلومة. جعفر

مشكلتك في نموذجك الفرعي ، اصلحه ، وكل شيء بيطلع لك

السلام عليكم اعمل هذه الخطوات لوسمحت: 1. لما تدخل كلمة السر وتكون في صفحة البيانات ، انقر على الزر رقم 4 (احفظ csv) ، والذي يقوم مقام الزر رقم 5 (احفظ في الجدول) ، البرنامج سينتج ملف SiteDetails.csv والذي سيكون في نفس مجلد قاعدة البيانات ، فرجاء ارفاقه هنا ، والذي نستطيع منه اخذ اسماء الحقول ، 2. ادخل في كود الزر رقم 5 (احفظ في الجدول) ، شوف السطر الذي في الصورة في الاسفل ، وانقر على المكان المؤشر عليه بالسهم ، السطر بيتغير لونه الى اللون البني (كما في الصورة) . 3. ارجع الى النموذج ، وادخل في موقع الوزارة ، وادخل كلمة السر ، وافتح صفحة البيانات ، 4. انقر على الزر رقم 5 (احفظ في الجدول) ، فالبرنامج بيأخذك الى السطر الذي به الكود ، وسيتحول السطر الى اللون الاصفر ، والذي معناه ان البرنامج لم ينفذ هذا السطر بعد ، 5. الآن اضغط على زر الكيبورد F8 ، فسترى ان السطر الاصفر انتقل الى السطر التالي ، 6. لاحظ على اي سطر يتوقف الكود ولا يتحرك ، واخبرني عنه ، مع العلم انه قد يجب عليك الانتظار قليلا (قد يصل الموضوع الى دقائق بسبب تفاعل الموقع مع برنامجنا) . . لوسمحت تعطيني الخطوات اللي تعملها (يعني على اي زر تنقر ، ثم اي زر ، ثم اي .....) ولا اريد كلمة السر ، وانما اريد اعرف خطوات وصولك للصفحة المطلوبة ، ونعم اعرف انه ما بستفيد من هذا ، ولكن لعلمي فقط ولا تنسى ، للاستخدام الامثل برجاء استخدام جهازك المحمول الخاص بك بالوضع الأفقي وتعمل صورة من صفحة البيانات (وقبل ان ترفقها هنا ، احذف معلوماتك الشخصية) ، اما الصفحة التي ارفقتها ، فلا فائدة برمجيه منها (هذا ما اخبرتك سابقا). جعفر

وعليكم السلام اذا تركت الاكسس يختار تصاميم وازرار والوان الوندوز ، فهذا ما ستحصل . جعفر

اخوي بدر هذا الكود لا يوجد به توقيت ، وانما كأنه تفعيل لحقل ، فالظاهر ان احد نماذجك فيها توقيت Timer ، وينتقل التركيز فيها الى كائن معين ، ولكن هذا المفروض لا يؤثر على الزر !! معنى كلامي ان المشكلة ليست هنا ، وانما في مكان آخر ، وانت فقط ترى عوارض المشكلة هنا (يا سلام ، كأني دكتور واتكلم ) جعفر

اخي طاهر تم عمل بعض التعديلات على البرنامج: بالاضافة الى الصور اعلاه ، الجدول قبل الاضافة . وبعد الاضافة . والكود لا يسمح بنسخ البيانات ، اذا كان هناك سجل واحد من البيانات موجود في الجدول مسبقا Private Sub cmd_Copy_From_Click() A = "Format([Forms]![الموظفين]![Date_From],'mmyyyy')" A = DCount("*", "sarfyomi1", "Format([التاريخ],'mmyyyy')=" & A) B = "Format([Forms]![الموظفين]![Date_To],'mmyyyy')" B = DCount("*", "sarfyomi1", "Format([التاريخ],'mmyyyy')=" & B) If Len(Me.Date_From & "") = 0 Then MsgBox "رجاء تعبئة التاريخ - من" Me.Date_From.SetFocus Exit Sub ElseIf Len(Me.Date_From & "") = 0 Then MsgBox "رجاء تعبئة التاريخ - من" Me.Date_From.SetFocus Exit Sub ElseIf A = 0 Then MsgBox "لا توجد بيانات لنسخها من الشهر" & vbCrLf & Me.Date_From Exit Sub ElseIf B > 0 Then MsgBox "بيانات الشهر " & vbCrLf & Me.Date_To & vbCrLf & "موجودة في الجدول" Exit Sub End If DoCmd.SetWarnings False DoCmd.OpenQuery "qry_Copy_From" DoCmd.SetWarnings True MsgBox "تم نسخ سجلات الشهر " & vbCrLf & Me.Date_From & vbCrLf & vbCrLf & _ "الى شهر " & vbCrLf & Me.Date_To End Sub جعفر 847.تجريبي.accdb.zip

وعليكم السلام هل هذا قصدك: نعمل استعلام تجميع لكل من التخصصات ، (هنا نأخذ التبريد كمثال فقط) . ولكن هناك فراغات ، . يجب ان نملئها بإسم التخصص ، وعدد كل مجموعة . البيانات الكاملة لتخصص التبريد ، والذي يجب اتباع نفس الخطوات للتخصصات الاخرى ، . نحول الاستعلام من وضع تصميم الى وضع SQL . هذا هو الاستعلام بصيغة SQL . الآن نعمل نفس الاستعلام لبقية التخصصات ، ولكن لا داعي لعمل الاستعلام بالطريقة اعلاه لبقية التخصصات ، وانما نحن بحاجة الى اخذ SQL استعلام التبريد ، وتطبيقه على بقية التخصصات ، وبين كل تخصص وآخر ، نكتب union all SELECT IIf(Len([Trshh] & "")=0,"تبريد",[Trshh]) AS T, Case, Wrship, Count([Nr]) AS [Counter] FROM تبريد GROUP BY IIf(Len([Trshh] & "")=0,"تبريد",[Trshh]), Case, Wrship union all SELECT IIf(Len([Trshh] & "")=0,"زخرفة",[Trshh]) AS T, Case, Wrship, Count([Nr]) AS [Counter] FROM زخرفة GROUP BY IIf(Len([Trshh] & "")=0,"زخرفة",[Trshh]), Case, Wrship union all SELECT IIf(Len([Trshh] & "")=0,"ملابس",[Trshh]) AS T, Case, Wrship, Count([Nr]) AS [Counter] FROM ملابس GROUP BY IIf(Len([Trshh] & "")=0,"ملابس",[Trshh]), Case, Wrship . والنتيجة: . جعفر 853.db1.mdb.zip

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

هل هذا الذي تريده؟ 846.1.STOCK.accdb.zip

وعليكم السلام انت قلت ، يعلق ، ولكن هل ارسل اي معلومة (انا ما اعرف اي زر قصدك في: اختيار ارسال البيانات الى الجدول) ؟ عندك اختيارين: 1. اما ان ترفق اسم الموقع ، 2. واما ان ترفق البرنامج جعفر

المتصفح الذي كنت استعمله ، والذي هو جزء من مايكروسوفت ، ويمكن تخاطب البرامج برمجيا ، فهو المتصفح Internet Explorer ، وهناك طرق لإستعمال متصفح الكروم والفايرفوكس ، ولكني لم اتطرق اليها. ولكن ، البرنامج المرفق ، ينتج لك قاعدة بيانات مستقلة ، تخاطب الموقع الذي تريده ، ولكن ، عندما تنقر على الزر "Open Browser" ، فتستطيع برمجيا ان تجعل المتصفح مخفي (اذا شئت). جعفر