المدخل إلى فيجوال بيسيك 2005و 2008 (الموضوع متجدد ويتبع )


مجلس برامج الكمبيوتر و الأنترنت كل مايخص الكمبيوتر والأنترنت من معلومات واخبار و برامجها

 
قديم 04-02-2008, 01:55 AM
  #11
محمد المعمري
مراقب سابق
 الصورة الرمزية محمد المعمري
تاريخ التسجيل: Oct 2007
الدولة: المنطقه الجنوبيه
المشاركات: 2,124
محمد المعمري has a reputation beyond reputeمحمد المعمري has a reputation beyond reputeمحمد المعمري has a reputation beyond reputeمحمد المعمري has a reputation beyond reputeمحمد المعمري has a reputation beyond reputeمحمد المعمري has a reputation beyond reputeمحمد المعمري has a reputation beyond reputeمحمد المعمري has a reputation beyond reputeمحمد المعمري has a reputation beyond reputeمحمد المعمري has a reputation beyond reputeمحمد المعمري has a reputation beyond repute
Read رد : المدخل إلى فيجوال بيسيك 2005و 2008 (الموضوع متجدد ويتبع )

part3-إنشاء الإستعلام Query باستخدام عبارات SQL



1-إنشاء جملة أو عبارة الإدخال Insert

-قم بفتح قاعدة البيانات التى أنشأنها فى الجزء الاول من الموضوع
-اضغط على Query أو استعلام أو انشاء استعلام طبقا لإصدار أوفيس الذى تستخدمة
-قم باختيار وضع التصميم يعنى عرض التصميم وليس معالج إنشاء استعلام
-قم بإغلاق نافذة عرض الجداول أو Show Table

سنقوم الان بانشاء الاستعلام بدلالة
ProjectIDو ProjectNameو ProjectDescriptionو SequenceNumberو LastUpdateDate
إذهب إلى View أو عرض ثم اختر عرض SQL او SQL View ويمكن ذلك عن طريق عمل كليك يمين بالماوس ثم اختيارها من القائمة أو فى شريط القوائم
سنقوم الان بكتابة صيغة الاستعلام وهى


كود:
INSERT INTO Projects
كود:

(ProjectID, ProjectName, ProjectDescription, SequenceNumber, LastUpdateDate)
VALUES (@ProjectID, @ProjectName, @ProjectDescription, @SequenceNumber,
Date()+Time());

نلاحظ التالى


Insert into Projects ومعنى ذلك أننا سنتعامل مع الجدول Projects ومعنى العبارة قم بعمل إدخال إلى الجدول Projects


ماهو الذى سنقوم بإدخالة إلى الجدول Projects ؟

سنقوم بإدخال القيم التالية

VALUES (@ProjectID, @ProjectName, @ProjectDescription, @SequenceNumber,
Date()+Time());
القيم المذكورة على الترتيب
ولكن أين سنقوم بوضع هذة القيم؟
سنقوم بوضعها فى الحقول التالية على الترتيب
(ProjectID, ProjectName, ProjectDescription, SequenceNumber, LastUpdateDate)
بعد أن قمنا بكتابة صيغة الاستعلام يمكننا مشاهدتة عن طريق View ثم Design View
قم الان بعمل حفظ ستظهر لك رسالة تفيد باختيار اسم للاستعلام قم بحفظها باسم usp_InsertProject
و usp هذة هى اختصار للجملة user stored procedure وهذة التسمية ضرورية طالما أننا سنتعامل من خلال الفيجوال 2005

لكى نتأكد الان من صحة العمل
قم بالذهاب إلى View ثم اختر Datasheet View ستظهر لك نافذة تطلب منك إدخال ProjectID ثم بالضغط على ok سيطلب منك القيمة التالية ProjectName وفى النهاية سيقوم بإدراج التاريخ والوقت الحالى
تلقائيا دون أن يطلب منك ذلك
لكنة يبقى هناك سؤال مهم
ماذا سنكتب فى خانة ProjectID ؟
إذا نظرنا نظرة سريعة على الدرس الأول فى موضوع التعامل مع قواعد البيانات فإننا سنجد أننا قمنا بجعل محتوى الحقول GroupID و ProjectID و GroupProjectID رقم وأن من خصائص هذا الحقل أن طولة =
Replication ID ومعنى هذة الجملة Replication ID بصورة دقيقة تم توليدة أو إنشاؤة و ليس معناة مستنسخ فقد كنت مخطئا عندما عبرت عنة بأنة مستنسخ لأن هناك شرط فى عملية الاستنساخ وهو وجود الشىء
الذى سيتم النسخ منة ووجود النسخة الناشئة عن عملية النسخ وهذا الشرط لن يكون متوفرا فيكون المعنى هو مولد أو منشاء بضم الميم
ماهو هذا الرقم الذى سيتم وضعة ومن أين نأتى بة؟
سنقوم نحن بتوليد هذا الرقم وهو رقم تعريف أو رقم هوية ولة مواصفات خاصة يتم الحصول عليها من خلال الويندوز وهو رقم تجدونة كثيرا من ضمن الأرقام الخاصة ببعض قيم الرجيسترى المعرفة بل هو نفسة وهو بالتحديد رقم
Identities لذلك يتم اختصارة إلى ID إذن Identities هى تعريف أو دليل
-إن أرقام ID التى هى Identities تتكون من 32 رقم مقسمة إلى أربع مجموعات بين كل مجموعة ومجموعة يوجد فاصل وتحتوى على أرقام وحروف كبيرة Capital
3 مجموعات منها تتكون من أربعة رموز ومجموعة واحدة تتكون من 8 رموز ومجموعة أخيرة تتكون من 12 رمز مثل هذا
5D486569-90CA-434E-9FFD-EE5DABA81223
ويتم انشاؤها عشوائيا بدون ترابط بين الرقم السابق والرقم الحالى والرقم القادم
ولكن هناك خطاء نقوم دائما بارتكابة وبإصرار غريب وهو أننا نطلق علية لفظ رقم فكما رأينا هو ليس رقم فهو يحتوى على حروف وأرقام وهناك أيضا فواصل إذن هو ليس رقم إنة ID
كيف نقوم بعمل هذا ID ؟
-قم بفتح مشروع جديد ثم قم بإدراج TextBox وButton
-قم بوضعهما بشكل مناسب مثل هذا

قم بوضع الكود التالى فى TextBox1

كود:
TextBox1.Text = Guid.NewGuid.ToString.ToUpper()قم بوضع الكود التالى فى Button1

كود:
Clipboard.SetText(TextBox1.Text)قم الان بتجربتة لتوليد ID عشوائى
فى الكود الأول الخاص بمربع النص قمنا بإضافة ToUpper من أجل تحويل الحروف الصغيرة إلى حروف كبيرة
الكود الثانى معناه قم بإرسال الناتج إلى Clip Board ويمكنكم التأكد من ذلك بعد أن تضغط على الزر إنشاء بأن تقوم بعمل لصق Past داخل أى ملف نص لتجد ID الذى تم انشاؤة قد تم نسخة داخل ملف النص دون
الحاجة لأن تقوم بعمل Copy نسخ
2- إنشاء عبارة الاختيار Select..

نقوم الان بإنشاء استعلام Query بنفس الطريقة السابقة
قم بتغيير العرض إلى SQL View ثم اكتب الصيغة التالية

كود:
SELECT ProjectID, ProjectName, ProjectDescription, SequenceNumber, LastUpdateDateDate


كود:

FROM Projects
ORDER BY SequenceNumber;والمعنى واضح قم باختيار الحقول ProjectID, ProjectName, ProjectDescription, SequenceNumber, LastUpdateDateDate


من الجدول Projects


ثم قم بترتيبها ترتيبا تصاعديا إعتمادا على SequenceNumber

يعنى السجل الذى لة SequenceNumber 1 أولا ثم 2 ثم 3 .....الخ

3-إنشاء عبارة Update

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

كود:
UPDATE Projects SET ProjectName = @ProjectName, ProjectDescription = @ProjectDescription,

كود:

SequenceNumber = @SequenceNumber, LastUpdateDate = Date()+Time()
WHERE ProjectID=@ProjectID;ثم حفظ باسم usp_updateProject


4-إنشاء عبارة Delete

ووظيفتها الحذف
إنشاء استعلام ثم كتابة العبارة التالية



كود:

Delete
FROM Projects
WHERE ProjectID = @ProjectID;

ثم قم بحفظة باسم usp_DeleteProject
سنقوم الان بإضافة استعلام اخر
قم بإضافة Query
والصيغة هى

كود:
SELECT ProjectID, ProjectName, ProjectDescription, SequenceNumber, LastUpdateDate
FROM Projects
WHERE ProjectID=[@ProjectID];

ثم نقوم بحفظ باسم usp_SelectProjects
وكما ترون فإننا قمنا بالاختيار من ضمن مجموعة من المشاريع Projects عند وجود أكثر من مشروع

و يتبع......
__________________



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




كم هي جميلة شبكتنا .. وكم هي كبيره بكم
فشبكة قحطان بكم ولكم
فلننهظ بها
بصدق وأمانه
وبلا تذمر



التعديل الأخير تم بواسطة محمد المعمري ; 04-02-2008 الساعة 02:01 AM
محمد المعمري غير متواجد حالياً  
 


الذين يشاهدون محتوى الموضوع الآن : 1 ( الأعضاء 0 والزوار 1)
 
أدوات الموضوع
انواع عرض الموضوع

تعليمات المشاركة
لا تستطيع إضافة مواضيع جديدة
لا تستطيع الرد على المواضيع
لا تستطيع إرفاق ملفات
لا تستطيع تعديل مشاركاتك

BB code is متاحة
كود [IMG] متاحة
كود HTML معطلة

الانتقال السريع

المواضيع المتشابهه
الموضوع كاتب الموضوع المنتدى مشاركات آخر مشاركة
ميزانــيــة نهــايـــة العــــام ابن مشرف أبو الوليد مجلس الإسلام والحياة 1 07-01-2008 10:29 PM
الدقائق الحاسمة في معركة الموت. أبو عامرية المجلس الـــــعــــــــام 18 15-09-2007 04:53 PM
صور من حياة الصحابه ناصر السنحاني المجلس الـــــعــــــــام 15 15-09-2007 04:46 PM
مناسك الحج و العمرة اللبيب مجلس الإسلام والحياة 6 28-04-2007 02:39 PM


الساعة الآن 02:10 AM

ملصقات الأسماء

ستيكر شيت ورقي

طباعة ستيكرات - ستيكر

ستيكر دائري

ستيكر قص على الحدود