Dream_Works

أخي الكريم

أغتذر عن التأخير لوجود مشاغل لدي في هذه الأيام ...

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

و بما أنك مستعجل في الرد فأرجو رؤية هذه المحاولة

Copy__2__of_Edaree.zip

لك جزيل الشكر أخي الكريم

مجهود رائع .... الله يعطيك العافيه ...

أعتقد أن الحل المطلوب موجود في الرابط التالي:

رابط شرح المشكله من موقع مايكروسوفت

باختصار ... احتمال يجب عليك ضبط إعدادات اللغة في جهازك ل Non-Unicode Language حسب جهاز أخونا الكريم و عضو الشرف " محب العلم "

ملحوظة : يمكن ترجمة الصفحة الى اللغة العربية باستخدام الخاصية الموجودة في أعلى يمين الصفحة للترجمة

1 - في النموزج المسمي " بيانات الاصناف " تم عمل معادلات بحيث تضع هي سعر الجملة وسعر المستهلك تلقائيا وهي تعمل بطريقه جيده ولكن لماذا لا يتم اضافتها لجدول بيانات الاصناف بصوره تلقائية حيث انني يتوجب عليا كتابتها يدويا وقد قمت بكتابه سعر الجملة للتوضيح

أخي الكريم

سعر الجمله و سعر المستهلك هما قيمتين محسوبتين تعتمدان على سعر التكلفه ... بمعنى آخر ... إذا كان سعر التكلفة = 5 . فإن سعر الجملة و سعر المستهلك سيصبحان ثابتين و لا يمكن تغييرهما لأنه تمت حسبتهما على أساس سعر التكلفة

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

لذلك تم حذف حقول سعر الجملة و سعر المستهلك من الجدول و تم وضعهما في الاستعلام ... و سيتم دائما الاعتماد على الاستعلام عوضاً عن الجدول

2 -في النموزج " بيانات اوامر التوريد رئيسي " تم اضافة نموزج فرعي " تفاصيل اوامر التوريد تابع " ولكن المشكله انني اريد ان تظهر القيمة في النموزج الفرعي بناء علي نظام التسعير في النموزج الرئيسي فكيف لي بهذا

أعتقد أنه يجب وضع نظام التسعير في النموذج الفرعي لعمل ذلك ... حيث أن بيانات النموذج الفرعي تعتمد على جدولين و لا تشمل جدول بيانات العملاء التي يحتوي على نظام التسعير

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

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

دروس صوت و صورة

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

بالتوفيق

access.zip

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

Query is too complex

ملحوظة : يمكن عرض الموضوع بعدة لغات باستخدام خاصية الترجمة الموجودة في الجزء العلوي الأيسر من الصفحة

توجد عدة أوامر يمكن استخدامها بدلاً من Iff و منها Switch , Choose لذلك أرجو إرفاق ملفك لتبسيط كود الاستعلام

أخي الكريم

هناك بعض الأمور الغامضة في ملفك ..

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

ملحوظة : حقل المفتاح الرئيسي هي القيمة التي لا يمكن أبداً أن تتكرر في الجدول

2- ما هي البيانات المراد نقلها ( هل هي مواضيع الطرح و الجهه المعنية فقط ؟ )

3- هل يتم نقل البيانات على أساس أنك قد كتبت اسم الشهر في السجل الجديد ؟ ... ( أنا لا أعتقد ذلك و لكن سألت للتأكيد )

أرجو أن يكون هذا هو المطلوب ...

المشكلة : أنك تعتمد على الاستعلام للبحث و ذلك لا يسمح لك بإضافة بيانات جديدة ... لذلك اعتمدت على الفلتره بدل الاستعلام

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

____.zip

أخي الكريم

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

و قد أرفقت لك اثنين منهما

1- حل من الأستاذه القديره زهره العبدالله باستخدام الكود

2- حل مستمد من موقع أجنبي ... يعتمد على الاستعلام في إنشاء الترقيم التلقائي ... مع كود قليل للتأكد من تفعيل الاستعلام

____________.zip

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

أخي الكريم

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

يوجد حل أسهل بكثير من الذي كتبته

تضع في ال Conditional Formatting الخاص بالكمية المتبقيه

Field Value  , Less Than Or Equal , [الحد الأدنى]

الرجاء النظر في الملف المرفق

New_Microsoft_Office_Access_2003_Database.zip

أخي الكريم

حسب فهمي المتواضع ... يمكن دمج نتيجة الحقلين بحقل واحد عن طريق الاستعلام للتأكد منه

مثلاً بالاستعلام تنشئ حقل جديد

الحقل الجديد = القيمة الفعلية - الحد الأدني

تخفي الحقل الجديد في النموذج

و تضع ال Conditional Formatting

إذا كان الحقل الجديد > 0 يعني القيمة الفعلية للمنتج أكبر

إذا كان الحقل الجديد < 0 يعني القيمة الفعلية للمنتج أصغر من الحد الأدنى

أرجو أن يكون هذا هو المطلوب

أرجو أن أكون قد فهمتك بشكل صحيح الآن

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

الرجاء القيام بالخطوات التالية:

1- إنشاء استعلام جديد يحتوي عى جميع القيم المطلوبة ... ووضع قيمة Top Values بالعدد المطلوب عرضه لملئ نصف الصفحة حسب حجم النموذج ... ووضع ترتيبه تنازلي

2- اجعل البيانات في النموذج تؤخذ من الاستعلام

3- قم بتعديل الترتيب الموجود في النموذج باستخدام خاصية ( Order By ) للحقل الذي رتبته تنازليا بالاستعلام حتى تعيده تصاعدياً مرة أخرى

4- بعد عمل الإجراءات السابقة ستكون قد اختصرت الكود بشكل كبير حتى يصبح كالتالي :

Private Sub Form_AfterUpdate()
Me.Requery
End Sub

Private Sub Form_Load()
DoCmd.GoToRecord acDataForm, Me.Name, acNewRec
End Sub

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

New_Microsoft_Office_Access_2003_Database.rar

أرجو أن يكون هذا هو الحل المطلوب ... للأسف يصعُب علي تجربته

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

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

أخي الكريم

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

Private Sub Form_Load()
Const RecordsPerPage As Byte = 20
Dim DestinationRecord As Byte, RecordsCount As Byte

RecordsCount = DCount("*", Me.RecordSource)
If RecordsCount >= RecordsPerPage Then
DestinationRecord = 10
Else
DestinationRecord = RecordsCount / 2
End If
DoCmd.GoToRecord acDataForm, Me.Name, acGoTo, DestinationRecord
End Sub

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

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

تصفير الترقيم التلقائي كل سنة

أرجو رؤية الروابط التالية

ترقيم تلقائي - إعادة الترقيم سنويًا لكل قضية

ترقيم جديد كل سنة جديدة, عمل ترقيم متسلسل سنويا يبدأ من 1 كل سنة جديدة

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

للأسف لم أفهم ما هو المطلوب بالضبط و لكن حسب اعتقادي و فهمي المتواضع يمكن عمل هذه النقطة باستخدام ال Conditional Formatting

3- ارسال تقرير بريدي لاكثر من شخص في وقت واحد

أرجو أن يفيدك الرابط التالي حول هذا الموضوع

إرسال إيميل بالأكسيس

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

الله يعطيك العافية .... موضوع رائع و شرح ممتاز ...

الله يعطيك العافية ...

هالمشكلة كانت ذابحتني من زمان ...

أعتقد أن دروس المالتي ميديا مفيدة

1- Total Training

2- VTC

يمكنك إيجاد بعض السيديهات من سوق الكمبيوتر أو سحبها بالتورنت

أنا بالدوام عندي أوفيس 2007 ... يمكنك إضافة الزر بدون مشاكل .... و أعتقد أن نفس الكلام ممكن ينطبق على ال 2003

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

قسم الحماية و الأمان

شوف هالموقع احتمال ينفعك .....

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

MDE to MDB

الله يعطيك العافية أخوي .... شرح رائع ...

الله يعطيك العافيه ... مجهود متعوب عليه بالفعل ...

هو بالفعل عمل يحتاج إلى مجهود ضخم ... بارك الله فيك ...

الله يعينك عليه و يجزيك عليه ....

هذا الملف به كود للتحكم بعدد السطور التي تُطبع في الصفحة الواحدة

db1.zip