كيفية ربط قواعد بيانات sql server 2005 بي الفيجول بيسك دوت نت vb.net 2010

السلام عليكم ورحمة الله أهلا بكم في موقع عرب تطوير في هذا الشرح سنشرح كيف تربط قاعدةالبيانات data base الخاصة بي miscro soft sql server في الفيجول بيسك دوت نتvb.net  إصدار visual basic 2010 , عملية الربط تسمى بي الادو نت ado.net , كما نعرف ان الكثير يعاني من عملية الربط وخاصة من يقومون بانشاء منظومات تعمل بقواعد بيانات ويرغبون بجعل قواعد البيانات تعمل بي الاس كيو ال سيرفر بدلا من برنامج الاكسس وذالك لانه قواعد بيانات التي تعمل بي sql server اكثر مرونة وحماية من قواعد بيانات access وكذالك سهولة عمل الباك اب لقاعدة البيانات db  الان سنبداء بي شرح كيفية الربط وكيفية عمل الاتصال بين قاعدة البيانات والفيجول بيسك .

الجزء الاول خاص بي انشاء قاعدة البيانات والجدول 

أولا نقوم بانشاء قاعدة بيانات من خلال برنامج microsoft sql server mengement studo اي اصدار انا اعمل بي اصدار 2005

الامر الخاص بانشاء قاعدة البيانات هو

create database arb

بي هذا الامر أنا انشأت قاعدة بيانات اسمها arb

الان سنقوم بانشاء جدول داخل القاعده انا سأسميه abdo وسأضع داخله حقلين الاول حقل na_abdo خاص بادخال اسم

الحقل التاني no_abdo حقل خاص بي ادخال الرقم عبر الامر التالي

use arb

create table abdo (

na_abdo varchar(20) ,

no_abdo int )

الان انتهينا من الجزء الاول وهو الخاص بانشاء قاعدة البيانات والجدول

الجزء التاني الخاص بي ربط قاعدة البيانات بي الفيجول بيسك 

أولا نقوم بفتح برنامج الفيجول بيسك دوت نت اي اصدار يتلائم معك

ونضع به زر button  نسميه إتصال

وكذالك نضف من صندوق الادوات أدات sql connection إذا لم تكن موجودة يمكنك النقر على الزر الايمن في صندوق الادوات واختيار اضافة اداه والبحث عن هذه الاداه واضافتها الى صندوق الادوات

الان سندخل على الكود من النقر على زر button الذي قمنا بتسميته إتصال

ونكتب في اعلى الاكواد

imports system.data.sqlclinte

وهي لدعم اتصال قواعد البيانات بالفيجول بيسك

تم داخل كود زر الاتصال نكتب

Dim conn As New SqlConnection
Dim str As String = “Data Source=.\SQLEXPRESS;AttachDbFilename=C:\Program Files\Microsoft SQL Server\MSSQL.1\MSSQL\Data\arb.mdf;Integrated Security=True;Connect Timeout=30;User Instance=True”
conn = New SqlConnection(str)
conn.Open()

MsgBox(“تم الاتصال”)
conn.Close()

بهذا يكون البرنامج جاهز بعد التنفيد عند النقر على زر إتصال يقوم بفتح الاتصال ويعرض المسج التي بها تم الاتصال

وبعد ذالك يغلق الاتصال بقاعدة البيانات

إذا كانت لديك قاعدة بيانات باسم مختلف قم فقط بتغير اسم قاعدة البيانات في الكود السابق وهي باللون الاحمر الى اسم قاعدة البيانات الخاصة بك

ملخص الكود السابق

اولا عرفنا متغير من نوع sql connection واسمهه conn

ثم عرفنا متغير اسمه str من نوع string ووضعنا داخله سلسلة الاتصال وهي بها مسار وجود قاعدة البيانات واسمها

السطر الرابع اضفنا سلسلة الاتصال الى متغير الاتصال لكي يتم الاتصال بقاعدة البيانات

السطر الخامس فتحنا الاتصال لكي يتم الاتصال عبر كود conn.open

ومن ثم عرضنا رسالة تم الاتصال

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

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