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

للمبتدأين: كيف تنشئ برنامج مرتبط بقاعدة البيانات في فيجوال استديو 2005 او 2008

بدأه HassanAlattas في 26 يناير 2009 · 24 رد · 9,756 مشاهدة · في ADO.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

بســم الله الـرحمــن الرحيــم

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

سوف نقوم بالتالي:

1- إنشاء مشروع تطبيق ويندوز "Windows application"

2- إضافة مصدر بيانات واتصال بالبيانات

3- تحديد كائنات البيانات

4- تخصيص الـ Controls

5- توليد الـ Controls المرتبطة

إنشاء مشروع تطبيق ويندوز "Windows application"

1- ابدأ بتشغيل فيجوال استديو ، ثم انقر على Create لعرض مربع حوار "مشروع جديد"

2- حدد اللغة التي تريد (فيجوال بيسك او C# ) واختر نوع المشروع Windows Application،

3- سمي المشروع باسم FirstDataApp ثم انقر على موافق.

حتى هذه النقطة يكون لدينا مشروع يحتوي على فورم معروض في وضع تصميم.

post-173477-1232989090_thumb.jpg

إضافة مصدر بيانات واتصال بالبيانات

1- من القائمة Data انقر على Add New Data Source لتعرض هذه النافذة

post-173477-1232989240_thumb.jpg

2- حدد Database ثم انقر على التالي، لتعرض صفحة تحديد الأتصال

post-173477-1232989345_thumb.jpg

حدد الأتصال الذي تريد استخدامه ، لاحظ ان الخيارات المتاحة تتوقف على ما إذا كنت قد اعددت أتصالات البيانات من قبل بواسطة الفيجوال استديو ، لنفترض انك لم تقم بإعداد اتصال بقاعدة البيانات Northwind حتى الآن ، وفي هذه الحالة سوف تحتاج إلى إضافة اتصال جديد.(يمكنك الأنتقال إلى الخطوة 7 إذا كان لديك اتصال جاهز)

3- انقر على زر New Connection لتظهر النافذة التالية:

post-173477-1232989514_thumb.jpg

4- حدد Microsoft SQL Server ثم انقر على موافق

5- في المربع Server name اكتب localhost\SQLEXPRESS

post-173477-1232989973_thumb.jpg

6- حدد الخيار Use Windows Authentication ، واكتب Northwind في مربع قاعدة البيانات ثم انقر على موافق.

7- انقر على التالي

post-173477-1232990106_thumb.jpg

8- انقر على التالي مرة اخرى (بدون ان تغير اي شئ ) لحفظ نص الأتصال في ملف اعدادات التطبيق.

تحديد كائنات البيانات

post-173477-1232990290_thumb.jpg

حدد جدول Employees في هذه الصفحة ثم انقر على Finish.

بعدها يقوم المعالج بتوليد DataSet + TableAdapter وإضافتها إلى المشروع.

تخصيص الـ Controls المرتبطة

في هذه الخطوة سوف نقوم بتخصيص الـ Controls المستخدمة في ربط البيانات:

1- من القائمة Data انقر على Show Data Sources، لعرض نافذة Data Sources.

2- قم بتوسعة الشجرة حتى مستوى Employees، لتظهر الـ Controls التي يمكن توليدها تلقائياً عند ربط البيانات.

post-173477-1232990506_thumb.jpg

3- انقر على السهم بجوار Photo واختر PictureBox.

4- انقر على السهم بجوار الجدول Employees واختر Details

post-173477-1232990628_thumb.gif

توليد الـ Controls المرتبطة

كل ما علينا فعله هو ان نقوم بسحب الجدول Employees من النافذة Data Sources وافلاتها على الفورم في المشروع،

post-173477-1232990797_thumb.jpg

تشغيل التطبيق:

اضغط على F5 لتشغيل التطبيق. يظهر الفورم كما في الصورة:

post-173477-1232990957_thumb.gif

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

[وسط]لا اله الا انت سبحانك انى كنت من الظالمين

[/وسط]

#2

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

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

و شكراً ماقصرت

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

و البحث كيف يتم

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

Mail : pc-moon@hotmail.com

من تواضع لله رفعه

قل خيرا أو اصمت

#3

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

اولاً يمكن تحميل المشروع المثال من هنا:

FirstDataApp.rar

ولا تنسى انك بحاجة إلى قاعدة البيانات Northwind .

بالنسبة لك اخي pcmoon ، يمكن عمل كل ما ذكرته بسهولة باستخدام BindingSource ، لنفترض في نفس المثال (المرفق) انك تريد عمل زر التالي فيكون الكود المقابل هو :

Private Sub btnMoveNext_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnMoveNext.Click
		Me.EmployeesBindingSource.MoveNext()
	End Sub

(بإذن الله احاول ان افصل عمل BindingSource)

اما بالنسبة للبحث فإننا نستخدم الأستعلامات.

[وسط]لا اله الا انت سبحانك انى كنت من الظالمين

[/وسط]

#4

يعطيك ألفففففففففففففففففففففف عافية

#5

أخي:

أنا جربت طريقتك: طريقة ممتازة خاصة للمبتدئين أمثالي....

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

فقاعدتي تختلف عن northwind، فالنورث من SqlServer2005، لكن ما عرفت أسوي طريقة اتصال مع قاعدتي المرفقة مع مشروعي فما العمل؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟

ممكن مساعدتي، لان كل عملي متوقف، وعجزت أعمل اتصال معها.

#6

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

إذا كنت تستخدم Sql Server 2005 او Sql Server 2000 اكتب localhost في خانة Sever Name.

[وسط]لا اله الا انت سبحانك انى كنت من الظالمين

[/وسط]

#7

أنا آسف

لكن ما في نتيجة...

اشغل البرنامج وادخل البيانات واعطيه حفظ،،،

ولما ارجع أشغله مرة ثانية اجد انه ما حفظ...

ممكن تجربها أخي...

واعذرني على الاطالة...

واسف طولت عليك لكن عندي مشكلة في الاتصال بالنت عشان كذا اتأخر في الرد

وشكرا

بالنسبة لsql أظن اللي موجود بداخل الفيجوال 2005 هو sql2005

لكن المشكلة في الحفظ؟؟؟؟

ممكن أخي تساعدني والله يجزاك كل خير

#8

هذه ليست مشكلة!!!

لأنك لما تضيف قاعدة البيانات إلى مشروعك ، كل مرة تعمل Run تنتسخ قاعدة البيانات إلى المجلد bin\Debug ويشتغل البرنامج عليها ،

يعني اي تغيرات يعملها البرنامج تحصل على قاعدة البيانات النسخة بدون ان تتأثر قاعدة البيانات الأصلية .

انت ممكن تنقل قاعدة البيانات خارج مجلد المشروع ، و تتغير في نص الأتصال في ملف الأعدادات،

او ممكن بعد ما تشغل البرنامج تنسخ قاعدة البيانات من المجلد bin إلى مكانها الأصلي في المشروع.

[وسط]لا اله الا انت سبحانك انى كنت من الظالمين

[/وسط]

#9

مرفق لك المثال الذي أعمل عليه

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

Trying.rar

#10

المفروض انك تعمل التعديلات في جهازك :lol: .

لكن ممكن تجرب تضيف هذا الكود إلى Form1 وإن شاء الله يشتغل معاك :

Public Sub New()

		' This call is required by the Windows Form Designer.
		InitializeComponent()

		' Add any initialization after the InitializeComponent() call.
		Dim fullPath As String = Path.GetFullPath(Path.Combine(Application.StartupPath, "..\..\Mine.mdf"))
		Dim ConnString = "Data Source=" + ".\SQLEXPRESS" + ";AttachDbFilename=" + fullPath + ";Integrated Security=True;User Instance=True"
		My.Settings.Item("MineConnectionString") = ConnString
	End Sub

[وسط]لا اله الا انت سبحانك انى كنت من الظالمين

[/وسط]

#11

يا اخي والله احس بالاحراج منك

انا جدا مبتدئ في البرمجة والكود ما اشتغل معي...

يطلع خط أزرق تحت كلمة path

واحس اني ثقلت عليك...

ممكن تشرح الكود السابق...

احس اني مرة زودتها لكن انت الوحيد اللي رد على تساؤلاتي عشان كذا ازعجتك..

سامحني

وممكن توضح لي ما هي التعديلات اللي المفروض اعملها في جهازي؟؟؟؟؟

#12

ولا يهمك اخي,,,

عدل السطر السطر بهذا الشكل:

Dim fullPath As String = System.IO.Path.GetFullPath(System.IO.Path.Combine(Application.StartupPath, "..\..\Mine.mdf"))

[وسط]لا اله الا انت سبحانك انى كنت من الظالمين

[/وسط]

#13

عجييييييييييييييييييييييييييييييييييييييييييييييييب

والله انك فناااااااااااااااااااااااااااااااااااااااااااااااااااان

والله فرحت لما تنفذ الكود لاني صار لي يومين في محاولات مستميتة ولا في اي فايدة...

على العموم ما قصرت والله يوفقك يا اخي في الدنيا والآخرة.....

وممكن سؤال اخير....

ممكن تشرح الكود عشان اعرف متى استخدمه

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

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

#14

ممكن تطرح الكود في New() الخاصة بـ MyApplication.

لكن هذا حل مؤقت و الأفضل انك تتعلم كيف تتعامل مع Connections بشكل عام ، حاول تبحث في هذا الموضوع.

وبالتوفيق.

[وسط]لا اله الا انت سبحانك انى كنت من الظالمين

[/وسط]

#15

الله يوفقك دنيا وآخرة

ويرزقك من حيث لا تحتسب

وجزاك الله كل خير على سعة صدرك وتحملك لاسئلتي المزعجة....

#16

بارك الله فيك أخي الغالي حسن علي مجهوداتك لمساعدة المبتدئين أمثالنا

certifiedj.jpg

 

 

Image Hosted by ImageShack.us
#17

جزاك الله كل خير اخي محمد.

[وسط]لا اله الا انت سبحانك انى كنت من الظالمين

[/وسط]

#18

بجد انت شاب جامد اخر حاجة

#19

مشكووووووووووووووووووووووور يالغالي

#20

مشكورين على المجهود الرائع ده بس ياريت تضيفوشرح فى الصفحه دى لل sql حتى يكتمل الشرح

#21

انا عندى نفس المشكلة اللى كانت عند ariama وهو انى بسجل واضيف وكل ما اشغل قاعدة البيانات تانى مش الاقى اللى اتسجل

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

#22
http://msdn.microsoft.com/en-us/library/ms233817.aspx

[وسط]لا اله الا انت سبحانك انى كنت من الظالمين

[/وسط]

#23

شكرا على اهتمامك ..... ولو فيها رزالة ... سؤال اخير

ماذا لو نشرت المشروع .. او وضعته على جهاز اخر بسيرفر مختلف ؟؟

#24

سوف يعمل البرنامج بدون مشاكل (إن شاء الله).

هناك موضوع جميل في منتدى الفيجوال بيسك يتحدث عن النشر باستخدام ClickOnce ، ابحث عنه.

[وسط]لا اله الا انت سبحانك انى كنت من الظالمين

[/وسط]

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