الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

ثلاث مشاكل لوضع اللمسات الأخيرة لمشروعي

مغلق
بدأه unique_man_yemen في 4 نوفمبر 2005 · 2 رد · 648 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

الأخوة الأعزاء ..

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

وبقي اللمسات الأخيرة في هذا الفروم (ترونه في الصورة المرفقة)

03_11_05_01_20_21_1131052821eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee.gif

المشكلة الأولى:

عند فتح النموذج يقوم بعرض كل السجلات إلا أنني أريد أن أعمل فلتره لها بحيث لا يظهر لي السجل الذي يكون قيمته = 0 في الخانة المبينة في الصورة ؟؟؟؟؟

المشكلة الثانية:

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

المشكلة الثالثة:

كيف أستطيع أن أضع قيمة استعلام في متغير .. بمعنى آخر

لدي هذا الاستعلام مثلاً أريد أن أدخله في متغير

DoCmd.RunSQL "select sum([InNet])-sum([OunNet]) from E3tmadSlave"

حيث أن

InNet هو عمود في جدول يحتوي على المبالغ الموردة

OutNet أيضاً يحوي المبالغ المصروفة

والفارق بينهما يعطينا الرصيد

فإذا كان الرصيد أقل أو يساوي الصفر تظهر رسالة تنبيه للمستخدم

أيضاً يمكن أن أضع الرصيد في رسالة تنبيه في بداية عمل النظام

فكيف أضع هذا الاستعلام في متغير ثم أظهره في رسالة

آمل أن أكون قد شرحت المشاكل بوضوح ..

ولكم مني خالص التقدير.،،،،

:lol:

#2

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

اخى الكريم unique_man_yemen عيد سعيد ان شاء الله.

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

السؤال الاول:

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

الإجابة:

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

<>0

اسفل العمود الذى يحتوى الحقل Num(الذى به القيم 0) وذلك فى خانة (معايير). وهذا الكود يعنى اظهار كافة السجلات ماعدا التى ياخذ فيها الحقل Num القيمة صفر.

2- اذا كان النموذج مبنى على جدول عندها ستتبع الاتى :

أ- قم بفتح نافذة خصائص النموذج (من اعلى فى شريط القوائم او باضغط يمين فى اى مكان فاضى واختيار خصائص)

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

ج- قم باسقاط كل الحقول التى تحتاجها للنموذج من الجدول وذلك بالضغط عليها مرتتن وطبعا من ضمنهم الحقل Num محل المشكلة.

د- اسفل الحقل Num قم بوضع نفس الكود السابق بنفس الكيفية وذلك فى خانة معايير.

ه- قم باغلاق الاستعلام وسيسألك البرنامج هل اقوم بالحفظ؟ اختار نعم واغلق.

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

السؤال الثانى:

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

الإجابة:

نفتح صفحة الخصائص للحقل "البيان" وذلك بالضغط عليه بيمين الماوس واختيار (خصائص) ثم نفتح قائمة (بيانات) ونحتار منها (القيمة الافتراضية Defualt Value) ونكتب فيها هذا الكود

DLast("[البيان]";"Table1")

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

السؤال الثالث:

كيف أستطيع أن أضع قيمة استعلام في متغير ؟

الاجابة:

صراحة ليست عندى اجابة لهذا السؤال. فعلى حد معلوماتى المتواضعة المفروض ان الاستعلام يعود بعدد من السجلات (وان كانت حتى سجل واحد) وبالتالى لا يمكن وضع نتيجة استعلام فى مربع نص اى قيمة وحيده.

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

بفرض ان مربع النص (او المتغير) لديك اسمه A1.

قم بفتح صفحة الخصائص لهذا المربع A1 ومن تبويب (بيانات) اختار (مصدر التحكم) واكتب به هذا الكود

 =Nz(DSum("[InNet]";"E3tmadSlave"))-Nz(DSum("[OunNet]";"E3tmadSlave"))

وسيقوم هذا الكود بحساب الصيغة الرياضية التى تريدها تماما كالاستعلام.

واخيرا اخى الكريم اتمنى يكون الشرح واضح واكون قدرت اوصلك المعلومات اللى محتاجها.

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

أشهد أن لا إله إلا الله وأشهد أن محمدا رسول الله

bnr025.gif

مـــوقـــعـــى

#3

شكراً كثيراً ..

قيد التنفيد .................

هذا الموضوع مغلق.

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…