النجاشي

السلام عليكم احبتي المطلوب عند فتح النموذح اريدتشغيل مفتاح caps lock تلقائيا تحياتي اليكم تشغيل مفتاح caps lock.accdb

استاذي الفاضل @essam rabea لقد عملت نفس ما قلت وغيرت رقم نسخه الاوفيس بس انا قصدي ممكن نضع اسم القاعده بالكود لانه افكر انه يفتح القاعده اي واجه البرنامج بارك الله فيك استاذ عصام زادك الله علما يالغالي

استاذي الفاضل@essam rabea الله يعطيك الصحه يلزم كتابه اسم المسار واسم المجلد والقاعده اذا كان كذلك ممكن السطر الذي نوضع فيه ذالك تشرحه لي بارك الله فيك يالغالي

استاذي @essam rabea استاذنا ابو جودي انا بسدد عليه من دون ما تنط عليه هههههه

استاذي الفاضل@ابو عارف والتركيز يكون بنص n2 ل يخرج منه ما اقصده الداله الي بالفرعي تكون بالنموذج الريسيي Dim rs As Recordset Dim CountLines Dim f As Form Dim KeyName As String Dim KeyValue Set f = Form KeyName = "ID_Sanf" KeyValue = [ID_Sanf] On Error GoTo Err_GetLineNumber Set rs = f.RecordsetClone ' البحث عن السجل الحالي Select Case rs.Fields(KeyName).Type ' البحث واستخدام ترقيم قيمة الحقل Case DB_INTEGER, DB_LONG, DB_CURRENCY, DB_SINGLE, _ DB_DOUBLE, DB_BYTE rs.FindFirst "[" & KeyName & "] = " & KeyValue ' البحث واستخدام اول قيمة للحقل Case DB_DATE rs.FindFirst "[" & KeyName & "] = #" & KeyValue & "#" ' البحث واستخدام المساواة لقيم الحقل Case DB_TEXT rs.FindFirst "[" & KeyName & "] = '" & KeyValue & "'" Case Else MsgBox "ERROR: Invalid key field data type!" Exit Function End Select ' الاستمرار والمتابعة في ايجاد بقية الارقام Do Until rs.BOF CountLines = CountLines + 1 rs.MovePrevious Loop Bye_GetLineNumber: ' اظهار النتيجة GetLineNumber = CountLines Exit Function Err_GetLineNumber: CountLines = 0 Resume Bye_GetLineNumber تحياتي يالغالي

للرفع

للرفع

السلام عليكم احبتي الكرام اريد الاكواد الذي بالنموذج الفرعي تكون بالنموذج الريئسي وتودي عملها من النموذج الريئسي تحياتي تعديل كود.mdb

اعدرني استاذي والله ما مقصوده انك عزيز غالي لكن ده كله بسبب النظاره لم البسها ما بشوف كويس اكرر اعتذري يالغالي انت تاج راسي السموحه استاذي@essam rabea ما ينكر الجميل الا جاحد لاتنسى اننا مديون لك بعمل بهذلني بهذله لي فتره ببحث عنه نجحت الفكره بفضل الله ثم بفضلك علينا اشكرك كثير واسال الله ان يمدك بالصحه والعافيه ابشر برضاك يالغالي باشر جوازي اجيك شو رايك ياعم

ممتازه بارك الله فيك استاذه عصام هذا فعلا ما اريده بالضبط مشكوررررررررررررررررررررررر تحياتي اليك راح انا ادور لكود عند التغير عشان بس عشان اكمل ما في جعبتي وعملت الكثير استاذي وهو المطلوب فعلا بارك الله فيك والشكر موصول للاستاذ ابو عبدالله الله يبارك فيك ما قصر معنا احبتي جزاكم الله خير

اعذرني @أبو عبدالله الحلوانى استاذي الفاضل فهمتك الان صحيح الفلتره مضبوطه بالكود لكن انت خليت يرجع قيمه الصنف للحقل t1 وهذا لا اريده انما لو جربت ايقاف الكود وكتبت صالون او جز منها وتبحث ستجد العمليه تمام صارت لانه الحقل يكون خاص بوصف السياره

استاذي انا قمت بايقاف الكود 'T1 = n2 وصار تمام التمام بارك الله فيك واعتقد انك ركزت علي الشرح 99 بالمايه اما الكود كان يرجع قيمه حقل البحث بالرقم علي العموم جزاك الله خير الفكره حلوه ممكن شرح لاننا لم اشوف اكواد انما غيرت مصدر الحقل الجدول او او في شي اخر بارك الله فيك اذا كان الكود عند التغير ببجث حقل رقم الصنف يكون افضل تحياتي يالحبيب

شرح مسهل ان شاء الله 1- مثلا اكتب بحقل m صا او صالون ثم ابحث بحقل n2 يظهر لي السجلات بالفرعي صالون فقط 2- عندما اغلق النموذج وافتح من جديد يكون جاب اخر كلمه بحث بحقلm 3 ظهرت لي اخر كلمه بحقل m اذا وفرت اننا لا اكتبها مره اخري هون نبحث بالحقل n2 والسجلات على موجبها تكون ان شاء الله يكون اوضح من السابق

استاذي@essam rabea اليك المرفق الجديد اعتقد انك قربت لي الحل كثير انا ارفقت القاعده الحالي فيها شرح افضل باذن الله نوصل للمطلوب بالنسبه للجقل الذي عملته ممتاز يظهر اخر كلمه لكن استاذي الهدف لازام ابحث بالرقم مثلا يجيب السجلات حسب اخر كلمه انظر للمرفق لغلا تكون وضحت الفكره SearchTest2.mdb

السلام عليكم احبتي الموضوع اريد ان ادخل بحقل M حرفين او الاسم كامل لنوع السياره مثلا كرولا اكتب كر ثم اذهب الي البحث بالرقم او الاسم يعطينا السجلات الذي تحمل الوصف بحقل M واريد الحرفين او الكلمه المدخله عند اغلاق النموذج او فتحه تكون موجود بالحقل M ما تروح الا اذا عملت لها مسح بارك الله فيكم احبتي من فضلكم ليس هناك داعى لعمل اقتباس عند الرد فهذا يقوم بدوره بتشتيت المطلع والباحث عن نفس الموضوع مستقبلاً , ولابد من تحديد أفضل إجابة من قبل صاحب المشاركة عند الحصول على الإجابة الصحيحة وذلك بتفعيل علامة الصح من على يمين المشاركة الصحيحة بحث.rar

الي 2007 وليس 2010 يالغالي

مشكوررر يالغالي استاذي الفاضل ابو ياسين ممكن تحول القاعده لديك بموضوع الطباعه الي 2007 حيث اننا نزات ولم يعمل مهي كون القاعده اعتقد احدث تحياتي

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

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

حياك استاذي الغالي نورت المنتتدي فعلا من يوم ماركبت الطابعه اعتقد بدات المشكله معي وجود طابعه افتراضيه تقصد بالاكسس ام بنفس النظام

السلام عليكم احبتي الكرام عندما افتح التقرير من النموذج تظهر رساله تم الغاء الاجراء الرمز2501 رغم انه من سابق يعمل طبيعي شو المشكله تحياتي

مشكور استاذي الفاضل@طارق عبد الرازق وسبق ان نزلت هذا من الاستاذ عبدالله قدرور الله يعطيه العافيه والحمدلله توصلت لحل المشكله كانت عندي اداه انحذفت وكانت عامل لي صداع والحمدلله اعمل علي طريقهالاستاذ @essam rabea عصام جزاه الله خيرا هي الذي تناسبت معي اشكرك كثير على مشاركتك

السلام عليكم احبتي اريد مثال لواصق باركود 4*6 بحيث يقرا الاتي 04465-22090 pzm35-35204-221 pzm35-35F20-SET تحياتي احبتي

ممتاز بارك الله فيك استاذي اذا بدي ان لايشوف المستخدم التقرير

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