أكسس وبس

مفيش اى حلول يارب تكون جمعه مباركة على الجميع

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

واذا طلب كلمة الشفت او الوحدة النمطية موجودة

كلمة مرور الشفت

??))^^/*-+[]

كلمة مرور الوحدة النمطية
ib**@@[rh](-+)
الله المستعان

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

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

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

حورس ادارة المحلات 2 - Copy.rar

الاخوة الافاضل كل عام وانتم بخير

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

حاولت اعمل استرداد للجداول لنسخة اخرى فارغة تظهر نفس الرسالة ثم بحثت كثير على الانترنت الاقى حل مش لاقى حل والبرنامج عليه شغل 3شهور  اتمنى من الله العلى القدير انن اجد حل عندكم 

الرجاء المساعدة جزاكم الله خيرا

21 ساعات مضت, AbuuAhmed said:

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

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

16 ساعات مضت, الحلبي said:

شوف اخى الكريم / اكسس وبس

هذا الحل بعد ادخال القيمة فى حقل القيمة الصادرة  qty_out تجد المطوب 

جزاكم الله كل خير

اشكرك يا اخى الكريم ايضا الحل لا يفى بالغرض لان حضرتك جعلت حدث بعد تحديث الكمية المباعة Forms!trans_out.Form!TotalAmount = Me.Ttotal وبالتالى لغيت مربعات النص الغير منضمين اجمالى الفاتورة والذى ياخذ القيمة من النموذج الفرعى ومربع الصافى 

فاتورة بيع.rar

شكرا على التنمر كان ممكن ترد انا لم افهم سؤالك او معرفش بدل التنمر 

الاخوة الافاضل السلام عليكم ورحمة الله وبركاته

فى المرفق يوجد مشكلتين فى فاتورة مبيعات Trans_out وبه نموذج فرعى Sales لبنود اصناف الفاتورة فى اسفل فى تذيل النموذج الفرعى مربع نص غير منضم لجمع حقل ال Total المشكلة الاولى للاسف قيمة الحقل تظهر فى مربع نص التجميع عند فتح النموذج الفرعى Sales لوحده وعند فتح نموذج فاتورة المبيعات Trans_out لا تظهر قيمة التجميع فى مربع النص فى النموذج الفرعى وبالتالى لا يظهر فى النموذج الرئيسي فى مربع نص  t1 

المشكلة الثانية اريد نقل قيمة مربع نص الغير منضم dd الى مربع نص منضم TotalAmount عملت كود على مفتاح خروج Me.TotalAmount = Me.dd ولكن لا بد من فتح الفاتورة مرتين ليتم نقل القيمة

جزاكم الله خيرا

فاتورة بيع.rar

معلش انا اسف اذا كان طلبى مش واضح

الاخوة الافاضل

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

الاولى

فى نموذج Trans_out الخاصة بفاتورة المبيعات يوجد مربع نص غير منضم ddd الصافى ومربع نص منضم اسمه TotalAmount لقيمة الفاتورة فى حقل Total فى جدول Issue_doc خاص برأس فاتورة المبيعات عملت كود بوظفتين عند الخروج عن طريق مفتاح خروج

Me.TotalAmount = Me.ddd  لكى يتم نقل القيمة من مربع نص غير منضم ddd لمربع نص منضم TotalAmount لحقل Total 

On Error Resume Next

والثانية تشغيل استعلام الحاق Naqdi لتحصيل المبلغ فى حالة ان حقل نوع الدفع نقدى لجدول Catch_Receiv كان تم تحصيل المبلغ من العميل 

DoCmd.SetWarnings False 
If Me.pay = "نقدى" Then

DoCmd.OpenQuery "Naqdi"
DoCmd.OpenQuery "hoho"
' MsgBox "تم الترحيل بنجاح"
DoCmd.SetWarnings TrueEnd If
المشكلة هنا ان الجزء الاول من الكود لا يعمل Me.TotalAmount = Me.ddd ويالتالى يكون الحاق البيانات ناقص يتم الحاق بيانات العميل ونوع الفاتورة بدون قيمة الفاتورة total فى جانب الدائن من جدول Catch_Receiv

اما  المشكلة الثانية فى 

نموذج paymentcuss رئيسي لتحصيل نقود من العملاء به نموذجين فرعين الاول خاص بفواتير العملاء والثاني بالتحصيل والدفع للعملاء يتم اختيار اسم العميل يظهر فواتيره فى النموذج الاول Custmerinvoice ثم اقوم بتسجيل المبلغ المحصل من العميل فى النموذج الفرعى الثاني paymentcus لجدول Catch_Receiv الخاص بالتعاملات النقدية قمت بجعل حقل رقم السند Catch_Receiv يضيف ترقيم بزيادة 1 ( =Nz(DMax("Catch_Receiv";"Catch_Receiv");0)+1 ) فى خاصية القيمة الافتراضية ولكن المشكلة

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

الرجاء من اهل الخبرة ان يسعنى صدركم وان يكون مطلبى ان شاء الله خفيف

122.rar

الاخوة الافاضل 

فى المرفق نموذج فاتورة البيع Trans_out يتم عمل فاتورة البيع واختيار بنود الاصناف فى الفاتورة وعند الضغط على مفتاح خروج يتم تشغيل استعلام Naqdi الحاق بيانات من نموذج الفاتورة الى جدول Catch_Receiv فى حالة ان تكون نوع الدفع فى الفاتورة ( نقدى ) وكأن تم تحصيل مبلغ الفاتورة 

اريد المساعدة فى عمل استعلام تحديث قيمة حقل Credit فقط فى جدول Catch_Receiv وذلك عند تعديل بنود اصناف الفاتورة او زيادة اصناف الفاتورة حيث يتم تغير قيمة اجمالى الفاتورة 

فاتورة بيع.accdb

هو ده المطلوب بعينه جزاك الله خيرا فى الدارين واسعدك فى الدارين 

اين اهل الخبرة

اخوانى الاساتذة

فى المرفق نموذج Names يوجد جنب كل سجل مفتاح لنقل اسم الصنف من جدول Names الى جدول1 عملت استعلام الحاق

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

فاتورة بيع.accdb

اخوانى 

فى الجدول1 حقلين 

الاول date والثاني day

عملت نموذج من الجدول1

به مربعين نص الاول لحقل date والثاني لحقل day اريد عند اختيار اي التاريخ ميلادى من النتيجة التى تظهر اريد ان يظهر اسم اليوم لهذا التاريخ فى مربع نص day

تاريخ.accdb

الاخوة الافاضل

عملت الكود لحقل الباركود Number فى النموذج الفرعى Sales فى حدث بعد التحديث والحمدلله النتيجة كويسة فى حالة لو حبيت اضيف الصنف اضغط على مفتاح Yes فى الرسالة التى تظهر يفتح نموذج الاصناف Names وكتبت كود الصنف او ادخلت الباركود عن طريق قارئ الباركود وضغطت على مفتاح انتر او تاب من لوحة المفاتيح المشكلة هنا يذهب المؤشر الى السجل التالى الى حقل اسم الصنف Name اريد ان ينتقل المؤشر الى حقل اسم الصنف فى نفس السجل

فاتورة بيع.accdb

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

فى المرفق نموذج Trans_out خاص بفاتورة البيع عملت كود لحقل Number فى النموذج الفرعى Sales قبل التحديث عند استخدام قارئ الباركود لصنف معين والباركود غير موجود بجدول الاصناف يعطى رسالة ان الصنف غير موجود ويريد فتح نموذج الاصناف names لاضافة الصنف ولكن الكود لا يعمل

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

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

فاتورة بيع.accdb

اشكرك يا اخى الكريم وجارى التجريب ان شاء الله

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

عاوز ابدأ صح هل اقوم بمسح الباركود من العلبة فى نموذج الصنف Names وبعد كده اضع اسم الصنف والسعر والكمية والحاجات دى وبعد كده استخدمه عادى فى فاتورة الشرا  Trans_in وفاتورة البيع Trans_out حتظهر بيانات الصنف واضع الكمية وخاصة انا عامل نظام بحث عن الصنف بالباركود فى فاتورة الشرا والبيع

هل هذا صح اما ماذا

اين اهل الخبرة فى هذا الموضوع ليساعدنى بالله عليكوا

اخوانى اكرمكم الله الرجاء ان يسعنى صدركم سؤالى 

فى المرفق جدول الاصناف Names ضفت حقل الباركود وصمتت نموذج Names لتسجيل الاصناف المشكلة كيف ابدأ

اولاً قمت بتعريف الجهاز والويندز واضافة الاداة اكتفكس للاكسس 

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

حتى استطيع اضافة او خصم صنف من فواتير الشرا Trans_in او البيع Trans_out من خلال مفتاح ادخال بنود الفاتورة فى النموذجين وعند فتح النموذج الخاص بالاصناف يوجد مربع للبحث باسم الصنف او بالباركود اذا كان الصنف غير موجود له باركود يتم البحث باسمه واذا كان له باركود يتم ادخال الباركود الخاص به فيظهر بياناته فى النموذج الفرعى ويتم ادخال الكمية

الرجاء كل الرجاء المساعدة جزاكم الله خيرا

12.accdb

منتظر حضرتك ترفع الملف تاني

اخى الكريم جزاك الله خيرا

ولكن فى مشكلة فى الملف تظهر هذه الرسالة

اشكرك اخى الكريم مروركم الكريم جربت الفكرة ولكن لم تفلح

وسبب المشكلة

اننى ضفت فى كود مفتاح خروج فى النموذجين المبيعات Trans_out والمشتريات Trans_in عند النقر بحيث dd = TotalAmount

On Error Resume Next
Me.TotalAmount = Me.dd

DoCmd.close