اذهب الي المحتوي
أوفيسنا

jjafferr

أوفيسنا
  • Posts

    10148
  • تاريخ الانضمام

  • تاريخ اخر زياره

  • Days Won

    415

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

  1. وعليكم السلام الرسالة تقول بأن اعدادات بعض الحقول في الجدول لا تسمح بهذا الالحاق ، قد يكون بسبب التكرار ، او وضع قيمة فاضية ، او شرط آخر ، فالطريقة للتغلب على هذه الرسالة هي: ادخل في الجدول مباشرة ، وقم بإدخال البيانات (نفس البيانات التي كنت ستلحقها بالجدول) ، وعليه ستعرف اعدادات الحقل الذي يسبب المشكلة جعفر
  2. حياك الله الظاهر انك عملت تطريز على التعديل لكي يلائم بيئة شبكتك جعفر
  3. وعليكم السلام الموضوع غير واضح ، ياريت تعطينا مثالين. جعفر
  4. السلام عليكم بالنسبة للحذف ، استعمل هذه الكود: Private Sub Cmdel_Click() On Error GoTo Err_Cmdel_Click Dim mySQL As String Dim Msg, Style, Title, Response Msg = ":ستقوم الآن بحذف السجل " & vbCrLf & vbCrLf & _ Me.cbo_Class & vbCrLf & " " & vbCrLf & _ "هل أنت متأكد ؟" & vbCrLf & _ "أضغط ( نعم ) للإستمرار ، أو ( لا ) لإلغاء الأمر" Style = vbQuestion + vbYesNo + vbMsgBoxRight Title = "تحذيـــر" Response = MsgBox(Msg, Style, Title) If Response = vbYes Then mySQL = "DELETE * FROM tbl_Class_Name WHERE strClass = '" & Me.cbo_Class & "'" CurrentDb.Execute mySQL Me.cbo_Class.Requery Me.cbo_Class.Value = Me.cbo_Class.Column(0, 0) End If Exit_Cmdel_Click: Exit Sub Err_Cmdel_Click: MsgBox Err.Description Resume Exit_Cmdel_Click End Sub . وبالنسبة لإظهار المادة التي اضفتها في النموذج الاخر ، استعمل هذا الكود: Private Sub أمر2_Click() On Error GoTo Err_أمر2_Click Forms!frm_Section!cbo_Class.Requery DoCmd.Close Exit_أمر2_Click: Exit Sub Err_أمر2_Click: MsgBox Err.Description Resume Exit_أمر2_Click End Sub . جعفر 758.1.db1.mdb.zip
  5. مخالف - يُغلق قواعد المشاركة فى الموقع اضغط هنـــــــــامن فضلك لقراءة القواعد كاملة و بصفة خاصة نؤكدعلى ما يلي 1- يمنع منعا باتا نشر أية مواد تخالف حقوق الملكية الفكرية و يرجى الابلاغ عن المشاركات المخالفة من خلال زر تقرير اسفل المشاركة 2-يجب استخدام خاصيةالبحث قبل طرح السؤال توفيرا للوقت و الجهد. 3-ضرورة كتابة عنوان واضح للموضوع يدل على محتواه ويعطي وصفاً مختصرا للسؤال. 4-ممنوع منعا باتاً كتابة عناوين سينمائية مثل عاجل ، نداء الي فلان ، الي الخبراء ، طلب مساعدة ، أريد حلا..... 5-يمكن استعجال الرد باستخدام تعبير -للرفع- و غير مسموح بالالحاح او اللوم فجميع الاعضاء يشاركون تطوعا طبقا لسعة وقتهم. ومخالفة ذلك تعرض الموضوع للحذف
  6. وعليكم السلام عملت التغيير التالي: . جعفر dbMain.zip 757.myback_accdb.zip
  7. نعم يمكنك الغاء الشريط الجانبي او السفلي (الاثنين في اعداد واحد في اعدادات النموذج Scroll bar) ، فاختار الاختيار الاول ، . اما بالنسبة الى الترتيب (فرز) ، فهناك حلين: 1. والاسهل هو ان تعمل الفرز في النموذج الفرعي من التاريخ الاحدث (في الاعلى) الى التاريخ الاقدم (في الاسفل) ، او رقم الترقيم التلقائي من الكبير الى الصغير ، 2. بعد اضافة سجل (بعد التحديث) ، اذهب الى آخر سجل: DoCmd.GoToRecord , , acLast جعفر
  8. السلام عليكم اسمحوا لي ان اوضح بعض المعلومات صيغة accdb بدأت بالاكسس 2007 ، ولكن ليس جميع خواص accdb متوافقة بين الاصدارات 2007-2016 !! وهناك الكثير من الميزات الموجودة في 2010 ، ليست موجودة في النسخة الاولى من اصدار 2007 ، وانما هي موجودة عند تحديث 2007 بحزم التحديث Service pack ، ولكن ، الميزات الاخرى والموجودة في 2010 او 2013 او 2016 مثل: حدث الجداول ، برامج الويب ، تكبير الصفحات (zoom) ، و .... ، فإنها اصلا غير موجودة لإصدارات الاكسس الاقدم. جعفر
  9. وعليكم السلام ارسل صورة من الشاشة بالمشكلة لوسمحت ، علشان اعرف المطلوب. جعفر
  10. انا لا علم لي ببرنامجك ، لهذا ، فافعل اللي تجده يصلح له
  11. بس انا مستغرب من هذه الجملة!! نموذجك الفرعي يأخذ/يحفظ بياناته من نفس الجدول اللي الاستعلام يأخذ منه ، لهذا السبب ، فالسجل لما يُحفظ في النموذج الفرعي ، فتلقائيا بياناته تكون متوفره للإستعلام ، وتلقائيا تظهر ، فأين موضوع الحفظ هنا؟ جعفر
  12. استعمل هذا السطر بدل السابق Me.Parent.نص57 = DLookup("[Rsnf]", "Qryasnaf", "[Rajmsanf]='" & Me.Rajmsanf & "'") + Me.Alkmiah . جعفر
  13. وعليكم السلام اللي فهمته من طلبك هو: انك تريد تفتح نافذة الوندوز ، وتجيك قائمة بأسماء مجلدات الكمبيوتر والشبكة ، لذا افتح الرابط وبتلاقي في الكود هذا السطر: strFolderName = BrowseFolder(strMsg) . وهو ينادي وحدة نمطية لفتح النافذة التالية: . جعفر
  14. انا ما قدرت اشوف اي سجلات بالنموذج الفرعي ، فما جربت الكود!! اخبرني كيف اقدر اشوف السجلات. جعفر
  15. تفضل في النموذج الفرعي ، في حدث "الحالي" ، اكتب هذا الكود: Me.Parent.نص57 = DLookup("[Rsnf]", "Qryasnaf", "[Rajmsanf]='" & Me.Rajmsanf & "'") جعفر 756.777.mdb.zip
  16. وعليكم السلام اخي محمد صدقني اني قرات الشرح اللي كتبته اكثر من 10 مرات ، وللاسف ما فهمت انا كنت اعتقد بأني فهمت سؤالك الاول ، لهذا السبب ارفقت لك النموذج الفرعي كطريقة سهلة لمعرفة المجموع!! رجاء لا تسرد ، وانما اعطني خطوات ، ومثال بأرقام ، والنتيجة الاي تريد توصل لها ، واحاول ان اتتبع خطواتك للحل ان شاء الله جعفر
  17. وعليكم السلام اخي زاهر من اي سجل تريد الرصيد؟ . جعفر
  18. وعليكم السلام هذه جداول النظام ، وما لك دخل فيها ، وإلا ما بيشغل برنامجك المفروض ان هذه الجداول تكون مخفية ، اذا اتبعت علامات الصح اللي على يمين الصورة: . جعفر
  19. تفضل . . . جعفر 755.Database2.accdb.zip
  20. وعليكم السلام وشكرا على الافادة وتستطيع استعمال: SELECT Table1.name FROM Table1 LEFT JOIN Table2 ON Table1.name = Table2.name WHERE (((Table2.name) Is Null)); جعفر
  21. وعليكم السلام اخونا الكبير ابو خليل عارض شرح في موضوع مشابه ، ويأخذ فيه آراء الاعضاء كذلك ، فياريت تلقي النظر عليه جعفر
  22. السلام عليكم شوف اذا هذه الطريقة تفيدك ، عملت نموذج فرعي مرتبط بالنموذج الرئيسي عن طريق الحقل "عملة شراء" ، فلما تقلب السجلات في النموذج الرئيسي ، ستجد سجلات "عملة شراء" ومجموعها في النموذج الفرعي جعفر 752.حوالات جديد.accdb.zip
  23. وعليكم السلام نعم هناك حلين يجون على بالي ، ولكنهم لا يعملون من التقرير ، وانما من الاستعلام او الجدول: 1. في الاكسل ، اعمل قالب Template لحقول البيانات اللي تريدها ، واعمل فيها تنسيق التاريخ المطلوب ، ومنها ارسل البيانات من اكسس الى نسخة من هذا القالب ، وعليه سيكون التنسيق صحيحا ، 2. ارسل البانات الى الاكسل ، ثم برمجيا نفتح الاكسل (بطريقة مخفية) ، ونعدل على حقل التاريخ بالتنسيق المطلوب جعفر
  24. مو اذا مافي شرح ، ما ممكن ان نعرف المطلوب
×
×
  • اضف...

Important Information