مساعدة فى برنامج مبيعات مبسط

[محمود بن عوض]

أخى الكريم : محمد ..........السلام عليكم ورحمة الله وبركاته

كيف حالك ؟ ......معذرة للتأخر عنك ولكن عساك أن تكون بأتم صحة وأحسن حال

الحمدلله جربت العنوان وشغال تمام وبدأت أعمل نماذج كشاشات للإنتقال بها بين عناصر البيانات ولكن كعادة المبتدئين ظهرت بعض المشاكل

أولا لقد قمت بفتح الملف على جهاز آخر بنفس إصدار الاوفيس مع ضبط ريزوليشن الشاشة على نفس الذى كنت أعمل عليه وقت التصميم (1024-768) ولكن لاحظت إختلاف فى شكل النموذج وخاصة فى نماذج شاشات الإنتقال كأن يظهر بحجم عادى للإطار الخارجى ولكن غير مستوعب المحتويات الداخلية فأضطر إلى تكبيرحدوده (عرضه - إرتفاعه ) ليظهر بصورة طبيعية فهل هناك من طريق لتثبيت الاحجام مهما إختلف ريزوليشن الشاشة .

النقطة الثانية هل ممكن عمل قائمة مختصرة كما هو الحال فى أوفيس (ملف - تحرير - إدراج ..) أم ترى أنه لاداعى لها لعدم وجود مايستدعى وجودها ؟ يهمنى رأيك.

خالص تحياتى وأرجو ألا تكون قد أغلقت الموضوع

mahmoudawad90@yahoo.com للتواصل إن أحببت ذلك

[محمد ايمن]

اخي محمود السلام عليكم و رحمة الله و بركانه

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

Me.InsideHeight=7500

me.InsideWidth=4000

حيث InsideHeight ارتفاع النموذج

و insidewidht عرض النموذج

قم بتغيير الارقام الى ما يناسب حاجتك

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

http://www.officena....l=&fromsearch=1

و للحديث تتمة إن شاء الله

[محمود بن عوض]

أخى الكريم ... مساك الله بالخير

شكراً على ردك ولكن سقط سهواً " أين أضع الكود وكم يمثل الرقم 7500 أو 4000 بالسنتيمتر أو المللى متر"

وهل هذا الكود يُحجم حجم النموذج كإطار خارجى أم يحافظ على حجم عرض العناصر وخانات البيانات بالداخل " أى يقوم بعمل إستريتش لحجم البيانات الداخلية حسب الحجم الخارجى ؟"

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

أتركك فى رعاية الله وأمنه

[محمد ايمن]

اخي الكريم

يتم وضع الكود عند تحميل النموذج

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

و للحديث تتمة إن شاء الله

[محمود بن عوض]

أخى محمد ........... السلام عليكم ورحمة الله وبركاته

لا زلت فى حاجة إلى خبرتك فى إتمام هذا العمل وهذه المرة أعرض عليك أمرين

الاول: أنه تلاحظ عند الضغط على زر أمر وبعد تنفيذ الأمر تبقى علامة الإشارة على مكان الزر عبارة عن حلقة من النقط حول الزر لا تختفى إلا بالإنتقال للضعغط على زر آخر فهل من طريقة لعلاج ذلك

الثانى : أنا فى حاجة لعمل نموذج إفتتاحى يطالب بكلمة سر للدخول على البرنامج فما هو الكود المطلوب لذلك " لا اريد أن أنفذه بالطريقة العادية من أمر الامان بقائمة الادوات من شريط المهام "

نقط.rar

[محمد ايمن]

اخي محمود اطلب منك امهالي بعض الوقت

لان جهازي في الصيانة و جميع ملفاتي عليه

و للحديث تتمة إن شاء الله

[محمود بن عوض]

شكر الله لك أخى الكريم

وأنا فى إنتظارك تاركاً إياك فى رعاية الله وأمنه

[محمد ايمن]

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

اخي محمود بالنسبة الى مشكلة النقط للاسف لا حل لها

اما بالنسبة الى تسجيل الدخول فتفضل المرفق

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

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

تستطيع  من حسابات المستخدمين اضافة او حذف مستخدمين

MAWAD13.rar

[محمود بن عوض]

أخى الكريم : عودُُ حميد

أشكرك على المرفق ولكن كما تعودت منك فأنا أحتاج لشرح الطريقة والكود حتى يمكننى إستخدامه بنفسى شاكراً لك فضلك

والى الملتقى

[محمد ايمن]

اخي محمود

الخطوات هي كالتالي :

اولا انشاء نموذج لتسجيل الدخول يحتوي على حقلين ( اسم المستخدم - و كلمة المرور ) وهو النموذج ( login )

بعد ادخال اسم المستخدم و كلمة المرور يتم التحقق منهما بواسطة النموذج ( useraccount )

اذا كان اسم المستخدم و كلمة المرور صحيحة يتم تشغيل النموذج ( main )

اذا لم يكن اسم المستخدم و كلمة المرور صحيحة يتم الخروج من البرنامج

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

[محمود بن عوض]

شكر الله لك أخى الكريم

ومتواصل معك بمشيئة الله ولكن معذرة سأعود بك للخلف قليلاً

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

أما النقطة الثانية فهى أنى حاولت تجربة كود الإفادة بأن هذا الرقم غير موجود عند فتح نموذج بيان فاتورة بعد أن نجحت فى تطبيقه على نماذج أخرى لم يفلح ذلك ويفتح النموذج بدون بيانات إذا كان رقم الفاتورة غير صحيح ( أقصد هذا الكود )

If IsNull(Me.Code) Then

MsgBox "رقم الصنف غير صحيح , أدخل رقما آخر", vbCritical

DoCmd.CancelEvent

End If

فى إنتظار إفادتك بمشيئة الله

[محمد ايمن]

اخي الكريم

بالنسبة الى النقطة الأولى فالنموذج لا يقبل تكرار الفواتير

جرب مايلي:

ادخل فاتورة برقم معين و قم باصدراها

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

ادخل التاريخ و ستظهر رسالة تفيدك بالتكرار

اما النقطة الثانية فالسبب هو اسم الحقل

لا حظ الكود

if isnull(me.code)then

الحقل هنا هو code

و هو في نموذج بيان فاتورة هو Invoic_No

و بالتالي يصبح الكود

if isnull(me.invoice_no)then

قم بالتعديل ووافيني بالنتيجة

و للحديث تتمة إن شاء الله

[محمود بن عوض]

أخى الكريم ......... السلام عليكم ورحمة الله وبركاته

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

أما الإستفسار الثانى فأنا فعلاً قبل أن الجأ إليك وضعت الكود فى حدث عند الفتح وغيرت إسم الخلية إلى Invoic_No ورغم ذلك لم تفلح ففكرت أن تكون القيمة الإفتراضية للحقل ( صفر ) هى السبب فغير خاصية الخلية فى تصميم الجدول إلى فارغة ولكن أيضاً دون جدوى.

أرجو أن أكون وصلت لك المعلومة مع خالص تقديرى

invoic.rar

[محمد ايمن]

اخي الكريم

بالنسبة الى الطلب الأول اذا كنت ترغب بتغيير الرسالة و اجراء تعديلات

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

اما بالنسبة الى الطلب الثاني

انظر المرفق فقد تم التعديل

MAWAD14.rar

[محمود بن عوض]

أخى الكريم ...... السلام عليكم

أشكرك على الرد رغم أنى لم أفهم علاقة رقم العميل بعدم تكرار الفاتورة فى الكود الذى وضعته ولكنه يفى بالغرض

ولكن بالنسبة للطلب الاول لا أعلم كيف يتم تطبيق ذلك ولكن هل يفيد نموذج فواتير العملاء الموجود فعلا فى ذلك ومدى إمكانية إستخدام دالة VLookup او DLookup

شكرا لك والى لقاء قريب بمشيئة الله

تم تعديل يونيو 11, 2012 بواسطه محمود بن عوض

[محمد ايمن]

اخي الكريم

الحقل رقم الفاتورة هو رقم

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

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

اما بالنسبة الى الطلب الأول ارجو ان تعطيني بعض الوقت

و للحديث تتمة إن شاء الله

[محمد ايمن]

أخي محمود

جرب المرفق ووافيني بالنتيجة

و للحديث تتمة إن شاء الله

MAWAD15.rar

[محمود بن عوض]

أخى الكريم ... السلام عليكم

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

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

وإلى اللقاء بمشيئة الله

[محمد ايمن]

اخي محمود هل لك ان توضح اكثر !!!!!

[الموسى1423]

ما شاء الله تبارك الله

دروس ذات فائدة بارك الله فيكم

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

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

وهذه المشكلة حدثت تقريبا في مرفق الرد (18) وبقيت المشكلة مستمرة إلى آخر رد

تم تعديل يونيو 17, 2012 بواسطه الموسى1423

[محمد ايمن]

كلامك صحيح اخي موسى فلم انتبه الى هذا الخطأ

وهذا هو المرفق بعد التعديل

MAWAD16.rar

[الموسى1423]

أسعد الله أوقاتكم بكل خير

ملاحظة على الجدول المسمى ( Purchases )

الذي فيما يبدو لي أنه يضيط عملية الوارد ( المشتريات ) فلماذا لا يسمح فيه بالتكرار لأن المشتريات حركة مستمرة مثل جدول المبيعات

والله الموفق

[محمد ايمن]

الجواب يكمن عند اخينا محمود

فللاسف انا لم افتح كافة الجداول و انظر بتصميمها

فربما يكون لاخينا محمود غاية من منع التكرار !!!!

[محمود بن عوض]

الأخوة الكرام .... السلام عليكم ورحمة الله

معذرة لغيابى فترة وذلك بسبب عطل الجهاز

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

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

أما بالنسبة لجدول المشتريات فشكر الله لك أخى على هذه الملاحظة فكنت إنشغلت بعمل خلفيات للنماذج وشاشات الدخول وتركت مراجعة الجدوال والتقارير للنهاية وهذا ما جعلنى أتعرض لأكثر من مطب وأطرح بعضها على أخى محمد الآن

عند نقل الأكواد من الملف الذى نعمل عليه بالمشاركة mawad إلى الملف الذى أجهزه فى صورته النهائية فبعضها لا يستجيب منها

1 - كود طباعة الفاتورة أو معاينة الفاتورة بالنموذج فكان الأخ محمد صممه لفتح التقرير invoice head على نفس رقم الفاتورة الموجود فى النموذج وبعد نقله لا يعمل وتظهر الرسالة القديمة مطالبة برقم الفاتورة" رغم أنه يعمل بكفاءة فى الملف الذى نتشارك عليه mawad"

2- كان كذلك كود تكرار رقم الفاتورة ولكن الحمدلله بعد محاولات إستطعت أن أنفذه

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

رد.rar

[محمد ايمن]

اخي محمود

تحية طيبة و بعد

بالنسبة الى موضوع الأكواد التي لا تعمل تأكد من تسمية الزر موافقة لتسمية الامر

مثلا الزر اسمه mawad وفي هذه الحالة يجب ان يكون الامر privae sub mawad

في كثير من الأحيان لا يتم وضع نفس الاسم و هذا ما يسبب مشاكل

ثانيا

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

تأكد من ( عند النقر = إجراء حدث )

اما بالنسبة الى تكرار الرسالة فسانظر في الموضوع

و للحديث تتمة إن شاء الله