الاكسيس حول العالم...

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

اخي ايهاب عثمان

بارك الله فيك وفي جهودك بالمنتدى ومشاركاتك القيمه

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

اقتباس

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

هل يوجد عقل محسوب :blink: :lol:

وايضا ما هي " الحالة الزواجية " :lol: :D

انا اول مره اسمع عنها :)

الاخ الكريم Pc Teacher بارك الله فيك وحفظك

ــــــــــــــــــــــــــــــــــــ

الاستاذة الفاضلة "زهرة" بارك الله فيك واضحك سنك :D

أولا : احمد الله انني كتبت اجابتي بالموقع الاجنبي باللغة الانجليزية والا كانوا طردوني من الموقع لانها اول مشاركة لي هناك.

ثانياً : العقل المحسوب (الا تعرفينه؟؟) انه موجود بالاستعلامات وكان يسمى في الماضي "الحقل المحسوب" وقد تغيرت التسمية مؤخرا بسبب كثبان من الاتربة تعلو لوحة المفاتيح الخاصة بي تفقدني التمييز بين الحروف ، ولا تخلو جميع مشاركاتي من مثل هذه الاخطاء بسبب المرض المزمن بلوحة المفاتيح . :blink:

رابعاً : "الحالة الزواجية" هي الحالة الاجتماعية Maretal Status - وقد ترجمتها هكذا لتتمشى مع الاجابات التي وضعها السائل (نعم - لا ...الخ)

وهو اجتهاد مني.

خامساً: ارجو ان تتحملوا المزيد من الاخطاء دون ان يتسلل اليكم الشك في مستوى تعليمي :D

لان حالة لوعة المفاتيح (عفواً لوحة المفاتيح) تزداد سوءاً.

ــــــــــــــــــــــــــــــــــــــــــــــ

احبائي القاكم قريباً ان شاء الله.

بارك الله فيك ياأخ أيهــــــــــــاب

هل ممن الممكن أعطاءنا رابط هذا الموقع للأستفادة

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

مع الشكر

=============================

آهٍ آهٍ من قلة الزاد وبعـــــــــد السفر ووحشــــــــة الطريق

اخي الكريم ابو منتظر..

بارك الله فيك

رابط الموقع موجود بالمشاركة الاولى...

وان شاء الله اوافيكم بالمزيد

شكراً لك أخي الكريم

عهدناك منهلاّ معطاء لكل معضلةٍ أكسسيّة

أبو منتظـــــــــــــر

============================

آهٍ آهٍ من قلة الزاد وبعـــــــــد السفر ووحشــــــــة الطريق

اخي الكريم ابو منتظر بارك الله فيك واكرمك كرامة الدارين....

ـــــــــــــــــــــــــــــــــــ

احبائي اليوم اعود لكم بترجمة فقرة من كتاب Access2002 Bible الشهير - الفصل 25 - صفحات 797 الى 799

ـــــــــــــــــــــــــــــــ

رجاء....

سوف اضع النص الاجنبي تليه الترجمة..(بشيء من التصرف)

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

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

ــــــــــــــــــــــــــــــــــــــــــــ

تمهيد....

موضوعنا اليوم حول استعلامات التوحيد Union Queries وهو نوع من ضمن ثلاثة انواع من الاستعلامات تسمى الاستعلامات الخاصة ب SQL او

SQL - Specific Queries. وهي التي لايمكنك تصميمها الا من خلال لغة SQL - بخلاف بقية انواع الاستعلامات التي يمكن تصميمها من خلال طريقة العرض "تصميم" الموجودة داخل الاكسيس او ما كانت تسمى من قبل شبكة QBE

وهذه الانواع هي :

1- استعلامات التوحيد Union Queries

2- الاستعلامات التمريرية Pass Through Queries

3- استعلامات تعريف البيانات Data Definition Queries

وقد اخترت النوع الاول لكونه الاكثر استخداما ونفعا لمستخدم او مبرمج الاكسيس.

ـــــــــــــــــــــــــــــــــــــــــــــــــــــــ

النص الاجنبي....

]

ــــــــــــــــــــــــــــــــــــــــــــــــــــــــ

الترجمة....

استعلامات التوحيد تمكنك من التجميع السريع لحقول من جداول / استعلامات متعددة في حقل واحد ، وصفحة البيانات الناتجة عن استعلام التوحيد غير قابلة للتعديل.

افترض ان لديك جدولين : العملاء (24 حقل) والعملاء الجدد (9 حقول) وقد قررت دمج سجلات الجدولين معا عن طريق انشاء استعلام توحيد والشكل 25-15 يعرض استعلام التوحيد الذي ينتج اسم العميل / رقم العميل / المدينة /الولاية ... واالترتيب حسب رقم العميل.

لانشاء هذا الاستعلام اتبع الخطوات التالية :

1- انشئ استعلاما جديدا بدون جداول وذلك باغلاق صندوق حوار "عرض الجداول" دون ان تختار شيئا منه.

2- من قائمة تصميم الاستعلام من شريط قوائم تصميم استعلام اختر (استعلام ـــ> خاص ب SQL ـــ> توحيد ستفتح نافذة SQL وهي التي تستخدم في كتابة استعلام التوحيد الذي تريد انشاءه.

3- في السطر الاول من النافذة اكتب ما يلي :

Select [customer Name],[Customer Number],[city],[state] From Customer

4- اضغط Enter للانتقال الى السطر التالي في النافذة

5- اكتب في السطر الثاني من النافذة مايلي :

Union Select [customer Name],[Customer Number],[city],[state] From New Customer

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

6- اضغط Enter للانتقال الى السطر التالي في النافذة

7- اكتب في السطر الثالث ما يلي :

Order By [Customer Number];

مع ملاحظة انهاء هذه العبارة بفاصلة منقوطة

استعلامك سيكون مشابها للمعروض بالشكل 25-15

]

شكل 25-15 - استعلام توحيد يجمع محتويات حقول في جدولين مختلفين لاظهارهما معاً كصفحة بيانات واحدة

لاحظ....استعلام التوحيد يشمل اثنان او اكثر من عبارات SQL Select كل منها يتطلب نفس عدد الحقول بنفس الترتيب.

عند تشغيل هذا الاستعلام تظهر لك صفحة بيانات كما بالشكل 25-16 - لبيانات الجدولين بترتيب رقم العميل.

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

"جورج جرنج" و"جورج جرين" نفس الشئ بالنسبة لسجلات اخرى في هذه الصفحة.

لاحظ..... صفحة البيانات الخاصة باستعلام التوحيد لاتقبل التعديل .

]

شكل 25-16 - صفحة البيانات الناتجة عن استعلام التوحيد المعروض بالشكل السابق

صفحة البيانات الناتجة عن تضغط عدد الحقول الى 32 بعد دمج 24 حقلا من جدول العملاء مع 9 من جدول العملاء الجدد .

احد الحقول يبانه مفقود لا بد انه حقل مزدوج (موجود مكررا في كلا الجدولين).فعند استخدامك لكلمة Union في استعلام التوحيد فانها تنسخ فقط تلك السجلات غير المكررة عند ربط الجداول معا .

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

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

واذا اردت مشاهدة كافة الحقول بمافيه المكرر فما عليك سوى كتابة عبارة Union بالصورة التالية:

Union All Select [customer Name],[Customer Number],[city],[state] From New Customer

ـــــــــــــــــــــــــــــــــــــــــــــــــ

تمت بحمد الله...

تحياتي لكم.. :rolleyes:

والى لقاء قريب مع فقرة او موضوع من هنا اوهناك

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

يوجد نداخل بين اللون عندما وضعته في المشاركه وكود توحيد الكل Union All

Union All Select [customer Name],[Customer Number],[city],[state] From New Customer

لذا لزم التنويه

الاخ ايهاب

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

اخوك ابو عبدالله

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

الاخ الكريم ....Enjoy بارك الله فيك

Enjoy كتب:

الاخ ايهاب

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

اخوك ابو عبدالله

بل هتيئا لي صحبتكم الطيبة...

الاخوة الكرام مرحبا بكم ...

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

Automating Microsoft® Access with VBA

By Susan Sales Harkins, Mike Gunderloy

والفقرة مأخوذة من الفصل السادس ص 94

وهي تتعرض لاحى العبارات الشرطية والمسماة Select Case وهي تقوم بنفس مهمة عبارة IF الشهيرة ولكن بصورة مبسطة خاصة عند تعدد الحالات الشرطية

وكالمعتاد ساعرض النص الاجنبي - ارجو قراءته كالعادة - تليه الترجمة.

ثم بعض التوضيحات خارج الترجمة...

ـــــــــــــــــــــــــــــــــــــــــــ

النص الاجنبي..

]

ـــــــــــــــــــــــــــــــــــــــــــــ

الترجمة..

تكون عبارة If مرهقة في القراءة والفهم اذا كانت تحتوي على الكثير من جمل ElseIf ولتبسط الكود - عند انشاء نفس الهيكل- نستخدم عبارة Select Case بدلا من عبارة If .

ونفس الكود المستخدمة في كتابته عبارة If يمكن ان يكتب بعبارة Select Case يمكن ان يكتب هكذا

Function GetDayName(dtmDayToCheck) As String

تحديد اسم اليوم لتاريخ محدد.

  Select Case DatePart("w", dtmDayToCheck)

	Case 1

	  GetDayName = "Sunday"

	Case 2

	  GetDayName = "Monday"

	Case 3

	  GetDayName = "Tuesday"

	Case 4

	  GetDayName = "Wednesday"

	Case 5

	  GetDayName = "Thursday"

	Case 6

	  GetDayName = "Friday"

	Case Else

	  GetDayName = "Saturday"

  End Select

End Function

عند استخدام بنية Select Case فانك تضع تعبيرا ينشئ قيمة في عبارة Select Case ذاتها.وهنا يمكنك التعامل مع اي عدد من الحلات (عبارات Case)

بداخل كل منه قيمة..

يقوم VBA بالمطابقة بين قيمة الحالة ونتيجة التعبير فان حدث تطابق يتم تنفيذ عبارة Select Case فوراً ومن ثم انهاء الكود عند الحالة التابلية او عند عبارة النهاية

End Select

لاحظ....يمكنك استخدام Case Else لمطابقة اي حالة لم يكن لها وجود في ما سبق.

تلميح.....

يفضل انهاء عبارة Select Case بالجملة Case Else بتلك الطريقة تقوم عبارة Slect Case بالتنبيه في حالة الخطأ او عدم التطابق .

وهذا المدخل مناسب لتجنب اخطاء البيانات واخطاء وقت التنفيذ.

ــــــــــــــــــــــــــــــــــــــــــــــــ

توضيح اضافي..

سوف نتعرض بمزيد من التوضيح للكود المذكور اعلاه.

الكود هو عبارة عن دالة وظيفتها ايجاد اسم اليوم لتاريخ محدد فاذا اعطيتها تاريخ 22/6/2006 كان الناتج هو الخميس000وهكذا

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

السطر الاول ...اسم الدالة ومعاملاتها ونوعها

اسم الدالة: GetDayName

المعامل: dtdaytocheck

النوع: سلسلة حرفية

السطر الثاني : عبارة توضيحية مسبوقة بالرمز ' دلالة على ان ما بعده ليس من صلب الدالة وانما لكتابة اي شئ للتوضيح وكان المكتوب هو شرح مختصر لوظيفة هذه الدالة.

السطر الثالث ...عبارة Select Case وتحديد ارتباطها بالدالة DatePart - للمعامل W وهي دالة VBA تنتج جزء من التاريخ والمعامل هو الذي يحدد هذا الجزء - المعامل W مختص برقم اليوم وقيمه تتراوح بين 1 و 7 للايام من الاحد الى السبت على الترتيب.

والدالة مكتوبة كمايلي :

]

ويمكن الاستعاضة عنها بالدالة WeekDay كما يلي.

WeekDay(dtmDayToCheck)

الاسطر من الرابع حتى السابع عشر ...لفحص التواريخ المراد معرفة ايامها والمشار اليها بالمعامل dtmDayToCheck

وتكون كما يلي ..

اذا كانت الحالة (رقم اليوم) = 1 فان القيمة تكون الاحد

وهكذا...

حتى الحالة = 6 فان القيمة = الجمعة

واذا لم يكن شيئا مما سبق (Else If) فان القيمة هي ..السبت -الحالة لا بد ان تكون 7 -

ـــــــــــــــــــــــــــــــــ

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

Function GetDayName(dtmDayToCheck As Date) As String

ــــــــــــــــــــــــــــــــــــــــــــ

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

تحياتي لكم والى لقاء.

الاخ الفاضل ايهاب عثمان

شكراً علي الاستجابة وتقديم دائماً ما هو أفضل

ولكن الامر عندي معقد بعض الشيء أنني أريد أعمل استعلام توحيد ليس لجدولين بل لثلاثة جداول بينهم علاقات وتجميعات وحسابات داخل شبكة QBE

ولكن عندما أحاول عمل الاستعلام دائما أفشل

هناك سؤال مهم ؟؟

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

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

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

حقل بة تاريخ الاصناف المنصرفة

وحقل بة أرقام فواتير البيع

وحقل به فواتير الشراء

علي أن يحتوي في الاستعلام علي حقل محسوب

وليكن كمية - كمية اخري ليستخرج الرصيد

واريد أن أعمل توحيد بين الحقول المذكورة أعلاه

أتمني أن لا أكون قد عقد المسأله عليك

الاستاذ ايهاب ...............ماشاء الله على المعلومات ونرجو ان يزيدك الله علما

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

وشكرا

جزاك الله خير

أخي الفاضل

على المعلومات

جعلها الله في ميزان حسناتك

تحياتي

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

موضوع اكثر من رائع جزاك الله كل خير واثابك وزاد فى علمك

السلام عليكم

أخونا الفاضل / إيهاب .. شكرا لك

موضوع مميز .. يحتاج المتابعة .. و كمان التجديد ..

بالتوفيق للجميع

جزاك الله كل خير أخى إيهاب

وكل عام وأنتم بخير

أخي الغالي الاستاذ / ايهاب عثمان

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

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

أخيك / كمال النحال