18-10-12, 03:41 PM
[b]
*** ملاحظة : الفرق بين هذا الدرس والدرس 18 هو قاعدة البيانات المستخدمة فقط ***
[/b][b]كاتب الموضوع : Tarek Aldwire
[/b]السلام عليكم ورحمة الله وبركاته...*** ملاحظة : الفرق بين هذا الدرس والدرس 18 هو قاعدة البيانات المستخدمة فقط ***
أولا :
قم بإنشاء قاعدة بيانات وسمها mydatabase ( تم شرح الطريقة في الدرس 17 )...
ثم قم بإنشاء جدول بها وسمه mytable وضع فيه عواميد كالتالي...
ثم قم بإنشاء جدول بها وسمه mytable وضع فيه عواميد كالتالي...
العمود - الإسم - نوع البيانات
1 - FirstName - نصية nchar(10)
2 - Age - رقم bigint
1 - FirstName - نصية nchar(10)
2 - Age - رقم bigint
الان قم بعرض بيانات الجدول عن طريق RightClick من ال Mouse على الجدول ثم إختر Show Table Data ثم إبدأ بوضع البيانات كالتالي...
طارق - 15
إسمك - عمرك وهكذا ....
إسمك - عمرك وهكذا ....
ثانيا... ربط قاعدة البيانات مع ال c#,vb.net
أولا قم بإستيراد المجال:
كود :
[COLOR=#0000BB]System[/color][color=#007700].[/color][color=#0000BB]Data[/color][color=#007700].[/color][color=#0000BB]OleDb[/color][color=#007700]; [/color]
الان ضع Button على الفورم وضع أيضا listbox ...
ثم إكتب في الكود الخاص بالحدث Click لل button1 ...
c#:
كود :
[COLOR=#0000BB]OleDbConnection cn [/color][color=#007700]= new [/color][color=#0000BB]OleDbConnection[/color][color=#007700](@[/color][color=#DD0000]"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Users\TD\Documents\mydatabase.mdb"[/color][COLOR=#007700]);
[/COLOR][color=#0000BB]string mycmd [/color][color=#007700]= [/color][color=#DD0000]"select FirstName,Age from mytable"[/color][COLOR=#007700];
[/COLOR][color=#0000BB]OleDbCommand loecmd [/color][color=#007700]= new [/color][color=#0000BB]OleDbCommand[/color][color=#007700]([/color][color=#0000BB]mycmd[/color][color=#007700], [/color][color=#0000BB]cn[/color][COLOR=#007700]);
[/COLOR][color=#0000BB]cn[/color][color=#007700].[/color][color=#0000BB]Open[/color][COLOR=#007700]();
[/COLOR][color=#0000BB]OleDbDataReader myreader [/color][color=#007700]= [/color][color=#0000BB]loecmd[/color][color=#007700].[/color][color=#0000BB]ExecuteReader[/color][COLOR=#007700]();
while ([/COLOR][color=#0000BB]myreader[/color][color=#007700].[/color][color=#0000BB]Read[/color][COLOR=#007700]())
{
[/COLOR][color=#0000BB]listBox1[/color][color=#007700].[/color][color=#0000BB]Items[/color][color=#007700].[/color][color=#0000BB]Add[/color][color=#007700]([/color][color=#DD0000]"firstname: " [/color][color=#007700]+ [/color][color=#0000BB]myreader[/color][color=#007700][[/color][color=#DD0000]"FirstName"[/color][color=#007700]].[/color][color=#0000BB]ToString[/color][color=#007700]() + [/color][color=#DD0000]" Age: " [/color][color=#007700]+ [/color][color=#0000BB]myreader[/color][color=#007700][[/color][color=#DD0000]"Age"[/color][color=#007700]].[/color][color=#0000BB]ToString[/color][COLOR=#007700]());
}
[/COLOR][color=#0000BB]cn[/color][color=#007700].[/color][color=#0000BB]Close[/color][COLOR=#007700]();
[/COLOR][color=#0000BB]myreader[/color][color=#007700].[/color][color=#0000BB]Close[/color][color=#007700]();[/color]
vb.net :
كود :
[color=#0000BB]Dim cn [/color][color=#007700]As New [/color][COLOR=#0000BB]OleDbConnection
cn[/COLOR][color=#007700].[/color][color=#0000BB]ConnectionString [/color][color=#007700]= [/color][COLOR=#DD0000]"Data Source=.\SQLEXPRESS;AttachDbFilename=C:\Users\TD\Documents\mydatabase.mdf;Integrated Security=True;Connect Timeout=30;User Instance=True"
[/COLOR][color=#0000BB]Dim mycmd [/color][color=#007700]As [/color][color=#0000BB]String [/color][color=#007700]= [/color][COLOR=#DD0000]"select FirstName,Age from mytable"
[/COLOR][color=#0000BB]Dim cmd [/color][color=#007700]As [/color][color=#0000BB]OleDbCommand [/color][color=#007700]= New [/color][color=#0000BB]OleDbCommand[/color][color=#007700]([/color][color=#0000BB]mycmd[/color][color=#007700], [/color][color=#0000BB]cn[/color][COLOR=#007700])
[/COLOR][color=#0000BB]cn[/color][color=#007700].[/color][color=#0000BB]Open[/color][COLOR=#007700]()
[/COLOR][color=#0000BB]Dim myreader [/color][color=#007700]As [/color][color=#0000BB]OleDbDataReader [/color][color=#007700]= [/color][color=#0000BB]cmd[/color][color=#007700].[/color][COLOR=#0000BB]ExecuteReader
[/COLOR][color=#007700]While [/color][color=#0000BB]myreader[/color][color=#007700].[/color][color=#0000BB]Read[/color][COLOR=#007700]()
[/COLOR][color=#0000BB]ListBox1[/color][color=#007700].[/color][color=#0000BB]Items[/color][color=#007700].[/color][color=#0000BB]Add[/color][color=#007700]([/color][color=#DD0000]"firstname: " [/color][color=#007700]+ [/color][color=#0000BB]myreader[/color][color=#007700]([/color][color=#DD0000]"FirstName"[/color][color=#007700]) + [/color][color=#DD0000]" Age: " [/color][color=#007700]+ [/color][color=#0000BB]myreader[/color][color=#007700]([/color][color=#DD0000]"Age"[/color][color=#007700]).[/color][color=#0000BB]ToString[/color][COLOR=#007700])
[/COLOR][color=#0000BB]End [/color][COLOR=#007700]While
[/COLOR][color=#0000BB]cn[/color][color=#007700].[/color][color=#0000BB]Close[/color][COLOR=#007700]()
[/COLOR][color=#0000BB]myreader[/color][color=#007700].[/color][color=#0000BB]Close[/color][color=#007700]()[/color]
شرح الكود السابق...
أولا:
vb.net:
كود :
[COLOR=#0000BB]Dim cn [/color][color=#007700]As New [/color][COLOR=#0000BB]OleDbConnection
cn[/COLOR][color=#007700].[/color][color=#0000BB]ConnectionString [/color][color=#007700]= [/color][color=#DD0000]"Data Source=.\SQLEXPRESS;AttachDbFilename=C:\Users\TD\Documents\mydatabase.mdf;Integrated Security=True;Connect Timeout=30;User Instance=True"[/color]
c#:
كود :
[COLOR=#0000BB]OleDbConnection cn [/color][color=#007700]= new [/color][color=#0000BB]OleDbConnection[/color][color=#007700](@[/color][color=#DD0000]"Data Source=.\SQLEXPRESS;AttachDbFilename=C:\Users\TD\Documents\mydatabase.mdf;Integrated Security=True;Connect Timeout=30;User Instance=True"[/color][color=#007700]);[/color]
هنا قمنا بتعريف الإتصال الخاص بقاعدة البيانات mydatabase ...
vb.net :
كود :
[COLOR=#0000BB]Dim mycmd [/color][color=#007700]As [/color][color=#0000BB]String [/color][color=#007700]= [/color][color=#DD0000]"select FirstName,Age from mytable"[/color]
c# :
كود :
[COLOR=#0000BB]string mycmd [/color][color=#007700]= [/color][color=#DD0000]"select FirstName,Age from mytable"[/color][color=#007700];[/color]
هنا قمنا بتعريف متغير من نوع String يحوي على نص جملة الإستعلام...
vb.net :
كود :
[COLOR=#0000BB]Dim cmd [/color][color=#007700]As [/color][color=#0000BB]OleDbCommand [/color][color=#007700]= New [/color][color=#0000BB]OleDbCommand[/color][color=#007700]([/color][color=#0000BB]mycmd[/color][color=#007700], [/color][color=#0000BB]cn[/color][COLOR=#007700])
[/COLOR][color=#0000BB]cn[/color][color=#007700].[/color][color=#0000BB]Open[/color][color=#007700]()[/color]
c# :
كود :
[COLOR=#0000BB]OleDbCommand mysqlcmd [/color][color=#007700]= new [/color][color=#0000BB]OleDbCommand[/color][color=#007700]([/color][color=#0000BB]mycmd[/color][color=#007700], [/color][color=#0000BB]cn[/color][COLOR=#007700]);
[/COLOR][color=#0000BB]cn[/color][color=#007700].[/color][color=#0000BB]Open[/color][color=#007700]();[/color]
هنا قمنا بتعريف ال Command الذي سوف نرسله لقاعدة البيانات وفتح الإتصال...
vb.net :
كود :
Dim myreader
كود :
[color=#007700]As [/color][color=#0000BB]OleDbDataReader [/color][color=#007700]= [/color][color=#0000BB]cmd[/color][color=#007700].[/color][color=#0000BB]ExecuteReader [/color]
c# :
كود :
[COLOR=#0000BB]OleDbDataReader myreader [/color][color=#007700]= [/color][color=#0000BB]loecmd[/color][color=#007700].[/color][color=#0000BB]ExecuteReader[/color][color=#007700]();[/color]
الان قمنا بتعريف قارئ للبيانات علما أن أنواع القوارئ هي...
ExecuteReader: في حال كان الناتج عدد كبير من البيانات...
ExecuteNonQuery: في حال لا يوجد أي قيمة مرجعة مثل عمل update أو delete ...
ExecuteScalar : في حال كان لا يوجد إلا قيمة مرجعة واحدة مثل الإسم الأول مثلا...
ExecuteXmlReader : لأخذ الناتج على شكل XML ...
الكود التالي...
vb.net:
كود :
[color=#007700]While [/color][color=#0000BB]myreader[/color][color=#007700].[/color][color=#0000BB]Read[/color][COLOR=#007700]()
[/COLOR][color=#0000BB]ListBox1[/color][color=#007700].[/color][color=#0000BB]Items[/color][color=#007700].[/color][color=#0000BB]Add[/color][color=#007700]([/color][color=#DD0000]"firstname: " [/color][color=#007700]+ [/color][color=#0000BB]myreader[/color][color=#007700]([/color][color=#DD0000]"FirstName"[/color][color=#007700]) + [/color][color=#DD0000]" Age: " [/color][color=#007700]+ [/color][color=#0000BB]myreader[/color][color=#007700]([/color][color=#DD0000]"Age"[/color][color=#007700]).[/color][color=#0000BB]ToString[/color][COLOR=#007700])
[/COLOR][color=#0000BB]End [/color][color=#007700]While[/color]
c# :
كود :
[COLOR=#007700]while ([/color][color=#0000BB]myreader[/color][color=#007700].[/color][color=#0000BB]Read[/color][COLOR=#007700]())
{
[/COLOR][color=#0000BB]listBox1[/color][color=#007700].[/color][color=#0000BB]Items[/color][color=#007700].[/color][color=#0000BB]Add[/color][color=#007700]([/color][color=#DD0000]"firstname: " [/color][color=#007700]+ [/color][color=#0000BB]myreader[/color][color=#007700][[/color][color=#DD0000]"FirstName"[/color][color=#007700]].[/color][color=#0000BB]ToString[/color][color=#007700]() + [/color][color=#DD0000]" Age: " [/color][color=#007700]+ [/color][color=#0000BB]myreader[/color][color=#007700][[/color][color=#DD0000]"Age"[/color][color=#007700]].[/color][color=#0000BB]ToString[/color][COLOR=#007700]());
}[/COLOR]
قراءة البيانات الناتجة كما في الشكل السابق...
vb.net :
كود :
[color=#0000BB]myreader[/color][color=#007700].[/color][color=#0000BB]Close[/color][COLOR=#007700]()
[/COLOR][color=#0000BB]cn[/color][color=#007700].[/color][color=#0000BB]Close[/color][color=#007700]()[/color]
c# :
كود :
[color=#0000BB]myreader[/color][color=#007700].[/color][color=#0000BB]Close[/color][COLOR=#007700]();
[/COLOR][color=#0000BB]cn[/color][color=#007700].[/color][color=#0000BB]Close[/color][color=#007700]();[/color]
إغلاق كل شيئ تم إستخدامه وهو الإتصال والقارئ...
الان نكون قد بدأنا بأساسيات ربط قواعد البيانات...
بإذن الله في الدرس القادم سوف نطبق جمل إستعلام متقدمة والتعلم كيف عمل insert,update,delete إلى ما هنالك...
إلى اللقاء في الدرس القادم إن شاء الله...