محمد التميمي

وصلت الفكرة جزيل الشكر والامتنان

السلام عليكم بارك الله بجهودك القيمة اخي واستاذي صالح سؤال: ماذا لو كان التحديث يشتمل على نموزج او تقرير كيف سيكون العمل مع فائق الشكر والتقدير

السلام عليكم الف الف مبروك الترقية اخي الفاضل ابا جودي وجعلك الله ذخراً لهذا الصرح العظيم

السلام عليكم الف الف مبروك الترقية اخي الفاضل essam rabea وانشاء الله تكون حلقة خير ومحبة من سلسلة حلقات خبرائنا الاعزاء

كل الشكر والتقديرللاخ الكريم SEMO.Pa3x والى كل من ساهم بهذا بالموضوع واعمام الفائدة للجميع وجزاكم الله خير جزاء المحسنين ...

السلام عليكم مشكورين اخواني عبد اللطيف وابا جودي وهذا التعديل بالعربية وساعة بعقارب Desktop.rar

بارك الله بجهودك اخي aaaamido

وعليكم السلام قم بتطبيق هذا الدرس ستجد ما تبحث عنه

السلام عليكم شكراً اخي midomashakel الرابط كان مهم جداً وكان هو الحل المناسب شكراً اخي العزيز ابو ياسين شكرا اخي رمضان وبار الله بجهودكم القيمة

السلام عليكم الكد ادناه يعمل للتأكد من وجود البيانات وعدم تكرارها المطلوب التعديل على الكد عند الانتقال الى سجل جديد واكتب بيانات موجودة اريد من التعديل ان ينقلني الى السجل الذي اكتشفه كسجل مكرر لا ان يخبرني برسالة التكرار فقط وجزاكم الله خير الجزاء ' مفتاح اضافة موظف اخر لنفس القرار Dim strSQL As String Dim intHow_Many As Integer strSQL = "[KararNom]='" & Me.KararNom & "'" strSQL = strSQL & " And [KararYear]='" & Me.KararYear & "'" strSQL = strSQL & " And [CompID]=" & Me.CompId intHow_Many = DCount("*", "TblKararat", strSQL) If intHow_Many > 0 Then NameFd = Me.KararID MsgBox "لا يمكن تسجيل هذا الاسم بالنظام لانه مسجل مسبقا" End If 456.mdb

شكراً اخي واستاذي الكريم ابو خليل تم تجربة الكد وهو يعمل

السلام عليكم

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

السلام عليكم الحمد لله على سلامتك اخي ابا جودي ادعوا لك الله العلي القدير ان تكون في اتم الصحة والعافية ومن الله التوفيق

تسلم اخي الكريم أبو عبدالله الحلوانى والله ما خسر الي سماك خبير طبقت حسب رابط موقع مكروسوفت لان الفديو غير واضح ونجحت العملية واعطاني ترقيم تلقائي من ستة ارقام . وهذا الرابط ادناه الذي دخلت عليه في الرجستري وذهبت الى ثامن اختيار وقمت بفتحه وبدلت الارقام بثمانية احرف F Computer\HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\Microsoft\Office\15.0\Access Connectivity Engine\Engines\ACE تسلم وبارك الله بك وجعله في ميزان حسناتك

السلام عليكم بعد التحية والسلام لدي جدول بيانات بدون اي ترقيم فيه 600,000 ستمائة الف سجل وعندما اقوم بأنشاء ترقيم تلقائي للجدول لا يقبل ويظهر لي الرسالة ادناه لم اجد لها حل في (خيارات اكسس) ارجوا مساعدتي في انشاء اي نوع من الترقيم علماً اني لا استطيع تحميل الجدول الى المنتدى لانه يحتوي على بيانات حكومية ولكم مني فائق الشكر والتقدير

احسنت اخي الكريم ابو عبد الله لم استطع الاجابة بالسرعة الممكنة لافادة الاخ السائل

اسف انقطعت الكهرباء

تريد الكد على اي جدول بالتحديد

تفضل هذا الكد DoCmd.SetWarnings False DoCmd.RunSQL "DELETE * FROM [اسم الجدول]" DoCmd.RunSQL "DELETE * FROM [تستطيع تكرار الجملة لعدة جداول]" DoCmd.SetWarnings True End Sub ارجوا ان يكون هذا طلبك

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

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

احسنت يا استاذ عبد اللطيف روعة من روائعك

نعم فعلاً هذه الخاصية لا تعمل على اكسس 2003 اليكم الملف المرفق لمن يحتاج اليه اكسس 2013 يعمل بصورة جيدة بالتوفيق PDF تصدير التقرير بصيغة.accdb

اخي ارسل ملف مرفق ليتم مساعدتك نعم اخي ابو ياسين ولاكن يعمل مع استعلام التقرير ( في رقم الفاتورة) [Forms]![فاتورة البيـع].[رقم الفاتورة]