jjafferr

جرب في الجدول تضيف نص طويل ، واذا صار ، فمعناه انه يشتغل تمام ، وقدر تحذف الحقل في النموذج ، وتعمله مرة ثانية

في الجدول ، غير نوع الحقل من نص الى Memo ، جعفر

وعليكم السلام تفضل ، استعمل هذا الكود (نفس كودك ، بس عملت فيه نسخة من حدث تدقيق9_AfterUpdate): Option Compare Database Private Sub all_AfterUpdate() Me.Refresh Dim Rs As DAO.Recordset Set Rs = Form.RecordsetClone Rs.MoveFirst Do While Not Rs.EOF Rs.Edit Rs!bbb = all Rs.Update Rs.MoveNext Loop Set Rs = Nothing DoCmd.SetWarnings False DoCmd.OpenQuery "qu" DoCmd.SetWarnings True End Sub Private Sub تدقيق9_AfterUpdate() DoCmd.SetWarnings False DoCmd.OpenQuery "qu" DoCmd.SetWarnings True End Sub جعفر

من طلب العُلا سهر الليالي ومن يركب البحر ، لا يخشى من الغرق

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

استخدم برنامج الضغط winrar او winzip

وعليكم السلام رجاء ترفق التقرير ، وبالتالي نعرف تفاصيله لأن اللي انت تقوله شئ غير طبيعي في التقارير!! بس الصورة الثانية طبيعية ، شو الغلط فيها؟ جعفر

لا علاقة إلا اذا كانت لديك شروط مثل عدم قبول تكرار حقل او ان النموذج / الفرعي مبني على استعلام لا يقبل إدخال البيانات اصلا جعفر

اذا تريد تربط النموذج الرئيسي بالنموذج الفرعي ، بحقل واحد: Link Master Fields: اسم حقل النموذج الرئيسي Link Child Fields: اسم حقل النموذج الفرعي اذا تريد تربط النموذج الرئيسي بالنموذج الفرعي ، بحقلين او أكثر: Link Master Fields: اسم الحقل1 من النموذج الرئيسي ؛ اسم الحقل2 من النموذج الرئيسي ؛ اسم الحقل3 من النموذج الرئيسي Link Child Fields: اسم الحقل1 من النموذج الفرعي ؛ اسم الحقل2 من النموذج الفرعي ؛ اسم الحقل3 من النموذج الفرعي والتسلسل هو سر الرابط ، يعني الحقل1 للنموذج الفرعي يقابله في التسلسل الحقل1 للنموذج الفرعي ، وهكذا .. جعفر

وعليكم السلام للنماذج الفرعية الثلاث ، اعمل التالي لكل نموذج فرعي: جعفر

وعليكم السلام عملت تغيير بسيط للحقل "نوع السيارة" في النموذج ، وعليه ، اصبح الكود (يجب ان تختار نوع السيارة ورقم اللوحة كذلك ، او رقم اللوحة فقط ، وإلا فالسيارة المشابهه ستظهر في التقرير): stLinkCriteria = "[نوع السيارة]='" & Me![نوع السيارة].Column(1) & "' And [رقم اللوحة]='" & Me![نوع السيارة].Column(0) & "'" . . جعفر 335.Human Resources DataBase-beta.accdb.zip

أخي الفاضل رجاء لا تعمل مواضيع جديدة مكررة ، واذا اردت لفت نظر المنتدى ، فيكفي ان تضع كلمة "للرفع" ، وسيصبح الموضوع في اعلى القائمة مرة اخرى. تم حذف الموضوع الآخر. جعفر

السلام عليكم سيدي الفاضل ، استعلام التوحيد يأخذ نتائجه من الاستعلامات التي بداخله ، لذا ، يجب عليك ان تضبط نتائج الحقل عن طريق الامر Round مثلا ، لكل استعلام ، ثم تدمجهم مرة اخر في استعلام توحيد جعفر

السلام عليكم اسمح لي بمعلومة إضافية: اذا كنت تريد قيم البحر1 والبحر2 متفرقين: . والنتيجتين: . بينما اذا اردت مجموعهم في قيمة واحدة: . والنتيجة: . جعفر

وعليكم السلام أخي ابوحاتم انا عملت لك استعلامين ، وفيك البركة انك تعمل التقرير 1. الاستعلام: qry_Bahar_No_12 ، لا يشمل البحر1 والبحر2 ، 2. الاستعلام: qry_Bahar_12 ، ويشمل البحر1 والبحر2 ، جعفر 333.Current_CostProg6.mdb.zip

نعم ، ومؤقتا ، انسخ الجداول المطلوبة ، وبعدين نعملها مرتبطة ان شاء الله جعفر

أخوي بدر ، انت واجد مستعجل ، وترى البيضة جاءت قبل الدجاجة مو بالعكس وليش تريد ترسل رسالة للصيدلي؟ المريض بيروح للصيدلي ويعطيه رقمه ، والصيدلي بيفتح النموذج بالاسم والتاريخ ويحصل الوصفة وشو فايدة الرسالة ، اذا كان امامه 5-10 مرضى؟ طبعا في طرق لرسالة التنبيه (او خلينا نقوم للتنبيه ، لأنها قد لا تكون رسالة) ، وقد تعمل توقيت كل دقيقة لنموذجه المفتوح وتعمل للنموذج Requery ، ويكون اماه كشف الوصفات القصد ، اعمل النموذج ، وبعدين اهتم بالخطوة التالية او المستخدمين جعفر

وعليكم السلام البرنامج في الرابط التالي فيه 7 استعلامات ، كلها يعمل بطرق تختلف عن بعضها بعض الشئ ، ولكنها كلها تعمل اللي تريده ، فاختر ما شئت (طبعا اقرا الموضوع هناك اولا) : جعفر

خليك من الرابط ، واشتغل على برنامجك مثل ما شرحت لك جعفر

العفو أخي ، انا غير متخصص في الحمايات والرابط الآخر اللي انت وضعت سؤالك فيه ، هم يناقشون موضوع الحماية ، فالافضل انت تسألهم هناك جعفر

المثل يقول: الباب الذي يجيك منه ريح ، سده (اغلقه) واستريح يعني انت ما تعرف راح ما/يشتغل على كمبيوتر ، فليش مصمم على استعماله شوف بديل يعمل على جميع الاجهزة جعفر

عند عمل برنامج الصيدلي ، فلن يكون فيه جداول ، وانما سيكون فيه جداول مرتبطة (والتي هي الجداول في برنامجك الاصلي ، البرنامج اعلاه) ، قد يكون فيه استعلامات ونماذج وتقارير ، وجداول مرتبطة ، جعفر

أخي الفاضل الخطأ في الكود باللون الاحمر: الكمبيوتر عندي لا يعطي رقم BIOSSerialNumber ، وعليه الخطأ يأتي في BIOx ، حيث الكود يضيف قيمة BIOx "والتي هي لا شئ" الى ارقام ، وهذا خطأ: For i = 1 To Len(ProcessorNum) Prox = Prox & (AscW(Mid(ProcessorNum, i, 1))) Next 'المتغير بعد تطبيق المعادلة الحسابيه عليه يساوي 'طبعا القسمه وغيره هي مجرد اجتهاد لكن يجب ان تكون العمليات الحسابيه متطابقه مع ملف انشاء الارقام التسلسليه Prox = Prox * 9001.25 / 8.11 * 456.9 / 7 * 187.3 '-- For i = 1 To Len(BIOSSerialNumber) BIOx = BIOx & (AscW(Mid(BIOSSerialNumber, i, 1))) Next BIOx = BIOx + 11 / 3.1 * 66612.9 / 7 * 13 قبل مدة رأيت احد المواضيع التي تخص الحماية عن طريق رقم المذربورد ، رجاء مراجعة هذا الرابط من مشاركة أخونا الفاضل ابوخليل الى النهاية: جعفر

متى / اين / كيف يأتي الخطأ؟ جعفر

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