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

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

مغلق
بدأه vb_access2002 في 6 نوفمبر 2002 · 16 رد · 1,205 مشاهدة · في مراجعة المواضيع
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

بسم الله

ان شاءالله تقبل الله صيامنا

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

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

الجدول: هذا هو صور له

http://vbaccess.7p.com/cgi-bin/i/Table.jpg

و الفورم بهذا الشكل

http://vbaccess.7p.com/cgi-bin/i/Form.jpg

و ايضا فيها فورمين الاخريين:

keybord لادخال و اضافة انواع كيبورد

UPS لادخال و اضافة سعر و انواع UPS

بهذا الشكل

http://vbaccess.7p.com/cgi-bin/i/formkeybord.jpg

مشكلتي هو:

عندما انواع كيبورد خمسة انواع و انواع اشياء اخرى مثل UPS و HArd .. اقل من خمسة تظهر الفورم بهذا الشكل:

http://vbaccess.7p.com/cgi-bin/i/prolem.jpg

لا اريد هذا؟؟؟ في شكل تظهر المشكلة؟؟

و ايضا اريد تقرير لهذا البرنامج؟؟؟

و هذا هو رابط للبرنامج

http://vbaccess.7p.com/Computer.mdb

بس لا تقولون لي الرابط لا يعمل لانه ان اعاني ازمات نفسية في هذا الموضوع ؟؟ اذا تقول لماذا؟؟ انظر الى هذا المشاركة لي؟؟

http://www.arabteam2000.com/vb/showthread....&threadid=15126

#2

اولا الرابط لايعمل

ثانيا غير موقعك الظاهر أن فيه مشاكل

وإذا أردت وضع مثال فأرفقه مع الرد وهذا سهل جداً

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

ولك تحياتي

#3

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

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

#4

شكرا لكم استاذي ابو حمود, و استاذي محمد طاهر

سأغير الموقع بس ما هي الموقع جيد و لست فيها مشاكل في هذا النوع؟؟؟؟

بس اين هو جواب السؤالي؟؟؟

#5

جرب

www.brinkster.com

أو أرفق الملف مع الرد مباشرة

بدون مواقع

#6

هذا هو الملف

اجوا جوابا سريعا في حل مشكلتي؟؟؟

computer.zip

#7

فى خانة ال criteria ضع صيغة >"o"

شكراً

#8

اذا شفت الملف لن تقول هذا يا اخي العزيز

لانه الملف لست فيها استعلامات حتى تكتب هذا؟؟؟؟

ارجو لكم حل السريع:'(

#9

من خصائص الكومبو بوكس

اختار

Row Source

ثم اضغط علي ال 3 نقاط يمين صندوق الحوار

فيظهر لك معالج الاستعلامات

فضع تحت ال UPS شرط فى خانة المعايير هو

is not null

و هذا هو ما قصده أخونا فى رده السابق

ثم أغلق المعالج

و سيسألك هل تريد حفظ التغيير فى الجملة

فاجب بنعم

و لا تحاول الحفظ قبل الاغلاق و لكن أغلق و دعه يسأل

#10

شكرا لك استاذي محمد طاهر على هذا الرد لقد نجحت

و هذا بشأن الفورم لكن في موضوع جمع كل حقل عندي المشكلة لانه الحقول في فورم لست تكست بل انه list ؟؟

حاول مرات لكنلن تنجح في جمع الحقول؟؟

و ايضا جمع في تقرير؟؟؟

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

computer.zip

#11

يامشرفين .. يا خبراء اكسس .. ارجوا جواب لسؤالي حول جمع الاسعار اشياء الذي في ملف مرفق؟؟

#12

:(

#13

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

و لكن ما يحدث فى مثالك هو فلتر علي المصدر بياناته يظهر الرقم و لكن فى هذه الحالة لا يعامل علي أنه تم اختياره

فأعتقد أنه من الأفضل تحويل السعر الي مربع نص

ثم ارسال القيمة المناسبة اليه باستخدام الدالة

Dloockup

من حدث بعد التحديث لكومبو الصنف

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

و لكن مايظهر هو نتيجة الفلتر علي مصدر بيانات الصف فقط

أما اذا كنت تريد الجمع كما هي فعليك بالآتي :

أولا أزل مصدر بيانات القائمة الاولي

ثانيا أضف مربع نص اسمه mm فى تذييل الفورم

أضف زر أمر لنفيذ الجمع

و هذا مثال علي الكود لجمع الكيبورد و ال case فقط

و ما فيه هو كود لمحاكاة أن اخترت القيمة فى القائمة

computer.zip

#14

شكرا شكرا شكرا لك استاذي محمد

لقد جمع اثنين (كيبورد, كيس) لكن انا اضفت اجزاء اخرى لن تجمع؟؟؟:(

بس استاذي العزيز List فيها كثير من التعب ؟؟ هل طريق استخدام Dlookup سهلا؟؟ اذا كان سهلا انا اشكرك جدا اذا ااشردني لاستعامله؟؟؟

(f)

#15

لقد اضفت الكود الخاص باثنين فقط كمثال

أكمل الباقي بنفس الطريقة

بالنسبة لل Dlookup

هي دالة جاهزة تستدعي قيمة معينة من حقل معين تحت شرط معين

و صيغتها كالتالي

في حالة حقل الشرط رقمي
DLookUp("[FieldName]","TableName","[FieldName] = " & [Forms]![MainFormName]![SubFormName]![FieldName])

فى حالة حقل الشرط نصي
DLookUp("[FieldName]","TableName","[FieldName] = '" & [Forms]![MainFormName]![SubFormName]![FieldName] & "'")

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

فأرجو مراجعتها

#16

شكرا لك يا استاذي

سأحاول في هذا الطريقة

لقد تعبتكم كثيرا ؟؟ (f)

#17

أبدا ما في مشكلة

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

فان كان هناك مشكلة أخبرنا

سواء فى تطبيق المثال علي باقي الأجزاء أو فى استخدام

الدالة

بعد أن تحاول أولا طبعا ;)

بالنسبة للمثال الذي وضعته لجمع الاثنين

ما أضفته من كود فى المثال أعلاه هو كالتالي

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

فأضفت كود يضيف أن يجعل السعر هو المفعل setfocus

بعدها لم يسجل بعد أنه تم اختيار السعر لتستطيع جمعه

ولذلك أرسلت أمر send keys و هو يحل محل الفعل الذي تقوم به فكأنك اخترت السعر أو ضغطت enter

فكرر ذلك لباقي الاصناف

ثم أضفها لمعادلة الجمع الموجودة فى الزر

بالطبع هذا ليس نمطيا و لكن اكماله مفيد

و الحل الآخر الخاص بالدالة ، جربه أولا فان كان هناك مشكلة فلا تتردد فى نشرها

:)

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

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

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

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

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

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