mrnooo2000

تفضل اخى Nosave.rar

و عليكم السلام و رحمة الله و بركاته يعتمد الكود اخى على الوحدات النمطية الموجودة لاحظ اخى الاكواد بالوحدة النمطية cuser

تفضل اخى db3xx.rar

و عليكم السلام و رحمة الله و بركاته اخى الامر بسيط فقط من خصائص مربع النص format ثم can grow = yes

بعد اذن اخى و استاذى أبو عدنان اليك اخى ماتريد بالاضافة الى تنبيه الى ان ماتريد الافضل له ان يكون فى قائمة او مربع تحرير و سرد dbxx.rar

تفضل اخى newupdate.rar

أمين يارب العالمين أخى محمد بارك الله فيك و جعلك دائما نورا يضىء لنا الطريق و أعاد الله لنا أخينا محمد وليد قريبا إن شاء الله و قد استجاب الله منا و منه الدعاء ان شاء الله و لا أنسى لك منى +1 على قدى ( غصب عنى هو ده المسموح بيه فى المنتدى

تفضل اخى و يمكنك وضع الصورة على الزر dbb.rar

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

أخى العزيز مادمت تفضل استخدام طريقة نسخ السجل فاستخدم هذه الاوامر أفضل DoCmd.RunCommand acCmdSelectRecord DoCmd.RunCommand acCmdSaveRecord DoCmd.RunCommand acCmdCopy DoCmd.RunCommand acCmdPasteAppend ثم ضع كود الترقيم يعد ذلك Me.idd = AutoNumber("main table 20…

شكرا أخونا و مشرفنا الغالى على المبادرة الطيبة و أتمنى أن تؤتى ثمارها قريبا بمزيد من التواصل بين الاخوة فى المنتدى و جعلنا الله على الخير أعوانا

نعم أخ مالك يمكنك استخدام هذا الكود اذا كان عدد الحقول صغير ( بحيث تضع متغيرات بعدد الحقول المراد نسخها ) Private Sub Command18_Click() On Error GoTo Err_Command18_Click Dim dbs As Database Dim strsql As String Dim f1, f2, f3, f4 As String f1 = Me.date f2 = Me…

تفضل أخى MrNo_addrec.rar

الاخت الكريمة DCount(expr, domain, [criteria]) يمكنك وضع الشروط التى تريدينها فى الجزء الثالث من الدالة criteria و كطلبك سيكون الشرط هكذا Me.sum_2 = DCount("[ThankBook]", "emp_thank", "[ThankSide] = 2 or [ThankSide] = 3")

تفضل اخى يتم اضافة رقم القاعدة فى الجدول الاساسى و يمكنك تعديل الكود لاضافتها فى الجدول الفرعى أيضا ملحوظة تم تعديل اسماء الجداول و الحقول الى الانجليزية MrNo _datatransfere.rar

تفضل أخى اليك ماتريد يمكنك وضع الكود فى النموذج او فى مربع النص مباشرة Thank_Test.rar

تفضل اخى المجموع قبل تاريخ البداية مجموع السجلات بين التاريخين المجموع الكلى db1.rar

بعد اذن اخينا و استاذنا اكسير تفضل اخى db1.rar

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

امين و لك مثله ان شاء الله