ازهر عبد العزيز

السلام عليكم لدي هذا الكود لمسار حفظ SavedPath = """" & CurrentProject.Path & "\Public_Library\r.pdf" & """" احتاج اضافة للكود ان يكون المسار في مجلد Public_Library ثم مجلد داخل هذا المجلد موجود مسبقا بحسب اسمة ياخذة عن حقل نصي في نفس النموذج اسمة Book_Name بمعنى احفظ هذا الملف في المجلد Public_Library في المجلد الذي اسمة موجود في الحقل النصي Book_Name

زادك الله من فضلة جزيل الشكر يااخي وهو المطلوب

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

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

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

السلام عليكم في النموذج fnumber يوجد نموذج فرعي يحتوي ارقام قد تزيد وقد تنقص احتاج ترتيب هذة الارقم من 1 الى نهاية الارقام من خلال الزر الموجود في النموذج الرئيسي اي .......12345 بمعنى لوفرضنا انة لدي 50 سجل وتم حذف السجل رقم 40 يتم يصبح عدد السجلات 49 ويتم ارجاع القيمة بارجاع القيمة 40 المحذوفة بدل السجل 50 اتمنى ان تكون الفكرة واضحة numbers.accdb

كود عجيب غريب شكرا جزيلا لمجهودك استاذ

نعم بالضيظ هكذا

السلام عليكم في النموذج f111 توجد مجموعة من مربعات النص مرتبة بحسب الرقم من 111 الى 160 توجد فوقها مربعات نص باختصارات مختلفة احتاج عند ادخال اختصار من مربعات النص في الاعلى في الحقل updx اسفل الحقول يتم ترتيب الحقول بحسب مربع النص الموجود بالحقل مثلا لو ادخلنا zv تكون قيمة مربع النص اسفل الاختصار zv تساوي 111 وبعدة 112 وهكذا لحد اكمال بقية مربعات النص اتمنى ان تكون الفكرة واضحة 111.accdb

لم تعمل عندي لان بسبب النظام 64 سوف الغي علامت الاعجاب 😕

اهلا استاذني العزيز @kanory نعم استاذي هذا هو طلبي اذا امكن يحفظ باي اسم يكتب بالحقل الموجود فوق الصورة

السلام عليكم في النموذج fpic يوجد مربع صورة يحتوي نص احتاج عند الضغط على الزر الموجود يتم اخذ صورة لهذا المربع وحفظها في المجلد screen الموجود بجانب قاعدة البيانات picutre.rar

السلام عليكم في النموذج ftime يوجد حقول احتاج عند الضغط على الزر الموجود في النموذج تاخذ هذة الحقول قيمتها من التاريخ الحالي مثلا الحقل yn تكون قيمتة 2024 والحقل mn = 10 والحقل dn = 16 اما الحقل mt = اكتوبر اي نصي والحقل dt = الاربعاء ايضا نصي time.accdb

وعليكم السلام If Me.dev <> 5000000000 Then dev = OldValue End If

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

اقصد في حال المستخدمين الاخرين اضافوا بيانات لان القاعدة مربوطة في الشبكة لاكثر من مستخدم

السلام عليكم لدي قاعدة بيانات مقسمة هذا جزء منها في الجدول tbmr احتاج عند اضافة اي بيانات من مصدر خارجي تظهر رسالة تنبية mr.accdb

ACC.accdb

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

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

السلام عليكم احتاج كود اذا كان الحقل في النموذج ftest يحتوي ارقام فقط تظهر رسالة تنبيهية بهذا test.accdb

شكرا جزيلا

السلام عليكم في النموذج الرئيسي ftest1 يوجد حقل مربع تحرير غير منضم Amino_Acidu يحتوي كود Private Sub Amino_Acidu_AfterUpdate() DoCmd.GoToControl "FTest2" DoCmd.GoToRecord , , acNewRec FTest2!Amino_Acid = Amino_Acidu FTest2!Molecular_formulaT = FTest2!Molecular_formula FTest2!Molecular_weightT = FTest2!Molecular_weight FTest2!pKa_a_COOHT = FTest2!pKa_a_COOH End Sub المشكلة ان عند الاختيار من هذا الكود اسم تلمض جميع الازرار في النموذج بمعنى ثقل بمعالجة الامر لن تلحظوا هذا الشئ في هذا النموذج لانة جزء بسيط من نموذج اكبر ارجو منكم المساعدة في ايجاد بديل لهذا الكود او طريقة لمعالجة هذا الثقل Amino.accdb

اختي العزيزة اعملي الجدول وادخلي البيانات لكي يساعدك بقية الاعضاء في طلبك

بالتوفيق ان شاء الله