محمد التميمي

اخي zoom10 لايوجد عني اي مشكلة في الملف مع ذلك تفضل مرة اخرى البحث بمجرد الكتابة بحرف.accdb

السلام عليكم احسنت اخي rudwan وبارك الله بجهودك وجعلهل في ميزان حسناتك

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

السلام عليكم بعد رخصة استاذي وفخري الاخ ابو خليل اليكم هذا رابط الفديو فيه شرح وتطبيق ما طلبه الاخ tssms بالتوفيق

احسنت اخي ابو الجود ياجواد ( الجود والجواد معناه الكرم ) سلمت يداك

نعم اخي العزيز قمت بذلك دون فائدة

اخي العزيز بعد تنصيب الفونت والتشغيل لم يعمل وظهرت هذه الرسالة

احسنت اخي الكريم محمد وبارك الله بجهودك جاري التحميل

جداً اسف استاذي القدير

احسنت استاذ رمضان وبارك الله بجهودك وجعله الله في ميزان حسناتك

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

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

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

السلام عليكم الف الف مبروك الترقية اخي الفاضل 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 تسلم وبارك الله بك وجعله في ميزان حسناتك