jjafferr

وعليكم السلام هذه نسحة من بيانات جدول raseed لأحد تقارير (التقرير رقم2): . بالنسبة لترتيب الارقام ، لاحظ بيانات الاعمدة=2 ، وسترى ان الحالي=Seq2 (مثل ترتيب ID) ، بينما المفروض=rpt2_Seq (لاحظ اننا عملنا فرز بالتاريخ ، وعليه نعطيه ارقام التسلسل) . والكود يقوم بتعديل بيانات الحقلين Seq2 و rpt2_Seq ، حسب عدد الاعمدة وعدد السجلات: . . كما اوضحت لك بعاليه ، فعند طلبك طباعة التقرير ، فالكود يقوم بتعديل بيانات Seq2 و rpt2_Seq (حسب التقرير المطلوب طباعته) ، ولكن يجب ان تكون متغيرات الكود قد تم وضعها بالطريقة الصحيحة ودون اخطاء جعفر

بعد اذن اخي عبد اللطيف ولتعم الفائدة ، هذه نسخة بصيغة 2003 جعفر مؤسسة البركة لبيع الخلويات.zip

جرب هذا المرفق 761.رساله الا لحاق.mdb.zip

تفضل تم وضع المعيار في الاستعلام ، وتغيير في الكود قليلا جعفر 761.رساله الا لحاق.mdb.zip

المشكلة في الحفل Tarakam ، فإعداداته لا تقبل التكرار ، والاستعلام يضيف/يلحق هذا الحقل مع بقية البيانات . بينما لأن الحقل ترقيم تلقائي ، فيجب ان تسمح له بان يعطي كل سجل جديد ، رقمه التلقائي ، عليه ، الاستعلام سيكون بدون هذا الحقل: . وعندي ملاحظة ، وهي انه كلما تضيف مادة على الفاتورة ، فالاستعلام يضيف جميع الحقول !! لذا يجب عليك ان تضع معيار في الاستعلام ، مثل رقم الفاتورة مثلا ، حتى يتم ادخالها/الحاقها وحدها فقط. جعفر

وكيف اخلي الرسالة تطلع؟

السلام عليكم من زمان تعلمت ، ان لا استعمل اوامر الاكسس التي لها علاقة بالوندوز ، وانما اعتمد على API الوندوز ، الاكسس عنده عادة ، وهي حذف بعض هذه الاوامر في الاصدارات الاحدث ، وهذه الاوامر تعتمد على المكتبات ، بينما api الوندوز ، على الرغم من انها طولها (يعني نحطها في الوحدة النمطية مرة واحدة ، ولا علاقة لنا بها) ، والمشكلة الاخرى هي بين 32بت و 64بت ، والذي كذلك يتم تعديله مرة واحدة ، وكذلك لا يحتاج الى بالمكتبات جعفر

وعليكم السلام اخي الفاضل ، للأسف الشديد ، نصف السطر الذي كتبته لا يعطينا معلومة كافية حتى نشغل البطيخة (منقول من اختنا الفاضلة الدكتورة أم عهود حفظها الله) جعفر

وعليكم السلام الرسالة تقول بأن اعدادات بعض الحقول في الجدول لا تسمح بهذا الالحاق ، قد يكون بسبب التكرار ، او وضع قيمة فاضية ، او شرط آخر ، فالطريقة للتغلب على هذه الرسالة هي: ادخل في الجدول مباشرة ، وقم بإدخال البيانات (نفس البيانات التي كنت ستلحقها بالجدول) ، وعليه ستعرف اعدادات الحقل الذي يسبب المشكلة جعفر

حياك الله الظاهر انك عملت تطريز على التعديل لكي يلائم بيئة شبكتك جعفر

وعليكم السلام الموضوع غير واضح ، ياريت تعطينا مثالين. جعفر

السلام عليكم بالنسبة للحذف ، استعمل هذه الكود: 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

مخالف - يُغلق قواعد المشاركة فى الموقع اضغط هنـــــــــامن فضلك لقراءة القواعد كاملة و بصفة خاصة نؤكدعلى ما يلي 1- يمنع منعا باتا نشر أية مواد تخالف حقوق الملكية الفكرية و يرجى الابلاغ عن المشاركات المخالفة من خلال زر تقرير اسفل المشاركة 2-يجب استخدام خاصيةالبحث قبل طرح السؤال توفيرا للوقت و الجهد. 3-ضرورة كتابة عنوان واضح للموضوع يدل على محتواه ويعطي وصفاً مختصرا للسؤال. 4-ممنوع منعا باتاً كتابة عناوين سينمائية مثل عاجل ، نداء الي فلان ، الي الخبراء ، طلب مساعدة ، أريد حلا..... 5-يمكن استعجال الرد باستخدام تعبير -للرفع- و غير مسموح بالالحاح او اللوم فجميع الاعضاء يشاركون تطوعا طبقا لسعة وقتهم. ومخالفة ذلك تعرض الموضوع للحذف

وعليكم السلام عملت التغيير التالي: . جعفر dbMain.zip 757.myback_accdb.zip

نعم يمكنك الغاء الشريط الجانبي او السفلي (الاثنين في اعداد واحد في اعدادات النموذج Scroll bar) ، فاختار الاختيار الاول ، . اما بالنسبة الى الترتيب (فرز) ، فهناك حلين: 1. والاسهل هو ان تعمل الفرز في النموذج الفرعي من التاريخ الاحدث (في الاعلى) الى التاريخ الاقدم (في الاسفل) ، او رقم الترقيم التلقائي من الكبير الى الصغير ، 2. بعد اضافة سجل (بعد التحديث) ، اذهب الى آخر سجل: DoCmd.GoToRecord , , acLast جعفر

السلام عليكم اسمحوا لي ان اوضح بعض المعلومات صيغة accdb بدأت بالاكسس 2007 ، ولكن ليس جميع خواص accdb متوافقة بين الاصدارات 2007-2016 !! وهناك الكثير من الميزات الموجودة في 2010 ، ليست موجودة في النسخة الاولى من اصدار 2007 ، وانما هي موجودة عند تحديث 2007 بحزم التحديث Service pack ، ولكن ، الميزات الاخرى والموجودة في 2010 او 2013 او 2016 مثل: حدث الجداول ، برامج الويب ، تكبير الصفحات (zoom) ، و .... ، فإنها اصلا غير موجودة لإصدارات الاكسس الاقدم. جعفر

وعليكم السلام ارسل صورة من الشاشة بالمشكلة لوسمحت ، علشان اعرف المطلوب. جعفر

حياك الله

انا لا علم لي ببرنامجك ، لهذا ، فافعل اللي تجده يصلح له

بس انا مستغرب من هذه الجملة!! نموذجك الفرعي يأخذ/يحفظ بياناته من نفس الجدول اللي الاستعلام يأخذ منه ، لهذا السبب ، فالسجل لما يُحفظ في النموذج الفرعي ، فتلقائيا بياناته تكون متوفره للإستعلام ، وتلقائيا تظهر ، فأين موضوع الحفظ هنا؟ جعفر

استعمل هذا السطر بدل السابق Me.Parent.نص57 = DLookup("[Rsnf]", "Qryasnaf", "[Rajmsanf]='" & Me.Rajmsanf & "'") + Me.Alkmiah . جعفر

وعليكم السلام اللي فهمته من طلبك هو: انك تريد تفتح نافذة الوندوز ، وتجيك قائمة بأسماء مجلدات الكمبيوتر والشبكة ، لذا افتح الرابط وبتلاقي في الكود هذا السطر: strFolderName = BrowseFolder(strMsg) . وهو ينادي وحدة نمطية لفتح النافذة التالية: . جعفر

انا ما قدرت اشوف اي سجلات بالنموذج الفرعي ، فما جربت الكود!! اخبرني كيف اقدر اشوف السجلات. جعفر

تفضل في النموذج الفرعي ، في حدث "الحالي" ، اكتب هذا الكود: Me.Parent.نص57 = DLookup("[Rsnf]", "Qryasnaf", "[Rajmsanf]='" & Me.Rajmsanf & "'") جعفر 756.777.mdb.zip