محمد أبوعبدالله

تمام بارك الله فيك انظري الصور وبها ارقام والاؤقام ستوضح لك لماذا تحياتي قاعدة القاعدة بعد التعديل الاخير مبيعات_3.rar تحياتي

عفوا لم انتبه ... الرجاء المعذرة مبيعات_2.rar تحياتي

السلام عليكم ورحمة الله وبركاته في الحقل الذي تسأل عنه تحياتي

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

التواصل من هنا افضل وسيلة حتى يستطيع الجميع تقديم ما لديه تحياتي

السلام عليكم ورحمة الله وبركاته لتنفيذ برنامج حسابات بطريقة منظمة والله اعلم : 1 - جدول العملاء ( بيانات العملاء فقط =كود العميل - الاسم التليفون - العنوان ... الخ ) 2 - جدول الموردين ( بيانات الموردين فقط = كود المورد - الاسم التليفون - العنوان ... الخ ) 3 - جدول الاصناف ( بيانات الاصناف فقط = كود الصنف - اسم الصنف ... الخ ) 4 - جدول حركة المشتريات ( كود الفاتورة - اسم المورد - تاريخ الفاتورة ) 5 - جدول تفاصيل حركة المشتريات ( كود الفاتورة - اسم الصنف - الكمية - السعر - الخصم ) 6 - جدول حركة البيع ( كود الفاتورة - اسم العميل- تاريخ الفاتورة ) 7 - جدول تفاصيل حركة البيع ( كود الفاتورة - اسم الصنف - الكمية - السعر - الخصم ) بعد تنفيذ هذه الخطوات نكمل باذن الله تعالى هذا والله اعلم تحياتي

السلام عليكم من خصائص الحقل تبويب >>> بيانات >>> القيمة الافتراضية اكتب =Date() تحياتي

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

السلام عليكم ورحمة الله وبركاته اليك اخي الكريم ما تم تعديله في جدول AfwtIar تم اضافة حقل Xsave في نموذج frmSales وبالضغط على زر حفظ تم اضافة كود Me.Xsave = -1 وفي حدث عند الاغلاق للنموذج تم اضافة الكود التالي DoCmd.SetWarnings False If Me.Xsave = -1 Then Else DoCmd.GoToControl "Rjmfatwra" DoCmd.SetWarnings False DoCmd.RunCommand acCmdDeleteRecord DoCmd.SetWarnings True End If DoCmd.SetWarnings True عدم الحفظ التلقائي_2.rar تحياتي

السلام عليكم ورحمة الله وبركاته من خصائص النوذج اختار طريقة العرض الافتراضية = نموذج مفرد مرفق قاعدة البيانات من جديد تحياتي new مع نموزج فرعي.rar

يوجد العديد من البرامج التي تقوم بتحزيم البرامج شخصياً استخدم برنامج Smart Install Maker وهو متاج جدا على النت ويعمل بجميع اللغات من بينها العربية كما ان لو شروحات كثيرة تحياتي

السلام عليكم ورحمة الله وبركاته تم اضافة كود للنموذج الرئيسي ويعمل تمام وان اردت ان تضيفه للنموذج الفرعي فلا اشكال ايضاً * ملاحظة : الكود يعمل على مستوى السجل فقط تخياتي عدم الحفظ التلقائي_2.rar

برجاء ارفاق الملف وسيتم التعديل باذن الله تحيايت

وبارك الله فيك اخي حلبي access runtime مجاني من مايكروسوفت ويمكن البحث في جوجل حسب الاصدار الذي تحتاجه access runtime 2010 download https://www.microsoft.com/en-us/download/details.aspx?id=10910 access runtime 2013 download https://www.microsoft.com/en-us/download/details.aspx?id=39358 تحياتي

وعليكم السلام ورحمة الله وبركاته مرحبا اخي الكريم اختصر الكود كالتالي If Len(Trim(Me.الرقم_القومي_للطالب)) <> 14 Then MsgBox ("عدد الارقام المدخلة اقل او اكثر من 14 رقم الرجاء اعادة المحاولة") Me.الرقم_القومي_للطالب.SetFocus else If DCount("[الرقم_القومي_للطالب]", "التلاميذ", "[الرقم_القومي_للطالب]=[forms]![FormName]![الرقم_القومي_للطالب]") >= 1 Then MsgBox " هذا الرقم مكرر بإسم " & DLookup("[اسم التلميذ]", "التلاميذ", "[الرقم_القومي_للطالب] = Forms![FormName]![الرقم_القومي_للطالب]") DoCmd.CancelEvent Me.Undo endif endif تحياتي

وعليكم السلام ورحمة الله وبركاته تفضل اخي العزيز Private Sub Form_BeforeUpdate(Cancel As Integer) On Error Resume Next DoCmd.SetWarnings False If MsgBox(" هل تريد حفظ التغييرات؟ ", vbYesNo, " تأكيد الحفظ") = vbNo Then Me.Undo DoCmd.CancelEvent End If DoCmd.SetWarnings True End Sub تحياتي

وعليكم السلام ورحمة الله وبركاته access runtime هو الحل الوحيد والافضل لتشغيل ملفات Access على الكمبيوتر لا يوجد عليه Office اساساً بدون وضع التصميم :) فلا يمكن تعديل تصميم الجداول والاستعلامات والنماذج والتقارير على جهاز لا يحتوي على Access كاملاً ولكن بوجود access runtime يتم تشغيل الملف فقط . تحياتي

مرحبا اخي الكريم علاء الافضل ان تنشأ 1 : نموذج فرعي لجدول الارض والوقود 2 - ان تقسم جدول زوجات واولاد الى جدول زوجات وجدول اولاد 3 - نموذج فرعي لجدول زوجات 4 - جدول فرعي لجدول اولاد 5 - نموذج فرعي لجدول معلومات عامة ويتم ربط الجميع بحقل رقم الاستمارة العام الموجود بجدول استمارة ويكون مصدر النموذج الرئيسي جدول استمارة ويتم اضافة النماذج الفرعية وحقول الربط تكون حقل رقم الاستمارة العام تحياتي

السلام عيكم زرحمة االله وبركاته فضلا الاطلاع على المرفق الجديد 77777.rar تحياتي

وعليكم السلام ورحمة الله وبركاته جرب الكود التالي Private Sub Adfah_Click() If Adfah.Value = "نقدي" Then NoEmp.Value = 1 else If Adfah.Value = "اجل" Then NoEmp.Value = Null End If End If End Sub تحياتي

وعليكم السلام ورحمة الله وبركاته فضلا مراجعة المرفق الجديد تحياتي تجمع السلام.rar

وعليكم السلام ورحمة الله وبركاته يوجد برنامج access runtime وظيفته تثبيت مكونات access للعمل فقط دون فتح تصميم وهو مفيد جداً حيث يمكن تثبيته على الاجهزة التي لا يوجد بها Office نهائياً يتوفر access runtime مع جميع اصدارات Office وهو مجاني تحياتي

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

بعد تحويل قاعدة البيانات access الى sql server وليكن اسم قاعدة البيانات الجديدة final افتراضياً سيكون مسار قاعدة البيانات كالتالي C:\Program Files\Microsoft SQL Server\MSSQL12.MSSQLSERVER\MSSQL\DATA وسيكون امتدادها mdf والاسم بالكامل final.mdf ايضا ستجد بجوار قاعدة البيانات الجديدة ملف باسم final_log.ldf هذين الملفين هما الذين تضعهم في السيرفر الرئيسي تحياتي

السلام عليكم ورحمة الله وبركاته بعد اذن استاذي شيفان جرب هذه الطريقة ستجد فيها كل ما يلزمك ان شاء الله https://support.office.com/ar-sa/article/نقل-بيانات-Access-الي-قاعده-بيانات-SQL-Server-ب-استخدام-معالج-التكبير-5d74c0df-c8cd-4867-8d07-e6e759d72924?ui=ar-SA&rs=ar-SA&ad=SA تحياتي