منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب - دورة البرمجة باستخدام C#

الدرس 22- دوال sql server

Thu, 18 Oct 2012 12:11:30 +0000

كاتب الموضوع : Tarek Aldwire

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

دوال ال sql server ...

أولا قم بتجهيز ال database التي نستخدمها في الدورة دائما وهي إمسها mydatabase تحوي عامودان FirstName,Age وضع بها بعض البيانات...

1- AVG :

وتستخدم هذه الدالة لإيجاد المتوسط الحسابي لعمود ما ( رقم طبعا )...
يمكن إستخدامها كالتالي:

vb.net:

كود :
[color=#000000][COLOR=#0000bb]Dim c [/color][color=#007700]As New [/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlConnection[/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][color=#0000bb]Dim s [/color][color=#007700]As [/color][color=#0000bb]String [/color][color=#007700]= [/color][COLOR=#dd0000]"Select AVG(Age) From mytable"

[/COLOR][color=#0000bb]Dim cmd [/color][color=#007700]As New [/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlCommand[/color][color=#007700]([/color][color=#0000bb]s[/color][color=#007700], [/color][color=#0000bb]c[/color][COLOR=#007700])

[/COLOR][color=#0000bb]c[/color][color=#007700].[/color][color=#0000bb]Open[/color][COLOR=#007700]()

[/COLOR][color=#0000bb]MsgBox[/color][color=#007700]([/color][color=#0000bb]cmd[/color][color=#007700].[/color][color=#0000bb]ExecuteScalar[/color][color=#007700]().[/color][color=#0000bb]ToString[/color][COLOR=#007700])

[/COLOR][color=#0000bb]c[/color][color=#007700].[/color][color=#0000bb]Close[/color][COLOR=#007700]()  

[/COLOR][color=#0000bb][/color][/COLOR]

c#:

كود :
[COLOR=#000000][COLOR=#0000bb] 

System[/COLOR][color=#007700].[/color][color=#0000bb]Data[/color][color=#007700].[/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlConnection c [/color][color=#007700]= new [/color][color=#0000bb]System[/color][color=#007700].[/color][color=#0000bb]Data[/color][color=#007700].[/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlConnection[/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][color=#0000bb]string s [/color][color=#007700]= [/color][color=#dd0000]"select AVG(Age) From mytable"[/color][COLOR=#007700];

[/COLOR][color=#0000bb]System[/color][color=#007700].[/color][color=#0000bb]Data[/color][color=#007700].[/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlCommand cmd [/color][color=#007700]= new [/color][color=#0000bb]System[/color][color=#007700].[/color][color=#0000bb]Data[/color][color=#007700].[/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlCommand[/color][color=#007700]([/color][color=#0000bb]s[/color][color=#007700], [/color][color=#0000bb]c[/color][COLOR=#007700]);

[/COLOR][color=#0000bb]c[/color][color=#007700].[/color][color=#0000bb]Open[/color][COLOR=#007700]();

[/COLOR][color=#0000bb]MessageBox[/color][color=#007700].[/color][color=#0000bb]Show[/color][color=#007700]([/color][color=#0000bb]cmd[/color][color=#007700].[/color][color=#0000bb]ExecuteScalar[/color][color=#007700]().[/color][color=#0000bb]ToString[/color][COLOR=#007700]());

[/COLOR][color=#0000bb]c[/color][color=#007700].[/color][color=#0000bb]Close[/color][COLOR=#007700]();  

[/COLOR][color=#0000bb][/color][/COLOR]

أو مثلا حساب المتوسط العمري لكل شخص يفوق عمره ال 15:

vb.net:

كود :
[color=#000000][COLOR=#0000bb]Dim c [/color][color=#007700]As New [/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlConnection[/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][color=#0000bb]Dim s [/color][color=#007700]As [/color][color=#0000bb]String [/color][color=#007700]= [/color][COLOR=#dd0000]"Select AVG(Age) From mytable where Age > 15"

[/COLOR][color=#0000bb]Dim cmd [/color][color=#007700]As New [/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlCommand[/color][color=#007700]([/color][color=#0000bb]s[/color][color=#007700], [/color][color=#0000bb]c[/color][COLOR=#007700])

[/COLOR][color=#0000bb]c[/color][color=#007700].[/color][color=#0000bb]Open[/color][COLOR=#007700]()

[/COLOR][color=#0000bb]MsgBox[/color][color=#007700]([/color][color=#0000bb]cmd[/color][color=#007700].[/color][color=#0000bb]ExecuteScalar[/color][color=#007700]().[/color][color=#0000bb]ToString[/color][COLOR=#007700])

[/COLOR][color=#0000bb]c[/color][color=#007700].[/color][color=#0000bb]Close[/color][COLOR=#007700]()  

[/COLOR][color=#0000bb][/color][/COLOR]

c#:

كود :
[color=#000000][COLOR=#0000bb]System[/color][color=#007700].[/color][color=#0000bb]Data[/color][color=#007700].[/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlConnection c [/color][color=#007700]= new [/color][color=#0000bb]System[/color][color=#007700].[/color][color=#0000bb]Data[/color][color=#007700].[/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlConnection[/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][color=#0000bb]string s [/color][color=#007700]= [/color][color=#dd0000]"select AVG(Age) From mytable where Age > 15"[/color][COLOR=#007700];

[/COLOR][color=#0000bb]System[/color][color=#007700].[/color][color=#0000bb]Data[/color][color=#007700].[/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlCommand cmd [/color][color=#007700]= new [/color][color=#0000bb]System[/color][color=#007700].[/color][color=#0000bb]Data[/color][color=#007700].[/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlCommand[/color][color=#007700]([/color][color=#0000bb]s[/color][color=#007700], [/color][color=#0000bb]c[/color][COLOR=#007700]);

[/COLOR][color=#0000bb]c[/color][color=#007700].[/color][color=#0000bb]Open[/color][COLOR=#007700]();

[/COLOR][color=#0000bb]MessageBox[/color][color=#007700].[/color][color=#0000bb]Show[/color][color=#007700]([/color][color=#0000bb]cmd[/color][color=#007700].[/color][color=#0000bb]ExecuteScalar[/color][color=#007700]().[/color][color=#0000bb]ToString[/color][COLOR=#007700]());

[/COLOR][color=#0000bb]c[/color][color=#007700].[/color][color=#0000bb]Close[/color][COLOR=#007700]();  

[/COLOR][color=#0000bb][/color][/COLOR]

2- الدالة Count ...

تعود هذه الدالة بكم عدد الأعمار الموجودة داخل الجدول بشرط أو بدون شرط...

يتم إستخدامها كالتالي...

vb.net:

كود :
[COLOR=#000000][COLOR=#0000bb] 

Dim c [/COLOR][color=#007700]As New [/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlConnection[/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][color=#0000bb]Dim s [/color][color=#007700]As [/color][color=#0000bb]String [/color][color=#007700]= [/color][COLOR=#dd0000]"Select Count(Age) From mytable"

[/COLOR][color=#0000bb]Dim cmd [/color][color=#007700]As New [/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlCommand[/color][color=#007700]([/color][color=#0000bb]s[/color][color=#007700], [/color][color=#0000bb]c[/color][COLOR=#007700])

[/COLOR][color=#0000bb]c[/color][color=#007700].[/color][color=#0000bb]Open[/color][COLOR=#007700]()

[/COLOR][color=#0000bb]MsgBox[/color][color=#007700]([/color][color=#0000bb]cmd[/color][color=#007700].[/color][color=#0000bb]ExecuteScalar[/color][color=#007700]().[/color][color=#0000bb]ToString[/color][COLOR=#007700])

[/COLOR][color=#0000bb]c[/color][color=#007700].[/color][color=#0000bb]Close[/color][COLOR=#007700]()  

[/COLOR][color=#0000bb][/color][/COLOR]

c#:

كود :
[color=#000000][COLOR=#0000bb]System[/color][color=#007700].[/color][color=#0000bb]Data[/color][color=#007700].[/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlConnection c [/color][color=#007700]= new [/color][color=#0000bb]System[/color][color=#007700].[/color][color=#0000bb]Data[/color][color=#007700].[/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlConnection[/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][color=#0000bb]string s [/color][color=#007700]= [/color][color=#dd0000]"Select Count(Age) From mytable"[/color][COLOR=#007700];

[/COLOR][color=#0000bb]System[/color][color=#007700].[/color][color=#0000bb]Data[/color][color=#007700].[/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlCommand cmd [/color][color=#007700]= new [/color][color=#0000bb]System[/color][color=#007700].[/color][color=#0000bb]Data[/color][color=#007700].[/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlCommand[/color][color=#007700]([/color][color=#0000bb]s[/color][color=#007700], [/color][color=#0000bb]c[/color][COLOR=#007700]);

[/COLOR][color=#0000bb]c[/color][color=#007700].[/color][color=#0000bb]Open[/color][COLOR=#007700]();

[/COLOR][color=#0000bb]MessageBox[/color][color=#007700].[/color][color=#0000bb]Show[/color][color=#007700]([/color][color=#0000bb]cmd[/color][color=#007700].[/color][color=#0000bb]ExecuteScalar[/color][color=#007700]().[/color][color=#0000bb]ToString[/color][COLOR=#007700]());

[/COLOR][color=#0000bb]c[/color][color=#007700].[/color][color=#0000bb]Close[/color][COLOR=#007700]();  

[/COLOR][color=#0000bb][/color][/COLOR]

3- الدالة sum ...

تعيد هذه الدالة مجموع العمود المسندة إليه مثلا مجموع الAge ( أيضا يمكن إستخدامها بشرط مثل where Age > 15 ) ...

vb.net :

كود :
[color=#000000][COLOR=#0000bb]Dim c [/color][color=#007700]As New [/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlConnection[/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][color=#0000bb]Dim s [/color][color=#007700]As [/color][color=#0000bb]String [/color][color=#007700]= [/color][COLOR=#dd0000]"Select sum(Age) From mytable"

[/COLOR][color=#0000bb]Dim cmd [/color][color=#007700]As New [/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlCommand[/color][color=#007700]([/color][color=#0000bb]s[/color][color=#007700], [/color][color=#0000bb]c[/color][COLOR=#007700])

[/COLOR][color=#0000bb]c[/color][color=#007700].[/color][color=#0000bb]Open[/color][COLOR=#007700]()

[/COLOR][color=#0000bb]MsgBox[/color][color=#007700]([/color][color=#0000bb]cmd[/color][color=#007700].[/color][color=#0000bb]ExecuteScalar[/color][color=#007700]().[/color][color=#0000bb]ToString[/color][COLOR=#007700])

[/COLOR][color=#0000bb]c[/color][color=#007700].[/color][color=#0000bb]Close[/color][COLOR=#007700]()  

[/COLOR][color=#0000bb][/color][/COLOR]

c#:

كود :
[COLOR=#000000][COLOR=#0000bb] 

System[/COLOR][color=#007700].[/color][color=#0000bb]Data[/color][color=#007700].[/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlConnection c [/color][color=#007700]= new [/color][color=#0000bb]System[/color][color=#007700].[/color][color=#0000bb]Data[/color][color=#007700].[/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlConnection[/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][color=#0000bb]string s [/color][color=#007700]= [/color][color=#dd0000]"Select sum(Age) From mytable"[/color][COLOR=#007700];

[/COLOR][color=#0000bb]System[/color][color=#007700].[/color][color=#0000bb]Data[/color][color=#007700].[/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlCommand cmd [/color][color=#007700]= new [/color][color=#0000bb]System[/color][color=#007700].[/color][color=#0000bb]Data[/color][color=#007700].[/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlCommand[/color][color=#007700]([/color][color=#0000bb]s[/color][color=#007700], [/color][color=#0000bb]c[/color][COLOR=#007700]);

[/COLOR][color=#0000bb]c[/color][color=#007700].[/color][color=#0000bb]Open[/color][COLOR=#007700]();

[/COLOR][color=#0000bb]MessageBox[/color][color=#007700].[/color][color=#0000bb]Show[/color][color=#007700]([/color][color=#0000bb]cmd[/color][color=#007700].[/color][color=#0000bb]ExecuteScalar[/color][color=#007700]().[/color][color=#0000bb]ToString[/color][COLOR=#007700]());

[/COLOR][color=#0000bb]c[/color][color=#007700].[/color][color=#0000bb]Close[/color][COLOR=#007700]();  

[/COLOR][color=#0000bb][/color][/COLOR]

الدالة Max ...
تعود هذه الدالة بأكبر قيمة موجودة بالعامود المسندة له ...
مثلا هنا سوف تعود بعمر اكبر شخص موجود...

vb.net:

كود :
[color=#000000][COLOR=#0000bb]Dim c [/color][color=#007700]As New [/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlConnection[/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][color=#0000bb]Dim s [/color][color=#007700]As [/color][color=#0000bb]String [/color][color=#007700]= [/color][COLOR=#dd0000]"Select max(Age) From mytable"

[/COLOR][color=#0000bb]Dim cmd [/color][color=#007700]As New [/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlCommand[/color][color=#007700]([/color][color=#0000bb]s[/color][color=#007700], [/color][color=#0000bb]c[/color][COLOR=#007700])

[/COLOR][color=#0000bb]c[/color][color=#007700].[/color][color=#0000bb]Open[/color][COLOR=#007700]()

[/COLOR][color=#0000bb]MsgBox[/color][color=#007700]([/color][color=#0000bb]cmd[/color][color=#007700].[/color][color=#0000bb]ExecuteScalar[/color][color=#007700]().[/color][color=#0000bb]ToString[/color][COLOR=#007700])

[/COLOR][color=#0000bb]c[/color][color=#007700].[/color][color=#0000bb]Close[/color][COLOR=#007700]()  

[/COLOR][color=#0000bb][/color][/COLOR]

[SIZE=2]c#:

[/SIZE]

كود :
[color=#000000][COLOR=#0000bb]System[/color][color=#007700].[/color][color=#0000bb]Data[/color][color=#007700].[/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlConnection c [/color][color=#007700]= new [/color][color=#0000bb]System[/color][color=#007700].[/color][color=#0000bb]Data[/color][color=#007700].[/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlConnection[/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][color=#0000bb]string s [/color][color=#007700]= [/color][color=#dd0000]"Select max(Age) From mytable"[/color][COLOR=#007700];

[/COLOR][color=#0000bb]System[/color][color=#007700].[/color][color=#0000bb]Data[/color][color=#007700].[/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlCommand cmd [/color][color=#007700]= new [/color][color=#0000bb]System[/color][color=#007700].[/color][color=#0000bb]Data[/color][color=#007700].[/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlCommand[/color][color=#007700]([/color][color=#0000bb]s[/color][color=#007700], [/color][color=#0000bb]c[/color][COLOR=#007700]);

[/COLOR][color=#0000bb]c[/color][color=#007700].[/color][color=#0000bb]Open[/color][COLOR=#007700]();

[/COLOR][color=#0000bb]MessageBox[/color][color=#007700].[/color][color=#0000bb]Show[/color][color=#007700]([/color][color=#0000bb]cmd[/color][color=#007700].[/color][color=#0000bb]ExecuteScalar[/color][color=#007700]().[/color][color=#0000bb]ToString[/color][COLOR=#007700]());

[/COLOR][color=#0000bb]c[/color][color=#007700].[/color][color=#0000bb]Close[/color][COLOR=#007700]();  

[/COLOR][color=#0000bb][/color][/COLOR]

الدالة Min ...

وهي عكس الدالة Max حيث تعيد أصغر قيمة في العامود المسندة له ...
هنا سوف تعيد أصغر عمر في العامود Age...

vb.net:

كود :
[COLOR=#000000][COLOR=#0000bb] 

Dim c [/COLOR][color=#007700]As New [/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlConnection[/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][color=#0000bb]Dim s [/color][color=#007700]As [/color][color=#0000bb]String [/color][color=#007700]= [/color][COLOR=#dd0000]"Select min(Age) From mytable"

[/COLOR][color=#0000bb]Dim cmd [/color][color=#007700]As New [/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlCommand[/color][color=#007700]([/color][color=#0000bb]s[/color][color=#007700], [/color][color=#0000bb]c[/color][COLOR=#007700])

[/COLOR][color=#0000bb]c[/color][color=#007700].[/color][color=#0000bb]Open[/color][COLOR=#007700]()

[/COLOR][color=#0000bb]MsgBox[/color][color=#007700]([/color][color=#0000bb]cmd[/color][color=#007700].[/color][color=#0000bb]ExecuteScalar[/color][color=#007700]().[/color][color=#0000bb]ToString[/color][COLOR=#007700])

[/COLOR][color=#0000bb]c[/color][color=#007700].[/color][color=#0000bb]Close[/color][COLOR=#007700]()  

[/COLOR][color=#0000bb][/color][/COLOR]

c#:

كود :
[color=#000000][COLOR=#0000bb]System[/color][color=#007700].[/color][color=#0000bb]Data[/color][color=#007700].[/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlConnection c [/color][color=#007700]= new [/color][color=#0000bb]System[/color][color=#007700].[/color][color=#0000bb]Data[/color][color=#007700].[/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlConnection[/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][color=#0000bb]string s [/color][color=#007700]= [/color][color=#dd0000]"Select min(Age) From mytable"[/color][COLOR=#007700];

[/COLOR][color=#0000bb]System[/color][color=#007700].[/color][color=#0000bb]Data[/color][color=#007700].[/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlCommand cmd [/color][color=#007700]= new [/color][color=#0000bb]System[/color][color=#007700].[/color][color=#0000bb]Data[/color][color=#007700].[/color][color=#0000bb]SqlClient[/color][color=#007700].[/color][color=#0000bb]SqlCommand[/color][color=#007700]([/color][color=#0000bb]s[/color][color=#007700], [/color][color=#0000bb]c[/color][COLOR=#007700]);

[/COLOR][color=#0000bb]c[/color][color=#007700].[/color][color=#0000bb]Open[/color][COLOR=#007700]();

[/COLOR][color=#0000bb]MessageBox[/color][color=#007700].[/color][color=#0000bb]Show[/color][color=#007700]([/color][color=#0000bb]cmd[/color][color=#007700].[/color][color=#0000bb]ExecuteScalar[/color][color=#007700]().[/color][color=#0000bb]ToString[/color][COLOR=#007700]());

[/COLOR][color=#0000bb]c[/color][color=#007700].[/color][color=#0000bb]Close[/color][COLOR=#007700]();  

[/COLOR][color=#0000bb][/color][/COLOR]

هكذا نكون قد تعرفنا على بعض دوال ال sql server وكيفية التعامل معهم...

الدرس 21- Stored Procedures

Thu, 18 Oct 2012 12:09:15 +0000

كاتب الموضوع : Tarek Aldwire

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

مفهوم ال Stored Procedures :

إن ال Stored Procedures هي عبارة عن جملة إستعلام مخزنة في قاعدة البيانات وإستدعائها يشبه إستدعاء أي Method كما سوف ترى...

لنرى مثال لضرورة إستخدام ال Stored Procedures ...

أولا إنشئ مشروع جديد وقاعدة بيانات وسمها كما سميناها سابقا mydatabase (تجد هذه التفاصيل في أول الدرس 18)

والان لو كنا مثلا نريد المستخدم أن يضع إسم الموظف المراد جلب بياناته في textBox فقرر في نفس اللحظة أن يصبح مبرمج فكتب مثلا ...
سوف يكون الكود لتنفيذ ذلك:

كود :
[COLOR=#000000][COLOR=#0000bb] 

[/COLOR][COLOR=#dd0000]"Select FirstName,Age From mytable Where FirstName = '{0},textBox1.Text"  

[/COLOR][color=#0000bb][/color][/COLOR]

الان ليس المهم الكود وإنما المستخدم فتصور لو الأخ كتب مثلا...

Drop mytable !!!
أو أي جملة إستعلام أخرى !!!

ما السبيل لتفادي ذلك ؟

هنا جاء دور ال Stored Procedures لكي لا يتمكن المستخدم من تنفيذ جمل إستعلام من خلال كتاباته...

الان أضف لقاعدة البيانات Stored Procedures كالتالي:
( لقد قمت بإنشاء قاعدة بيانات بإسم TD_Data و جدول بها بإسم tb1 يحوي على ثلاث أعمدة هي:

كود :
[color=#000000][COLOR=#0000bb]FName [/color][color=#007700]([/color][color=#0000bb]nchar[/color][color=#007700]([/color][color=#0000bb]10[/color][COLOR=#007700]))

[/COLOR][color=#0000bb]LName[/color][color=#007700]([/color][color=#0000bb]nchar[/color][color=#007700]([/color][color=#0000bb]10[/color][COLOR=#007700])

[/COLOR][color=#0000bb]Age[/color][color=#007700]([/color][color=#0000bb]bigint[/color][COLOR=#007700])  

[/COLOR][color=#0000bb][/color][/COLOR]

من مجلد ال Stored Procedures إختر Add New Stored Procedures

والان أكتب بها...

كود :
[COLOR=#000000][COLOR=#0000bb] 

Create PROCEDURE dbo[/COLOR][color=#007700].[/color][COLOR=#0000bb]GetAgesAvg

[/COLOR][color=#007700]@[/color][color=#0000bb]agesavg int [/color][color=#007700]= [/color][COLOR=#0000bb]0 output

[/COLOR][COLOR=#007700]AS

[/COLOR][color=#0000bb]select [/color][color=#007700]@[/color][color=#0000bb]agesavg [/color][color=#007700]= [/color][color=#0000bb]avg[/color][color=#007700]([/color][color=#0000bb]Age[/color][color=#007700]) [/color][COLOR=#0000bb]From tb1

[/COLOR][color=#007700]RETURN @[/color][COLOR=#0000bb]agesavg  

[/COLOR][/COLOR]

ثم ضع Button و textBox وفي الحدث click لل button أكتب...

c#:

كود :
[color=#000000][COLOR=#0000bb]SqlConnection sqlcn [/color][color=#007700]= new [/color][color=#0000bb]SqlConnection[/color][color=#007700]([/color][color=#dd0000]"Data Source=.\SQLEXPRESS;AttachDbFilename=C:\Users\TD\Documents\TD_Data.mdf;Integrated Security=True;Connect Timeout=30;User Instance=True"[/color][COLOR=#007700]);

[/COLOR][color=#0000bb]string sqlcmdstr [/color][color=#007700]= [/color][color=#dd0000]"GetAgesAvg"[/color][COLOR=#007700];

[/COLOR][color=#0000bb]SqlCommand sqlcmd [/color][color=#007700]= new [/color][color=#0000bb]SqlCommand[/color][color=#007700]([/color][color=#0000bb]sqlcmdstr[/color][color=#007700], [/color][color=#0000bb]sqlcn[/color][COLOR=#007700]);

[/COLOR][color=#0000bb]SqlParameter par [/color][color=#007700]= new [/color][color=#0000bb]SqlParameter[/color][COLOR=#007700]();

[/COLOR][color=#0000bb]sqlcmd[/color][color=#007700].[/color][color=#0000bb]CommandType [/color][color=#007700]= [/color][color=#0000bb]CommandType[/color][color=#007700].[/color][color=#0000bb]StoredProcedure[/color][COLOR=#007700];

[/COLOR][color=#0000bb]par[/color][color=#007700].[/color][color=#0000bb]ParameterName [/color][color=#007700]= [/color][color=#dd0000]"@agesavg"[/color][COLOR=#007700];

[/COLOR][color=#0000bb]par[/color][color=#007700].[/color][color=#0000bb]Direction [/color][color=#007700]= [/color][color=#0000bb]ParameterDirection[/color][color=#007700].[/color][color=#0000bb]Output[/color][COLOR=#007700];

[/COLOR][color=#0000bb]par[/color][color=#007700].[/color][color=#0000bb]SqlDbType [/color][color=#007700]= [/color][color=#0000bb]SqlDbType[/color][color=#007700].[/color][color=#0000bb]Int[/color][COLOR=#007700];

[/COLOR][color=#0000bb]sqlcmd[/color][color=#007700].[/color][color=#0000bb]Parameters[/color][color=#007700].[/color][color=#0000bb]Add[/color][color=#007700]([/color][color=#0000bb]par[/color][COLOR=#007700]);

try

{

[/COLOR][color=#0000bb]sqlcn[/color][color=#007700].[/color][color=#0000bb]Open[/color][COLOR=#007700]();

}

catch ([/COLOR][color=#0000bb]Exception ex[/color][COLOR=#007700])

{

[/COLOR][color=#0000bb]MessageBox[/color][color=#007700].[/color][color=#0000bb]Show[/color][color=#007700]([/color][color=#0000bb]ex[/color][color=#007700].[/color][color=#0000bb]Message[/color][COLOR=#007700]);

}

[/COLOR][color=#0000bb]sqlcmd[/color][color=#007700].[/color][color=#0000bb]ExecuteNonQuery[/color][COLOR=#007700]();

[/COLOR][color=#0000bb]textBox1[/color][color=#007700].[/color][color=#0000bb]Text [/color][color=#007700]= [/color][color=#0000bb]sqlcmd[/color][color=#007700].[/color][color=#0000bb]Parameters[/color][color=#007700]([/color][color=#dd0000]"@agesavg"[/color][color=#007700]).[/color][color=#0000bb]Value[/color][color=#007700].[/color][color=#0000bb]ToString[/color][COLOR=#007700]();

[/COLOR][color=#0000bb]sqlcn[/color][color=#007700].[/color][color=#0000bb]Close[/color][COLOR=#007700]();  

[/COLOR][color=#0000bb][/color][/COLOR]

vb.net :

كود :
[COLOR=#000000][COLOR=#0000bb] 

Dim sqlcn [/COLOR][color=#007700]As New [/color][color=#0000bb]SqlConnection[/color][color=#007700]([/color][color=#dd0000]"Data Source=.\SQLEXPRESS;AttachDbFilename=C:\Users\TD\Documents\TD_Data.mdf;Integrated Security=True;Connect Timeout=30;User Instance=True"[/color][COLOR=#007700])

[/COLOR][color=#0000bb]Dim sqlcmdstr [/color][color=#007700]As [/color][color=#0000bb]String [/color][color=#007700]= [/color][COLOR=#dd0000]"GetAgesAvg"

[/COLOR][color=#0000bb]Dim sqlcmd [/color][color=#007700]As New [/color][color=#0000bb]SqlCommand[/color][color=#007700]([/color][color=#0000bb]sqlcmdstr[/color][color=#007700], [/color][color=#0000bb]sqlcn[/color][COLOR=#007700])

[/COLOR][color=#0000bb]Dim par [/color][color=#007700]As New [/color][COLOR=#0000bb]SqlParameter

sqlcmd[/COLOR][color=#007700].[/color][color=#0000bb]CommandType [/color][color=#007700]= [/color][color=#0000bb]CommandType[/color][color=#007700].[/color][COLOR=#0000bb]StoredProcedure

par[/COLOR][color=#007700].[/color][color=#0000bb]ParameterName [/color][color=#007700]= [/color][COLOR=#dd0000]"@agesavg"

[/COLOR][color=#0000bb]par[/color][color=#007700].[/color][color=#0000bb]Direction [/color][color=#007700]= [/color][color=#0000bb]ParameterDirection[/color][color=#007700].[/color][COLOR=#0000bb]Output

par[/COLOR][color=#007700].[/color][color=#0000bb]SqlDbType [/color][color=#007700]= [/color][color=#0000bb]SqlDbType[/color][color=#007700].[/color][COLOR=#0000bb]Int

sqlcmd[/COLOR][color=#007700].[/color][color=#0000bb]Parameters[/color][color=#007700].[/color][color=#0000bb]Add[/color][color=#007700]([/color][color=#0000bb]par[/color][COLOR=#007700])

Try

[/COLOR][color=#0000bb]sqlcn[/color][color=#007700].[/color][color=#0000bb]Open[/color][COLOR=#007700]()

Catch [/COLOR][color=#0000bb]ex [/color][color=#007700]As [/color][COLOR=#0000bb]Exception

MsgBox[/COLOR][color=#007700]([/color][color=#0000bb]ex[/color][color=#007700].[/color][color=#0000bb]Message[/color][COLOR=#007700])

[/COLOR][COLOR=#0000bb]End

End [/COLOR][COLOR=#007700]Try

[/COLOR][color=#0000bb]sqlcmd[/color][color=#007700].[/color][color=#0000bb]ExecuteNonQuery[/color][COLOR=#007700]()

[/COLOR][color=#0000bb]TextBox1[/color][color=#007700].[/color][color=#0000bb]Text [/color][color=#007700]= [/color][color=#0000bb]sqlcmd[/color][color=#007700].[/color][color=#0000bb]Parameters[/color][color=#007700]([/color][color=#dd0000]"@agesavg"[/color][color=#007700]).[/color][color=#0000bb]Value[/color][color=#007700].[/color][COLOR=#0000bb]ToString

sqlcn[/COLOR][color=#007700].[/color][color=#0000bb]Close[/color][COLOR=#007700]()  

[/COLOR][color=#0000bb][/color][/COLOR]

وهكذا في جمل الإستعلام هذه سوف يعود ال parameter بمعدل الأعمار التي في الجدول
( مجموع الأعمار تقسيم عددها )

وعلى هذا النحو تستخدم ال Stored Procedures ....

إلى اللقاء في الدرس القادم إن شاء الله...

الدرس 20- تنفيذ جمل الإستعلام insert-update-delete

Thu, 18 Oct 2012 12:05:41 +0000

كاتب الموضوع : Tarek Aldwire

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

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

أولا : تجهيز المشروع...

أولا قم بإنشاء قاعدة بيانات سمها mydatabase ثم قم بعمل جدول سمه mytable وضعه به عمود إسمه FirstName نوع بياناته nchar وعمود إسمه Age نوع بياناته bigint ...

الان قم بإنشاء الإتصال كما ذكرنا سابقا حيث يكون كود الإتصال كاملا...

قم باستيراد المجال : System.Data.SqlClient

أولا كود الإضافة insert ...

لنفترض الان أننا نريد أن نضيف للجدول mytable موظف إسمه ( tarek) عمره ( 15 ) ...

vb.net :

كود :
[COLOR=#0000BB]Dim cn [/color][color=#007700]As New [/color][COLOR=#0000BB]SqlConnection

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]"insert into mytable values ('tarek','15')"

[/COLOR][color=#0000BB]Dim cmd [/color][color=#007700]As [/color][color=#0000BB]SqlCommand [/color][color=#007700]= New [/color][color=#0000BB]SqlCommand[/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]cmd[/color][color=#007700].[/color][color=#0000BB]ExecuteNonQuery[/color][COLOR=#007700]()

[/COLOR][color=#0000BB]cn[/color][color=#007700].[/color][color=#0000BB]Close[/color][COLOR=#007700]()

[/COLOR]

c#:

كود :
[COLOR=#0000BB]SqlConnection cn [/color][color=#007700]= new [/color][color=#0000BB]SqlConnection[/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][color=#0000BB]string mycmd [/color][color=#007700]= [/color][color=#DD0000]"insert into mytable values ('tarek','15')"[/color][COLOR=#007700];

[/COLOR][color=#0000BB]SqlCommand cmd [/color][color=#007700]= new [/color][color=#0000BB]SqlCommand[/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]cmd[/color][color=#007700].[/color][color=#0000BB]ExecuteNonQuery[/color][COLOR=#007700]();

[/COLOR][color=#0000BB]cn[/color][color=#007700].[/color][color=#0000BB]Close[/color][COLOR=#007700]();

[/COLOR]
2- update ... لنفترض أننا نود تعديل عمر الموظف الذي يدعى tarek إلى 100 سنة يكون الكود:

vb.net :

كود :
[COLOR=#0000BB]Dim cn [/color][color=#007700]As New [/color][COLOR=#0000BB]SqlConnection

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]"update mytable set Age = 100 where FirstName = 'tarek'"

[/COLOR][color=#0000BB]Dim cmd [/color][color=#007700]As [/color][color=#0000BB]SqlCommand [/color][color=#007700]= New [/color][color=#0000BB]SqlCommand[/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]cmd[/color][color=#007700].[/color][color=#0000BB]ExecuteNonQuery[/color][COLOR=#007700]()

[/COLOR][color=#0000BB]cn[/color][color=#007700].[/color][color=#0000BB]Close[/color][COLOR=#007700]()

[/COLOR]
c# :

كود :
[COLOR=#0000BB]SqlConnection cn [/color][color=#007700]= new [/color][color=#0000BB]SqlConnection[/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][color=#0000BB]string mycmd [/color][color=#007700]= [/color][color=#DD0000]"update mytable set Age = 100 where FirstName = 'tarek'"[/color][COLOR=#007700];

[/COLOR][color=#0000BB]SqlCommand cmd [/color][color=#007700]= new [/color][color=#0000BB]SqlCommand[/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]cmd[/color][color=#007700].[/color][color=#0000BB]ExecuteNonQuery[/color][COLOR=#007700]();

[/COLOR][color=#0000BB]cn[/color][color=#007700].[/color][color=#0000BB]Close[/color][COLOR=#007700]();

[/COLOR]

3- delete والان لنفترض أنك تود حذفي ( tarek ) يكون الكود:

vb.net :

كود :
Dim cn [/COLOR][color=#007700]As New [/color][COLOR=#0000BB]SqlConnection

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]"delete from mytable where FirstName = 'tarek'"

[/COLOR][color=#0000BB]Dim cmd [/color][color=#007700]As [/color][color=#0000BB]SqlCommand [/color][color=#007700]= New [/color][color=#0000BB]SqlCommand[/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]cmd[/color][color=#007700].[/color][color=#0000BB]ExecuteNonQuery[/color][COLOR=#007700]()

[/COLOR][color=#0000BB]cn[/color][color=#007700].[/color][color=#0000BB]Close[/color][COLOR=#007700]()

c#:

كود :
[COLOR=#0000BB]SqlConnection cn [/color][color=#007700]= new [/color][color=#0000BB]SqlConnection[/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][color=#0000BB]string mycmd [/color][color=#007700]= [/color][color=#DD0000]"delete from mytable where FirstName = 'tarek'"[/color][COLOR=#007700];

[/COLOR][color=#0000BB]SqlCommand cmd [/color][color=#007700]= new [/color][color=#0000BB]SqlCommand[/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]cmd[/color][color=#007700].[/color][color=#0000BB]ExecuteNonQuery[/color][COLOR=#007700]();

[/COLOR][color=#0000BB]cn[/color][color=#007700].[/color][color=#0000BB]Close[/color][COLOR=#007700]();

[/COLOR]
يتبع...

الدرس 19- ربط قاعدة بيانات accessمع c#-vb.net وتنفيذ جمل إستعلام - الوضع المتصل

Thu, 18 Oct 2012 11:41:21 +0000

[b]

[b]كاتب الموضوع : Tarek Aldwire

[/b]السلام عليكم ورحمة الله وبركاته...
*** ملاحظة : الفرق بين هذا الدرس والدرس 18 هو قاعدة البيانات المستخدمة فقط ***

[/b]

أولا :

قم بإنشاء قاعدة بيانات وسمها mydatabase ( تم شرح الطريقة في الدرس 17 )...
ثم قم بإنشاء جدول بها وسمه mytable وضع فيه عواميد كالتالي...

العمود - الإسم - نوع البيانات
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 إلى ما هنالك...

إلى اللقاء في الدرس القادم إن شاء الله...

الدرس 18- ربط قاعدة بيانات sql مع c#-vb.net وتنفيذ جمل إستعلام - الوضع المتصل

Thu, 18 Oct 2012 11:29:31 +0000

[b]كاتب الموضوع : Tarek Aldwire

--- السلام عليكم ورحمة الله وبركاته ---[/b]

أولا :

العمود - الإسم - نوع البيانات
1 - FirstName - نصية nchar(10)
2 - Age - رقم bigint

الان قم بعرض بيانات الجدول عن طريق RightClick من ال Mouse على الجدول ثم إختر Show Table Data ثم إبدأ بوضع البيانات كالتالي...

طارق - 15
إسمك - عمرك وهكذا ....

ثانيا... ربط قاعدة البيانات مع ال c#,vb.net

أولا قم بإستيراد المجال:

System.Data.SqlClient

الان ضع Button على الفورم وضع أيضا listbox ...

ثم إكتب في الكود الخاص بالحدث Click لل button1 ...

c#:

كود :
[COLOR=#0000BB]SqlConnection cn [/color][color=#007700]= new [/color][color=#0000BB]SqlConnection[/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][color=#0000BB]string mycmd [/color][color=#007700]= [/color][color=#DD0000]"select FirstName,Age from mytable"[/color][COLOR=#007700];

[/COLOR][color=#0000BB]SqlCommand mysqlcmd [/color][color=#007700]= new [/color][color=#0000BB]SqlCommand[/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]SqlDataReader myreader [/color][color=#007700]= [/color][color=#0000BB]mysqlcmd[/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]SqlConnection

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]SqlCommand [/color][color=#007700]= New [/color][color=#0000BB]SqlCommand[/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]SqlDataReader [/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]SqlConnection

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]SqlConnection cn [/color][color=#007700]= new [/color][color=#0000BB]SqlConnection[/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]SqlCommand [/color][color=#007700]= New [/color][color=#0000BB]SqlCommand[/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]SqlCommand mysqlcmd [/color][color=#007700]= new [/color][color=#0000BB]SqlCommand[/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][color=#007700]As [/color][color=#0000BB]SqlDataReader [/color][color=#007700]= [/color][color=#0000BB]cmd[/color][color=#007700].[/color][COLOR=#0000BB]ExecuteReader

c# :

كود :
[color=#0000BB]SqlDataReader myreader [/color][color=#007700]= [/color][color=#0000BB]mysqlcmd[/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]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]
c# :

كود :
[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]
إغلاق كل شيئ تم إستخدامه وهو الإتصال والقارئ...

الان نكون قد بدأنا بأساسيات ربط قواعد البيانات...

إلى اللقاء في الدرس القادم إن شاء الله...

الدرس 17- مقدمة إلى قواعد البيانات

Thu, 18 Oct 2012 11:21:22 +0000

كاتب الموضوع : Tarek Aldwire

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

الان سوف نبدأ بمقدمة عامة عن قواعد البيانات:

____________________________________

ما هي قاعدة البيانات :
هي عبارة عن ملف يحتوي على جداول ( مصفوفات ) تحتوي على أعمدة ( كمصفوفة داخل مصفوفة ) ...

في ماذا تستخدم..؟؟
ألم تسأل نفسك يوما كيف يمكن لبرنامج Windows Live Messenger أن يحفظ كل هذه الأعضاء كل شخص مع كلمة سره الخاصة به مع المعلومات الشخصية عنه ..... الخ....
في الواقع المبدئ واحد وهو قاعدة البيانات...
حيث تقوم الشركة بوضع عمود للإيميل,عمود لل password,عمود لل username وهكذا ...
أنواع قواعد البيانات...
أصبح هناك الكثير منها أشهرها..
SQL server,Access,ORACLE حيث هذه الدورة سوف تختص في sql,access فقط...
أنواع البيانات:
إن من مميزات ال sql كثيرة أنواع بياناتها وهي كالتالي:

smallint : رقم من ‐32,768 إلى 32,768

int : رقم من ‐2,147,483,648 إلى 2,147,483,648

bigint : رقم من ‐9,223,372,036,854,775,808 إلى 9,223,372,036,854,775,808

tinyint : رقم من 0 إلى 255

bit : رقم 0,1 فقط!

decimal : رقم من ‐10^38 +1 إلى 10^38 –1

money: رقم من ‐922,337,203,685,477.5808 إلى +922,337,203,685,477.5807

smallmoney: رقم من ‐214,748.3648 إلى +214,748.3647

float: رقم من ‐1.79E + 308 إلى 1.79E + 308

real : رقم من ‐3.40E + 38 إلى 3.40E + 38

datetime : Jan 1, 1753 إلى Dec 31, 9999

char : حرف ثابت الحجم – يقبل حتى 8000 حرف

varchar : يقبل حتى 8000 حرف –non Unicode

varchar(max) : 455

تحمل حتى non‐Unicode حروف 231 حرف

text : تحمل حتى 2,147,483,647 حرف non‐Unicode حروف

nchar : تحمل حتى 4,000 حرف Unicode حروف ثابتة

nvarchar : تحمل حتى 4,000 حرف Unicode حروف

nvarchar(max) : تحمل حتى non‐Unicode حروف 230 حرف

ntext : تحمل حتى 1,073,741,823 حرف. Unicode حروف

binary: بايت. of بيانات ثنائية ثابتة تحمل حتى 8,000

varbinary: بايت. of بيانات ثنائية متغيرة تحمل حتى 8,000

varbinary(max): بيانات ثنائية متغيرة تحمل حتى 231 بايت

image: بيانات ثنائية تحمل حتى 2,147,483,647 بايت.

أما عن ال Access فلن تجد مثل هذا العدد من الأنواع...
______________________________________________
2- كيفية إنشاء قاعدة البيانات...
من ال Server Explorer ( يمكنك إيجاده في القائمة View )
إضغط Right Click على ال Data Connection ثم إختر Create New SQL Server Database
في ال Server Name أكتب إسم سيرفرك الذي سوف تجد إسمه في ال Server Explorer ثم
إكتب إسم ال DATABASE في New Database name وإضغط ok ...

__________________________________________________ ________________________
ملاحظة هامة جدا :
قد يظهر لك الخطأ التالي:

كود :
[u]An error has occurred while establishing a connection to the server. When connecting to SQL Server 2005,

this failure may be caused by the fact that under the default settings SQL Server does not allow remote

connections. (provider: Named Pipes Provider, error: 40 ‐ Could not open a connection to SQL Server)[/u]

إذا ظهر لك إنسخ الخطأ كما هو وضعه في google وسوف تظهر لك الكثير من الحلول بإذن الله...
__________________________________________________ ________________________

- التمرس على ال server explorer قبل البدئ بالعمل ...
أولا يمكنك إنشاء جدول كالتالي:
إضغط على قاعدة البيانات التي أنشأتها ضغط مزدوج...
الان إضغط Right Click على Tables ثم إضغط Add New Table ثم ضغ في ال Table العواميد التي تشاء مع أنواع بياناتها قم إغلقه سوف يسألك عن إسم ال Table ضع ما تشاء ليكون إسما لهذا الجدول...

*** ملاحظة: يمكنك مشاهدة بيانات جدول ما عن طريق Right Click على الجدول من ال server explorer وبعدها Show Table Data ....

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

إلى اللقاء في الدرس القادم ....

الدرس 16- تصميم الأدوات الخاصة

Thu, 18 Oct 2012 11:20:12 +0000

كاتب الموضوع : Tarek Aldwire

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

في درسنا اليوم سوف نتعلم كيفية تصميم الأدوات الخاصة بك كتصميم Button على شكل دائري مثلا ! أو تصميم ScrollBar خاص بك...

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

- بداية في تصميم الأدوات الخاصة..

قم بإنشاء مشروع جديد من نوع Windows Forms Control Library...
واكتب فيه كالتالي:

كود :
[COLOR=#000000][COLOR=#0000bb] 

using System[/COLOR][COLOR=#007700];

[/COLOR][color=#0000bb]using System[/color][color=#007700].[/color][color=#0000bb]Collections[/color][color=#007700].[/color][color=#0000bb]Generic[/color][COLOR=#007700];

[/COLOR][color=#0000bb]using System[/color][color=#007700].[/color][color=#0000bb]ComponentModel[/color][COLOR=#007700];

[/COLOR][color=#0000bb]using System[/color][color=#007700].[/color][color=#0000bb]Drawing[/color][COLOR=#007700];

[/COLOR][color=#0000bb]using System[/color][color=#007700].[/color][color=#0000bb]Data[/color][COLOR=#007700];

[/COLOR][color=#0000bb]using System[/color][color=#007700].[/color][color=#0000bb]Linq[/color][COLOR=#007700];

[/COLOR][color=#0000bb]using System[/color][color=#007700].[/color][color=#0000bb]Text[/color][COLOR=#007700];

[/COLOR][color=#0000bb]using System[/color][color=#007700].[/color][color=#0000bb]Windows[/color][color=#007700].[/color][color=#0000bb]Forms[/color][COLOR=#007700];

[/COLOR][COLOR=#0000bb]namespace WindowsFormsControlLibrary

[/COLOR][COLOR=#007700]{

public [/COLOR][color=#0000bb]partial [/color][color=#007700]class [/color][color=#0000bb]UserControl1 [/color][color=#007700]: [/color][COLOR=#0000bb]UserControl

[/COLOR][COLOR=#007700]{

public [/COLOR][color=#0000bb]UserControl1[/color][COLOR=#007700]()

{

[/COLOR][color=#0000bb]InitializeComponent[/color][COLOR=#007700]();

[/COLOR][color=#0000bb]this[/color][color=#007700].[/color][color=#0000bb]Paint [/color][color=#007700]+= new [/color][color=#0000bb]PaintEventHandler[/color][color=#007700]([/color][color=#0000bb]UserControl1_Paint[/color][COLOR=#007700]);

}

[/COLOR][color=#0000bb]void UserControl1_Paint[/color][color=#007700]([/color][color=#0000bb]object sender[/color][color=#007700], [/color][color=#0000bb]PaintEventArgs e[/color][COLOR=#007700])

{

[/COLOR][color=#0000bb]Graphics myg [/color][color=#007700]= [/color][color=#0000bb]e[/color][color=#007700].[/color][color=#0000bb]Graphics[/color][COLOR=#007700];

[/COLOR][color=#0000bb]myg[/color][color=#007700].[/color][color=#0000bb]DrawRectangle[/color][color=#007700](new [/color][color=#0000bb]Pen[/color][color=#007700]([/color][color=#0000bb]Brushes[/color][color=#007700].[/color][color=#0000bb]Red[/color][color=#007700]), new [/color][color=#0000bb]Rectangle[/color][color=#007700]([/color][color=#0000bb]0[/color][color=#007700], [/color][color=#0000bb]0[/color][color=#007700], [/color][color=#0000bb]this[/color][color=#007700].[/color][color=#0000bb]Width[/color][color=#007700]-[/color][color=#0000bb]5[/color][color=#007700], [/color][color=#0000bb]this[/color][color=#007700].[/color][color=#0000bb]Height [/color][color=#007700]- [/color][color=#0000bb]5[/color][COLOR=#007700]));

}

}

}  

[/COLOR][color=#0000bb][/color][/COLOR]

ثم قم بحفظ المشروع في مكان ما ثم سوي له Build ...

والان قم بفتح مشروع جديد من نوع Windows Forms Application وضع فيه Button ومن قائمة ال ToolBox إضغط عليها ضغطة يمينية ثم إختر choose items أو إضغط ctrl +t ثم في tap ال .NET إضغط على Browser ثم إختر المشروع السابق وادخل إلى الملف الذي سوف يكون إمتداده .dll ثم إنقر عليه ...

والان سوف تلاحظ أن هناك Control جديد إضيف في ال toolbox ضعه على الفورم وشاهد..

ما هو الكونترول؟؟ هو عبارة عن مستطيل يكبر ويصغر بحسب ما تعطيه أنت الحجم...

مبروك !! أول Control لك أصبح جاهزا...

والان لنقوم بعمل Control أصعب من هذا بقليل...

إنشئ مشروع Windows Forms Control Library ثم ضع على فورمه أداة PictureBox ثم أكتب ما يلي:

كود :
[COLOR=#000000][COLOR=#0000bb] 

using System[/COLOR][COLOR=#007700];

[/COLOR][color=#0000bb]using System[/color][color=#007700].[/color][color=#0000bb]Collections[/color][color=#007700].[/color][color=#0000bb]Generic[/color][COLOR=#007700];

[/COLOR][color=#0000bb]using System[/color][color=#007700].[/color][color=#0000bb]ComponentModel[/color][COLOR=#007700];

[/COLOR][color=#0000bb]using System[/color][color=#007700].[/color][color=#0000bb]Drawing[/color][COLOR=#007700];

[/COLOR][color=#0000bb]using System[/color][color=#007700].[/color][color=#0000bb]Data[/color][COLOR=#007700];

[/COLOR][color=#0000bb]using System[/color][color=#007700].[/color][color=#0000bb]Linq[/color][COLOR=#007700];

[/COLOR][color=#0000bb]using System[/color][color=#007700].[/color][color=#0000bb]Text[/color][COLOR=#007700];

[/COLOR][color=#0000bb]using System[/color][color=#007700].[/color][color=#0000bb]Windows[/color][color=#007700].[/color][color=#0000bb]Forms[/color][COLOR=#007700];

[/COLOR][COLOR=#0000bb]namespace WindowsFormsControlLibrary

[/COLOR][COLOR=#007700]{

public [/COLOR][color=#0000bb]partial [/color][color=#007700]class [/color][color=#0000bb]UserControl1 [/color][color=#007700]: [/color][COLOR=#0000bb]UserControl

[/COLOR][COLOR=#007700]{

public [/COLOR][color=#0000bb]UserControl1[/color][COLOR=#007700]()

{

[/COLOR][color=#0000bb]InitializeComponent[/color][COLOR=#007700]();

}

public [/COLOR][COLOR=#0000bb]Image SelectedImage

[/COLOR][COLOR=#007700]{

[/COLOR][COLOR=#0000bb]set

[/COLOR][COLOR=#007700]{

[/COLOR][color=#0000bb]pictureBox1[/color][color=#007700].[/color][color=#0000bb]Image [/color][color=#007700]= [/color][color=#0000bb]value[/color][COLOR=#007700];

}

[/COLOR][COLOR=#0000bb]get

[/COLOR][COLOR=#007700]{

return [/COLOR][color=#0000bb]pictureBox1[/color][color=#007700].[/color][color=#0000bb]Image[/color][COLOR=#007700];

}

}

}

}  

[/COLOR][color=#0000bb][/color][/COLOR]

وجرب الكونترول في مشروع جديد كما فعلنا في السابق ولكن الان بعد وضع ال Control على ال Form ضع بجانبه Button ثم أكتب في الحدث Click لل Button

كود :
[color=#000000][COLOR=#0000bb]UserControl1[/color][color=#007700].[/color][color=#0000bb]SelectedImage [/color][color=#007700]= [/color][color=#0000bb]Image[/color][color=#007700].[/color][color=#0000bb]FromFile[/color][color=#007700]([/color][color=#dd0000]"هنا ضع عنوان أي صورة"[/color][COLOR=#007700](  

[/COLOR][color=#0000bb][/color][/COLOR]

ويتم إضافة الأحداث لل Control كما في أي Control عادي مثلا :

كود :
[color=#000000][COLOR=#0000bb]UserControl1[/color][color=#007700].[/color][color=#0000bb]Click [/color][color=#007700]+= new [/color][color=#0000bb]EventHandler[/color][color=#007700]([/color][color=#0000bb]UserControl1_Click[/color][COLOR=#007700]);  

[/COLOR][color=#0000bb][/color][/COLOR]

إلى اللقاء في الدرس القادم إن شاء الله...

الدرس 15- البداية مع gdi+

Thu, 18 Oct 2012 11:15:10 +0000

كاتب الموضوع : Tarek Aldwire

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

ماهي ال GDI+ ...

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

أولا : مبادئ في ال GDI+ :
أولا إنشئ مشروع جديد Windows Forms Application ثم ضع على الفورم Button واكتب في الحدث Click الخاص به ما يلي:

كود :
[COLOR=#000000][COLOR=#0000bb] 

Graphics myg [/COLOR][color=#007700]= [/color][color=#0000bb]this[/color][color=#007700].[/color][color=#0000bb]CreateGraphics[/color][COLOR=#007700]();

[/COLOR][color=#0000bb]Pen myp [/color][color=#007700]= new [/color][color=#0000bb]Pen[/color][color=#007700]([/color][color=#0000bb]Brushes[/color][color=#007700].[/color][color=#0000bb]Red[/color][color=#007700], [/color][color=#0000bb]2[/color][COLOR=#007700]);

[/COLOR][color=#0000bb]myg[/color][color=#007700].[/color][color=#0000bb]DrawLine[/color][color=#007700]([/color][color=#0000bb]myp[/color][color=#007700], [/color][color=#0000bb]0[/color][color=#007700], [/color][color=#0000bb]0[/color][color=#007700],[/color][color=#0000bb]this[/color][color=#007700].[/color][color=#0000bb]Width[/color][color=#007700],[/color][color=#0000bb]this[/color][color=#007700].[/color][color=#0000bb]Height[/color][COLOR=#007700]);

[/COLOR][color=#0000bb]myg[/color][color=#007700].[/color][color=#0000bb]Dispose[/color][COLOR=#007700]();  

[/COLOR][color=#0000bb][/color][/COLOR]

جرب الكود ولاحظ...
سوف يرسم خط أحمر من الزاوية العليا اليسرى للفورم إلى الزاوية السفلى اليمنى...
ما الذي حصل؟
أولا:
عندما قمنا بتعريف ال Graphics المراد إستخدامه قمنا بذلك كما هو موضح بالشكل وبما أننا نرسم خارج الحدث Paint فإنه يجب عليك إستخدام هذه الطريقة...
ثانيا:
عندما عرفنا ال Pen قمنا بتحديد اللون كأحمر والعرض كـ 2 pixel ...
ثالثا:
قمنا برسم الخط عن طريق المتغير myg الذي عرفناه كـ Graphics عن طريق الأمر DrawLine
يتم إستخدام هذا الأمر كما هو واضح:

كود :
[color=#000000][COLOR=#0000bb]DrawLine[/color][color=#007700]([/color][color=#0000bb]FirstX[/color][color=#007700],[/color][color=#0000bb]FirstY[/color][color=#007700],[/color][color=#0000bb]SecX[/color][color=#007700],[/color][color=#0000bb]SecY[/color][COLOR=#007700]);  

[/COLOR][color=#0000bb][/color][/COLOR]

وعلى هذا النمط أو عن طريق متغير من نوع Point ...

----- الأوامر الموجودة في المتغير myg -----

-DrawLine تم شرحه
-DrawArc لرسم صورة أو شكل هندسي
- DrawCurve رسم منحنى
- DrawBeziers أيضا لرسم المنحنيات..
- DrawEllipse لرسم الأشكال البيضوية..
- DrawIcon لرسم الأيقونات
- DrawLines رسم مجموعة من الخطوط
- DrawPie رسم مخطط بياني
- DrawString رسم نص
- DrawPath رسم مسار (( متغير من نوع GraphicPath ))
- DrawRectangle لرسم مستطيل
- DrawRectangles لرسم مجموعة من المستطيلات
- FillPie تعبئة مخطط بياني بلون ما..
- FillRectangle تعبئة مستطيل بلون ما
- FillPolygon تعبئة شكل بيضوي........
- FillPath تعبئة مسار .......

الدرس 14- شرح تقنية ال wpf مع بعض الأمثلة

Thu, 18 Oct 2012 11:07:02 +0000

كاتب الموضوع : Tarek Aldwire

السلام عليكم ورحمة الله وبركاته...
أولا: ما هي ال wpf...
خي تقنية جديدة ظهرت مع .net 3.0
حيث أصبح بإمكانك إستخدام لغة XAML لبرمجة واجهات برنامج لذلك نلاحظ أن هذه التقنية لا تخص اللغة من ناحية تصميم الواجهات وإنما تخص لغة XAML وبما أنها كذلك سوف أمر مرورا عليها بعد أن أعرفك بأهم تأثيراتها وميزاتها...

- كيفية الإستخدام ...
قم بإنشاء مشروع جديد ثم إختر WPF Application
سوف يظهر لك برمجة ال XAML في أسفل الشاشة وهنا يتم كتابة الأكواد...
________________________________________
المثال -1-:
عمل بعض التأثيرات على Button ..

كود :
[COLOR=#000000][COLOR=#0000bb] 

        [/COLOR][color=#007700]<[/color][color=#0000bb]Button Margin[/color][color=#007700]=[/color][color=#dd0000]"79,89,0,0" [/color][color=#0000bb]VerticalAlignment[/color][color=#007700]=[/color][color=#dd0000]"Top" [/color][color=#0000bb]Height[/color][color=#007700]=[/color][color=#dd0000]"32" [/color][color=#0000bb]Content[/color][color=#007700]=[/color][color=#dd0000]"Button" [/color][color=#0000bb]Background[/color][color=#007700]=[/color][color=#dd0000]"#FFD95858" [/color][color=#0000bb]BorderThickness[/color][color=#007700]=[/color][color=#dd0000]"7,7,7,7" [/color][color=#0000bb]Foreground[/color][color=#007700]=[/color][color=#dd0000]"#FFFFFFFF" [/color][color=#0000bb]HorizontalAlignment[/color][color=#007700]=[/color][color=#dd0000]"Left" [/color][color=#0000bb]Width[/color][color=#007700]=[/color][color=#dd0000]"128"[/color][COLOR=#007700]>

            <[/COLOR][color=#0000bb]Button[/color][color=#007700].[/color][color=#0000bb]BitmapEffect[/color][COLOR=#007700]>

                <[/COLOR][color=#0000bb]OuterGlowBitmapEffect GlowColor[/color][color=#007700]=[/color][color=#dd0000]"Red"[/color][color=#007700]>

            <[/COLOR][color=#0000bb]Button[/color][color=#007700].[/color][color=#0000bb]BorderBrush[/color][COLOR=#007700]>

                <[/COLOR][color=#0000bb]LinearGradientBrush EndPoint[/color][color=#007700]=[/color][color=#dd0000]"0.5,1" [/color][color=#0000bb]StartPoint[/color][color=#007700]=[/color][color=#dd0000]"0.5,0"[/color][COLOR=#007700]>

                    <[/COLOR][color=#0000bb]GradientStop Color[/color][color=#007700]=[/color][color=#dd0000]"#FF000000" [/color][color=#0000bb]Offset[/color][color=#007700]=[/color][color=#dd0000]"0"[/color][COLOR=#007700]/>

                    <[/COLOR][color=#0000bb]GradientStop Color[/color][color=#007700]=[/color][color=#dd0000]"#FFA48F8F" [/color][color=#0000bb]Offset[/color][color=#007700]=[/color][color=#dd0000]"1"[/color][COLOR=#007700]/>

[/COLOR][color=#0000bb][/color][/COLOR]

حيث يكون الكود كاملا,,

كود :
[COLOR=#000000][COLOR=#0000bb] 

[/COLOR][color=#007700]<[/color][color=#0000bb]Window x[/color][color=#007700]:Class=[/color][COLOR=#dd0000]"Window1"

    [/COLOR][color=#0000bb]xmlns[/color][color=#007700]=[/color][COLOR=#dd0000]"http://schemas.microsoft.com/winfx/2006/xaml/presentation"

    [/COLOR][color=#0000bb]xmlns[/color][color=#007700]:[/color][color=#0000bb]x[/color][color=#007700]=[/color][COLOR=#dd0000]"http://schemas.microsoft.com/winfx/2006/xaml"

    [/COLOR][color=#0000bb]Title[/color][color=#007700]=[/color][color=#dd0000]"Window1" [/color][color=#0000bb]Height[/color][color=#007700]=[/color][color=#dd0000]"365" [/color][color=#0000bb]Width[/color][color=#007700]=[/color][color=#dd0000]"588"[/color][COLOR=#007700]>

    <[/COLOR][color=#0000bb]Grid Height[/color][color=#007700]=[/color][color=#dd0000]"323" [/color][color=#0000bb]Width[/color][color=#007700]=[/color][color=#dd0000]"555"[/color][COLOR=#007700]>

        <[/COLOR][color=#0000bb]Button Margin[/color][color=#007700]=[/color][color=#dd0000]"79,89,0,0" [/color][color=#0000bb]VerticalAlignment[/color][color=#007700]=[/color][color=#dd0000]"Top" [/color][color=#0000bb]Height[/color][color=#007700]=[/color][color=#dd0000]"32" [/color][color=#0000bb]Content[/color][color=#007700]=[/color][color=#dd0000]"Button" [/color][color=#0000bb]Background[/color][color=#007700]=[/color][color=#dd0000]"#FFD95858" [/color][color=#0000bb]BorderThickness[/color][color=#007700]=[/color][color=#dd0000]"7,7,7,7" [/color][color=#0000bb]Foreground[/color][color=#007700]=[/color][color=#dd0000]"#FFFFFFFF" [/color][color=#0000bb]HorizontalAlignment[/color][color=#007700]=[/color][color=#dd0000]"Left" [/color][color=#0000bb]Width[/color][color=#007700]=[/color][color=#dd0000]"128"[/color][COLOR=#007700]>

            <[/COLOR][color=#0000bb]Button[/color][color=#007700].[/color][color=#0000bb]BitmapEffect[/color][COLOR=#007700]>

                <[/COLOR][color=#0000bb]OuterGlowBitmapEffect GlowColor[/color][color=#007700]=[/color][color=#dd0000]"Red"[/color][color=#007700]>

            <[/COLOR][color=#0000bb]Button[/color][color=#007700].[/color][color=#0000bb]BorderBrush[/color][COLOR=#007700]>

                <[/COLOR][color=#0000bb]LinearGradientBrush EndPoint[/color][color=#007700]=[/color][color=#dd0000]"0.5,1" [/color][color=#0000bb]StartPoint[/color][color=#007700]=[/color][color=#dd0000]"0.5,0"[/color][COLOR=#007700]>

                    <[/COLOR][color=#0000bb]GradientStop Color[/color][color=#007700]=[/color][color=#dd0000]"#FF000000" [/color][color=#0000bb]Offset[/color][color=#007700]=[/color][color=#dd0000]"0"[/color][COLOR=#007700]/>

                    <[/COLOR][color=#0000bb]GradientStop Color[/color][color=#007700]=[/color][color=#dd0000]"#FFA48F8F" [/color][color=#0000bb]Offset[/color][color=#007700]=[/color][color=#dd0000]"1"[/color][COLOR=#007700]/>

[/COLOR][color=#0000bb][/color][/COLOR]

- المثال 2:
عمل ProgressBar أفقي مع بعض التأثيرات المختلفة عما سبق..

كود :
[color=#000000][COLOR=#0000bb][/color][color=#007700]<[/color][COLOR=#0000bb]Window

 xmlns[/COLOR][color=#007700]=[/color][COLOR=#dd0000]"http://schemas.microsoft.com/winfx/2006/xaml/presentation"

 [/COLOR][color=#0000bb]xmlns[/color][color=#007700]:[/color][color=#0000bb]x[/color][color=#007700]=[/color][COLOR=#dd0000]"http://schemas.microsoft.com/winfx/2006/xaml"

 [/COLOR][color=#0000bb]x[/color][color=#007700]:Class=[/color][COLOR=#dd0000]"UntitledProject1.Window1"

 [/COLOR][color=#0000bb]x[/color][color=#007700]:[/color][color=#0000bb]Name[/color][color=#007700]=[/color][COLOR=#dd0000]"Window"

 [/COLOR][color=#0000bb]Title[/color][color=#007700]=[/color][COLOR=#dd0000]"Window1"

 [/COLOR][color=#0000bb]Width[/color][color=#007700]=[/color][color=#dd0000]"640" [/color][color=#0000bb]Height[/color][color=#007700]=[/color][color=#dd0000]"480"[/color][COLOR=#007700]>

    <[/COLOR][color=#0000bb]Grid x[/color][color=#007700]:[/color][color=#0000bb]Name[/color][color=#007700]=[/color][color=#dd0000]"LayoutRoot"[/color][COLOR=#007700]>

        <[/COLOR][color=#0000bb]ProgressBar Margin[/color][color=#007700]=[/color][color=#dd0000]"200,193,221,0" [/color][color=#0000bb]VerticalAlignment[/color][color=#007700]=[/color][color=#dd0000]"Top" [/color][color=#0000bb]Height[/color][color=#007700]=[/color][color=#dd0000]"19" [/color][color=#0000bb]RenderTransformOrigin[/color][color=#007700]=[/color][color=#dd0000]"0.5,0.5" [/color][color=#0000bb]BorderThickness[/color][color=#007700]=[/color][color=#dd0000]"2,2,2,2" [/color][color=#0000bb]Background[/color][color=#007700]=[/color][color=#dd0000]"#FFD79B9B" [/color][color=#0000bb]Value[/color][color=#007700]=[/color][color=#dd0000]"50" [/color][color=#0000bb]Foreground[/color][color=#007700]=[/color][color=#dd0000]"#FF304058" [/color][color=#0000bb]Orientation[/color][color=#007700]=[/color][color=#dd0000]"Horizontal" [/color][color=#0000bb]SmallChange[/color][color=#007700]=[/color][color=#dd0000]"5"[/color][COLOR=#007700]>

            <[/COLOR][color=#0000bb]ProgressBar[/color][color=#007700].[/color][color=#0000bb]BitmapEffect[/color][COLOR=#007700]>

                <[/COLOR][color=#0000bb]BevelBitmapEffect[/color][color=#007700]>

            <[/COLOR][color=#0000bb]ProgressBar[/color][color=#007700].[/color][color=#0000bb]BorderBrush[/color][COLOR=#007700]>

                <[/COLOR][color=#0000bb]LinearGradientBrush EndPoint[/color][color=#007700]=[/color][color=#dd0000]"0.5,1" [/color][color=#0000bb]StartPoint[/color][color=#007700]=[/color][color=#dd0000]"0.5,0"[/color][COLOR=#007700]>

                    <[/COLOR][color=#0000bb]GradientStop Color[/color][color=#007700]=[/color][color=#dd0000]"#FFFF0000" [/color][color=#0000bb]Offset[/color][color=#007700]=[/color][color=#dd0000]"0"[/color][COLOR=#007700]/>

                    <[/COLOR][color=#0000bb]GradientStop Color[/color][color=#007700]=[/color][color=#dd0000]"#FF000000" [/color][color=#0000bb]Offset[/color][color=#007700]=[/color][color=#dd0000]"1"[/color][COLOR=#007700]/>

            <[/COLOR][color=#0000bb]ProgressBar[/color][color=#007700].[/color][color=#0000bb]OpacityMask[/color][COLOR=#007700]>

                <[/COLOR][color=#0000bb]LinearGradientBrush EndPoint[/color][color=#007700]=[/color][color=#dd0000]"0.5,1" [/color][color=#0000bb]StartPoint[/color][color=#007700]=[/color][color=#dd0000]"0.5,0"[/color][COLOR=#007700]>

                    <[/COLOR][color=#0000bb]GradientStop Color[/color][color=#007700]=[/color][color=#dd0000]"#FF000000" [/color][color=#0000bb]Offset[/color][color=#007700]=[/color][color=#dd0000]"0"[/color][COLOR=#007700]/>

                    <[/COLOR][color=#0000bb]GradientStop Color[/color][color=#007700]=[/color][color=#dd0000]"#FFB43E3E" [/color][color=#0000bb]Offset[/color][color=#007700]=[/color][color=#dd0000]"1"[/color][COLOR=#007700]/>

            <[/COLOR][color=#0000bb]ProgressBar[/color][color=#007700].[/color][color=#0000bb]RenderTransform[/color][COLOR=#007700]>

                <[/COLOR][color=#0000bb]TransformGroup[/color][COLOR=#007700]>

                    <[/COLOR][color=#0000bb]ScaleTransform ScaleX[/color][color=#007700]=[/color][color=#dd0000]"1" [/color][color=#0000bb]ScaleY[/color][color=#007700]=[/color][color=#dd0000]"1"[/color][COLOR=#007700]/>

                    <[/COLOR][color=#0000bb]SkewTransform AngleX[/color][color=#007700]=[/color][color=#dd0000]"-3.5041414214731503E-15" [/color][color=#0000bb]AngleY[/color][color=#007700]=[/color][color=#dd0000]"0"[/color][COLOR=#007700]/>

                    <[/COLOR][color=#0000bb]RotateTransform Angle[/color][color=#007700]=[/color][color=#dd0000]"-90"[/color][COLOR=#007700]/>

                    <[/COLOR][color=#0000bb]TranslateTransform X[/color][color=#007700]=[/color][color=#dd0000]"0" [/color][color=#0000bb]Y[/color][color=#007700]=[/color][color=#dd0000]"0"[/color][COLOR=#007700]/>

[/COLOR][color=#0000bb][/color][/COLOR]

الدرس 13- Multi-Threading

Thu, 18 Oct 2012 11:03:56 +0000

[b]كاتب الموضوع : Tarek Aldwire

[/b]السلام عليكم ورحمة الله وبركاته...

في درسنا اليوم سوف ندرس ال Multi-Threading (( المسارات المتعددة )) وهي مهمة جدا لأي برنامج يحوي على عمليات خارجية مثل القيام بفحص للفيروسات من قبل برنامج Anti-Virus أو جلب أسماء ملفات ما وما شابه ذلك...

سوف نستخدم في هذا الدرس المجال
System.Threading.Thread
لذلك قم من الان باستيراده

تبيين فائدة ال Multi-Threading ...

سوف أقوم بمقارنة مباشرة لذلك أولا سوف نستخدم برنامج لجلب أسماء الملفات بنفس الThread قم سوف نقوم ببرنامج اخر يقوم بنفس الوظيفة ولكن يستخدم Multi-Threading ...
وسوف يقوم البرنامج بعد جلب أسماء الملفات بكتابتها في ملف نصي...

البرنامج الأول: ( Single Threading ):

قم بإنشاء مشروع WindowsFormsApplication جديد وضع به Button

الكود البرنامج بعض وضع الأداة كاملا (( للإختصار )):

كود :
[COLOR=#0000BB]using System[/color][COLOR=#007700];

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]Collections[/color][color=#007700].[/color][color=#0000BB]Generic[/color][COLOR=#007700];

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]ComponentModel[/color][COLOR=#007700];

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]Data[/color][COLOR=#007700];

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]Drawing[/color][COLOR=#007700];

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]Linq[/color][COLOR=#007700];

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]Text[/color][COLOR=#007700];

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]Windows[/color][color=#007700].[/color][color=#0000BB]Forms[/color][COLOR=#007700];

[/COLOR][COLOR=#0000BB]namespace WindowsFormsApplication20

[/COLOR][COLOR=#007700]{

public [/COLOR][color=#0000BB]partial [/color][color=#007700]class [/color][color=#0000BB]Form1 [/color][color=#007700]: [/color][COLOR=#0000BB]Form

[/COLOR][COLOR=#007700]{

public [/COLOR][color=#0000BB]Form1[/color][COLOR=#007700]()

{

[/COLOR][color=#0000BB]InitializeComponent[/color][COLOR=#007700]();

}

[/COLOR][color=#0000BB]System[/color][color=#007700].[/color][color=#0000BB]Collections[/color][color=#007700].[/color][color=#0000BB]ArrayList myarr [/color][color=#007700]= new [/color][color=#0000BB]System[/color][color=#007700].[/color][color=#0000BB]Collections[/color][color=#007700].[/color][color=#0000BB]ArrayList[/color][COLOR=#007700]();

private [/COLOR][color=#0000BB]void button1_Click[/color][color=#007700]([/color][color=#0000BB]object sender[/color][color=#007700], [/color][color=#0000BB]EventArgs e[/color][COLOR=#007700])

{

if ([/COLOR][color=#0000BB]System[/color][color=#007700].[/color][color=#0000BB]IO[/color][color=#007700].[/color][color=#0000BB]Directory[/color][color=#007700].[/color][color=#0000BB]Exists[/color][color=#007700]([/color][color=#DD0000]"c:\test"[/color][color=#007700]) == [/color][color=#0000BB]false[/color][COLOR=#007700]) 

{

[/COLOR][color=#0000BB]System[/color][color=#007700].[/color][color=#0000BB]IO[/color][color=#007700].[/color][color=#0000BB]Directory[/color][color=#007700].[/color][color=#0000BB]CreateDirectory[/color][color=#007700](@[/color][color=#DD0000]"c:\test"[/color][COLOR=#007700]);

}

foreach ([/COLOR][color=#0000BB]string x in System[/color][color=#007700].[/color][color=#0000BB]IO[/color][color=#007700].[/color][color=#0000BB]Directory[/color][color=#007700].[/color][color=#0000BB]GetFiles[/color][color=#007700](@[/color][color=#DD0000]"c:\windows\system32"[/color][COLOR=#007700]))

{

[/COLOR][color=#0000BB]myarr[/color][color=#007700].[/color][color=#0000BB]Add[/color][color=#007700]([/color][color=#0000BB]x[/color][COLOR=#007700]);

}

[/COLOR][color=#0000BB]System[/color][color=#007700].[/color][color=#0000BB]IO[/color][color=#007700].[/color][color=#0000BB]StreamWriter myw [/color][color=#007700]= new [/color][color=#0000BB]System[/color][color=#007700].[/color][color=#0000BB]IO[/color][color=#007700].[/color][color=#0000BB]StreamWriter[/color][color=#007700](@[/color][color=#DD0000]"c:\test\mytest.txt"[/color][COLOR=#007700]);

foreach ([/COLOR][color=#0000BB]string fx in myarr[/color][COLOR=#007700])

{

[/COLOR][color=#0000BB]myw[/color][color=#007700].[/color][color=#0000BB]WriteLine[/color][color=#007700]([/color][color=#0000BB]fx[/color][COLOR=#007700]);

}

[/COLOR][color=#0000BB]myw[/color][color=#007700].[/color][color=#0000BB]Close[/color][COLOR=#007700]();

}

}

}

[/COLOR]
جرب البرنامج بالضغط على الButton ولاحظ... سوف يتوقف البرنامج عن العمل لمدة حوال 1 ثانية ثم يتم إضافة أسماء الملفات الموجودة في c:\windows\system32 إلى الملف...
حسنا الان مع حوال 2000 ملف توقف البرنامج لمدة 1 ثانية ماذا لو كنا نود عمل فحص للكومبيوتر كاملا؟؟؟؟ سوف يتوقف البرنامج عن العمل لمدة قد تصل إلى 30 دقيقة أو أكثر (( الشيئ متعلق بسرعة الكومبيوتر وكمية الملفات ))
(( ملاحظة إذا لم تلاحظ توقف الكومبيوتر فأعد التجربة في مكان يحوي على ملفات أكثر ))

--- وهنا ومن أجل ذلك تم إختراع مبدأ ال multi-threading حيث أصبح بإمكانك عمل كل تحركاتك دون أي تأثير على أداء البرنامج لنأخذ مثال على نفس البرنامج مع ال multi-threading

ضع أيضا نقس الأدوات السابقة (Listbox,Button) واكتب الكود التالي:

كود :
using System[/COLOR][COLOR=#007700];

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]Collections[/color][color=#007700].[/color][color=#0000BB]Generic[/color][COLOR=#007700];

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]ComponentModel[/color][COLOR=#007700];

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]Data[/color][COLOR=#007700];

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]Drawing[/color][COLOR=#007700];

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]Linq[/color][COLOR=#007700];

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]Text[/color][COLOR=#007700];

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]Windows[/color][color=#007700].[/color][color=#0000BB]Forms[/color][COLOR=#007700];

[/COLOR][COLOR=#0000BB]namespace WindowsFormsApplication20

[/COLOR][COLOR=#007700]{

public [/COLOR][color=#0000BB]partial [/color][color=#007700]class [/color][color=#0000BB]Form1 [/color][color=#007700]: [/color][COLOR=#0000BB]Form

[/COLOR][COLOR=#007700]{

public [/COLOR][color=#0000BB]Form1[/color][COLOR=#007700]()

{

[/COLOR][color=#0000BB]InitializeComponent[/color][COLOR=#007700]();

}

[/COLOR][color=#0000BB]System[/color][color=#007700].[/color][color=#0000BB]Collections[/color][color=#007700].[/color][color=#0000BB]ArrayList myarr [/color][color=#007700]= new [/color][color=#0000BB]System[/color][color=#007700].[/color][color=#0000BB]Collections[/color][color=#007700].[/color][color=#0000BB]ArrayList[/color][COLOR=#007700]();

private [/COLOR][color=#0000BB]void button1_Click[/color][color=#007700]([/color][color=#0000BB]object sender[/color][color=#007700], [/color][color=#0000BB]EventArgs e[/color][COLOR=#007700])

{

[/COLOR][color=#0000BB]System[/color][color=#007700].[/color][color=#0000BB]Threading[/color][color=#007700].[/color][color=#0000BB]Thread mythread [/color][color=#007700]= new [/color][color=#0000BB]System[/color][color=#007700].[/color][color=#0000BB]Threading[/color][color=#007700].[/color][color=#0000BB]Thread[/color][color=#007700]([/color][color=#0000BB]dowork[/color][COLOR=#007700]);

[/COLOR][color=#0000BB]mythread[/color][color=#007700].[/color][color=#0000BB]Priority [/color][color=#007700]= [/color][color=#0000BB]System[/color][color=#007700].[/color][color=#0000BB]Threading[/color][color=#007700].[/color][color=#0000BB]ThreadPriority[/color][color=#007700].[/color][color=#0000BB]Lowest[/color][COLOR=#007700];

[/COLOR][color=#0000BB]mythread[/color][color=#007700].[/color][color=#0000BB]Start[/color][COLOR=#007700]();

}

private [/COLOR][color=#0000BB]void dowork[/color][COLOR=#007700]()

{

if ([/COLOR][color=#0000BB]System[/color][color=#007700].[/color][color=#0000BB]IO[/color][color=#007700].[/color][color=#0000BB]Directory[/color][color=#007700].[/color][color=#0000BB]Exists[/color][color=#007700]([/color][color=#DD0000]"c:\test"[/color][color=#007700]) == [/color][color=#0000BB]false[/color][COLOR=#007700])

{

[/COLOR][color=#0000BB]System[/color][color=#007700].[/color][color=#0000BB]IO[/color][color=#007700].[/color][color=#0000BB]Directory[/color][color=#007700].[/color][color=#0000BB]CreateDirectory[/color][color=#007700](@[/color][color=#DD0000]"c:\test"[/color][COLOR=#007700]);

}

foreach ([/COLOR][color=#0000BB]string x in System[/color][color=#007700].[/color][color=#0000BB]IO[/color][color=#007700].[/color][color=#0000BB]Directory[/color][color=#007700].[/color][color=#0000BB]GetFiles[/color][color=#007700](@[/color][color=#DD0000]"c:\windows\system32"[/color][COLOR=#007700]))

{

[/COLOR][color=#0000BB]myarr[/color][color=#007700].[/color][color=#0000BB]Add[/color][color=#007700]([/color][color=#0000BB]x[/color][COLOR=#007700]);

}

[/COLOR][color=#0000BB]System[/color][color=#007700].[/color][color=#0000BB]IO[/color][color=#007700].[/color][color=#0000BB]StreamWriter myw [/color][color=#007700]= new [/color][color=#0000BB]System[/color][color=#007700].[/color][color=#0000BB]IO[/color][color=#007700].[/color][color=#0000BB]StreamWriter[/color][color=#007700](@[/color][color=#DD0000]"c:\test\mytest.txt"[/color][COLOR=#007700]);

foreach ([/COLOR][color=#0000BB]string fx in myarr[/color][COLOR=#007700])

{

[/COLOR][color=#0000BB]myw[/color][color=#007700].[/color][color=#0000BB]WriteLine[/color][color=#007700]([/color][color=#0000BB]fx[/color][COLOR=#007700]);

}

[/COLOR][color=#0000BB]myw[/color][color=#007700].[/color][color=#0000BB]Close[/color][COLOR=#007700]();

[/COLOR][color=#0000BB]MessageBox[/color][color=#007700].[/color][color=#0000BB]Show[/color][color=#007700]([/color][color=#DD0000]"Progress Completed!"[/color][COLOR=#007700]);

}

}

}

سوف تلاحظ عمل نفس الشيئ ولكن دون أي توقف أو بطئ للبرنامج مهما كان عدد الملفات...

أهم ما في الفئة Thread ...

1- Start وهي لبدأ ال Thread
2-Suspend لإيقاف الThread مؤقتا...
3- Abort لإيقاف ال Thread تهائيا...
4- Resume لإكمال ال Thread
5- IsBackGround ... جاء وقت شرحها...

إن ال BackGround Thread تتشابه بحد كبير مع ال Thread العادي ولكن الفرق يكمن بينهما في ما يلي...

أولا ضع Button وكتب في الحدث Click الخاص به:

كود :
[COLOR=#0000BB]System[/color][color=#007700].[/color][color=#0000BB]Threading[/color][color=#007700].[/color][color=#0000BB]Thread[/color][color=#007700].[/color][color=#0000BB]CurrentThread[/color][color=#007700].[/color][color=#0000BB]Abort[/color][COLOR=#007700]();

[/COLOR]
سوف تلاحظ أن البرنامج توقف عن العمل ولكن لماذا؟؟؟؟

السبب:
لم يعد هناك أي Fore Thread حي ولذلك تم إغلاق البرنامج ...

نتيجة... :إذا لم هناك أي Fore Thread قيد الإستخدام يغلق البرنامج...

أما لو كان ال Thread الذي يعمل مع برنامجك بشكل إفتراضي مع BackGround Thread فلن تراه في عمرك ...

فحتى لو كان هناك BackGround Thread حي و لا يوجد أي Fore Thread فسوف يغلق البرنامج دون أن يهتم بالباقي....

أما العكس فليس صحيح..

أرجو أن تكون قد إستفدت من هذا الدرس ولكن حديثنا عن ال Threads لم ينتهي بل سوف يكون هناك له بقية إن شاء الله للتجنب بالوقوع في أخطار هذه ال Thread لأن لها أخطار كبيرة على برنامجك... سوف تعرفها في ما يلي...

إلى اللقاء في الدرس القادم إن شاء الله...

الدرس 12- شرح تقنية WCF والتخصص بال Sockets مع مثال

Thu, 18 Oct 2012 10:57:07 +0000

[b]كاتب الموضوع : Tarek Aldwire

[/b]السلام عليكم ورحمة الله وبركاته...
اليوم وفي أول درس من المستوى المتوسط أولا سوف نقوم بشرح ال WCF بشكل عام ثم التخصص بالSockets

أولا: WCF : Windows Communication Foundation

هي تقنية جديدة مقدمة من Microsoft للبرامج التي تعمل في الإتصال مع شبكات أو مع كومبيوترات أخرى ... مثل برامج الحادثة (( أي تقنية للربط بين جهازين ما ))

- ما هي مجالات إستخدام ال WCF ...
لا تظن أن تقنية ال WCF ظهرت من أجل غرض فقط بل يمكنك من خلالها القيام ب WebService وذلك كما سوف ترى في الدروس القادمة...

أن العمل على المجال العام للربط بين الأجهزة أو ماشابه ذلك يتم في المجال System.Runtime.Remoting

ولكن نحن لن نستخدمه أبدا لأننا سوف نستخدم شيئ أقوى من هذا المجال العام لهذا الغرض وهو ال Sockets ....

البداية مع ال Sockets:
لأدخلك من باب رائع في إستخدام ال Sockets أولا عليك فهم ما يلي:

1- IP Address :
وهو عنوان بروتوكول الإنترنت ويكون ال ip لكل كومبيوتر غير متصل بشبكة هو 127.0.0.1
أما الكمبيوتر المتصل بشبكة فسوف يكون رقم ما غير معين...

2- Port:
وهي المنفذ الذي يقوم البرنامج بالإنتظار بينما يقوم البرنامج الاخر بالإتصال على هذا المنفذ وتكون ال Port من تحديدك مثلا 1220...

- تكوينة برامج الإتصال...

أولا يجب أن تفهم مايلي:
1- أن كل برنامج من هذا النوع يتألف من Server و Cilent (( خادم و عميل ))
2- ما الخادم والعميل إلا برنامجان متصلان مع بعضهم البعض بواسطة IP Address و Port موحدة...
3- إن العميل هو الذي يرسل البيانات للخادم لكي يتم تنفيذ ما تريد...
4- إن الخادم مهمته إنتظار العميل بينما يقوم بالإتصال به عبر ال IPAddress الخاص بالجهاز الذي يملكه الخادم.

- مثال بسيط...

قم بإنشاء مشروع WindowsFormApplication جديد وسميه Cilent ...

وفتح ال Visual Studio مرة أخرى وقم بإنشاء مشروع Console Application جديد...

الان إذهب إلى ال Cilent وبدأ معي:

أولا قم بتعريف المتغيرين العامين التاليين على الشكل التالي:
رموز PHP:

كود :
Socket mysoc [/color][color=#007700]= new [/color][color=#0000BB]Socket[/color][color=#007700]([/color][color=#0000BB]AddressFamily[/color][color=#007700].[/color][color=#0000BB]InterNetwork[/color][color=#007700], [/color][color=#0000BB]SocketType[/color][color=#007700].[/color][color=#0000BB]Stream[/color][color=#007700], [/color][color=#0000BB]ProtocolType[/color][color=#007700].[/color][color=#0000BB]IP[/color][COLOR=#007700]); 

        [/COLOR][color=#0000BB]IPEndPoint PCLocation [/color][color=#007700]= new [/color][color=#0000BB]IPEndPoint[/color][color=#007700]([/color][color=#0000BB]IPAddress[/color][color=#007700].[/color][color=#0000BB]Parse[/color][color=#007700]([/color][color=#DD0000]"127.0.0.1"[/color][color=#007700]), [/color][color=#0000BB]1480[/color][COLOR=#007700]);

(( تنبيه للمنتقلين من المستوى المبتدئ متغير عام يعني أن يضع المتغير داخل Class وليس داخل دوال ما مثلا كما فعلنا الان فيكون الكود كاملا:

رموز PHP:

كود :
[COLOR=#0000BB]namespace Cilent 

[/COLOR][COLOR=#007700]{ 

    public [/COLOR][color=#0000BB]partial [/color][color=#007700]class [/color][color=#0000BB]Form1 [/color][color=#007700]: [/color][COLOR=#0000BB]Form 

    [/COLOR][COLOR=#007700]{ 

        [/COLOR][color=#0000BB]Socket mysoc [/color][color=#007700]= new [/color][color=#0000BB]Socket[/color][color=#007700]([/color][color=#0000BB]AddressFamily[/color][color=#007700].[/color][color=#0000BB]InterNetwork[/color][color=#007700], [/color][color=#0000BB]SocketType[/color][color=#007700].[/color][color=#0000BB]Stream[/color][color=#007700], [/color][color=#0000BB]ProtocolType[/color][color=#007700].[/color][color=#0000BB]IP[/color][COLOR=#007700]); 

        [/COLOR][color=#0000BB]IPEndPoint PCLocation [/color][color=#007700]= new [/color][color=#0000BB]IPEndPoint[/color][color=#007700]([/color][color=#0000BB]IPAddress[/color][color=#007700].[/color][color=#0000BB]Parse[/color][color=#007700]([/color][color=#DD0000]"127.0.0.1"[/color][color=#007700]), [/color][color=#0000BB]1480[/color][COLOR=#007700]); 

        public [/COLOR][color=#0000BB]Form1[/color][COLOR=#007700]() 

        { 

            [/COLOR][color=#0000BB]InitializeComponent[/color][COLOR=#007700](); 

        } 

    } 

}

[/COLOR]
قهكذا يكون المتغير عام ))

أولا سوف نشرح المتغير الأول mysoc وهو ال Socket المستخدمة لإقامة الإتصال بين البرنامجين وأما عن المعطيات فلا تقلق فشرحها سوف تجده ولكن الان يهمني أن تعلم أن اخر معطية هي أننا نود إستخدام ال IP Address لكي يجد البرنامجين بعضهما...

ثانيا: PCLocation وهو متغير يتم من خلاله تحديد ال IPAddress وال Port للكومبيوتر لإستخدامها في ما بعد وأما عن الدالة Parse فقد تم شرحها في الدروس السابقة...

الان ضع ثلاثة Button وسم الأول Connect والثاني Disconnect والثالث Send Message

الان أدخل إلى الحدث Click الخاص بال Button1 واكتب...

رموز PHP:

كود :
[color=#007700]if ([/color][color=#0000BB]mysoc[/color][color=#007700].[/color][color=#0000BB]Connected [/color][color=#007700]== [/color][color=#0000BB]false[/color][COLOR=#007700]) 

            { 

                try 

                { 

                    [/COLOR][color=#0000BB]mysoc[/color][color=#007700].[/color][color=#0000BB]Connect[/color][color=#007700]([/color][color=#0000BB]PCLocation[/color][COLOR=#007700]); 

                } 

                catch ([/COLOR][color=#0000BB]Exception x[/color][COLOR=#007700]) 

                { 

                    [/COLOR][color=#0000BB]MessageBox[/color][color=#007700].[/color][color=#0000BB]Show[/color][color=#007700]([/color][color=#0000BB]x[/color][color=#007700].[/color][color=#0000BB]Message[/color][COLOR=#007700]); 

                } 

            } 

            else if ([/COLOR][color=#0000BB]mysoc[/color][color=#007700].[/color][color=#0000BB]Connected [/color][color=#007700]== [/color][color=#0000BB]true[/color][COLOR=#007700]) 

            { 

                [/COLOR][color=#0000BB]MessageBox[/color][color=#007700].[/color][color=#0000BB]Show[/color][color=#007700]([/color][color=#DD0000]"you are already connected to a server in:" [/color][color=#007700]+ [/color][color=#0000BB]mysoc[/color][color=#007700].[/color][color=#0000BB]LocalEndPoint[/color][COLOR=#007700]); 

            }

[/COLOR]
وهنا قد إستخدمنا الأمر Connect كما هو واضح أعلاه حيث أعطيناه مكان الكومبيوتر الاخر...

** أظن أن هذا الكود واضح تماما **

والان إذهب إلى الحدث Click لل Button2 واكتب...
رموز PHP:

كود :
[color=#007700]if ([/color][color=#0000BB]mysoc[/color][color=#007700].[/color][color=#0000BB]Connected [/color][color=#007700]== [/color][color=#0000BB]true[/color][COLOR=#007700]) 

            { 

                try 

                { 

                    [/COLOR][color=#0000BB]mysoc[/color][color=#007700].[/color][color=#0000BB]Disconnect[/color][color=#007700]([/color][color=#0000BB]false[/color][COLOR=#007700]); 

                } 

                catch ([/COLOR][color=#0000BB]Exception x[/color][COLOR=#007700]) 

                { 

                    [/COLOR][color=#0000BB]MessageBox[/color][color=#007700].[/color][color=#0000BB]Show[/color][color=#007700]([/color][color=#0000BB]x[/color][color=#007700].[/color][color=#0000BB]Message[/color][COLOR=#007700]); 

                } 

            } 

            else if ([/COLOR][color=#0000BB]mysoc[/color][color=#007700].[/color][color=#0000BB]Connected [/color][color=#007700]== [/color][color=#0000BB]false[/color][COLOR=#007700]) 

            { 

                [/COLOR][color=#0000BB]MessageBox[/color][color=#007700].[/color][color=#0000BB]Show[/color][color=#007700]([/color][color=#DD0000]"your are not connecting to any server.."[/color][COLOR=#007700]); 

            }

[/COLOR]
والان إذهب إلى الحدث Click الخاص بال Button3 واكتب...

رموز PHP:

كود :
[color=#007700]if ([/color][color=#0000BB]mysoc[/color][color=#007700].[/color][color=#0000BB]Connected [/color][color=#007700]== [/color][color=#0000BB]true[/color][COLOR=#007700]) 

            { 

                try 

                { 

                    [/COLOR][color=#0000BB]byte[/color][color=#007700][] [/color][color=#0000BB]mymes [/color][color=#007700]= new [/color][color=#0000BB]byte[/color][color=#007700][[/color][color=#0000BB]5[/color][COLOR=#007700]]; 

                    [/COLOR][color=#0000BB]mymes[/color][color=#007700][[/color][color=#0000BB]0[/color][color=#007700]] = [/color][color=#0000BB]1[/color][COLOR=#007700]; 

                    [/COLOR][color=#0000BB]mymes[/color][color=#007700][[/color][color=#0000BB]1[/color][color=#007700]] = [/color][color=#0000BB]2[/color][COLOR=#007700]; 

                    [/COLOR][color=#0000BB]mymes[/color][color=#007700][[/color][color=#0000BB]2[/color][color=#007700]] = [/color][color=#0000BB]3[/color][COLOR=#007700]; 

                    [/COLOR][color=#0000BB]mymes[/color][color=#007700][[/color][color=#0000BB]3[/color][color=#007700]] = [/color][color=#0000BB]4[/color][COLOR=#007700]; 

                    [/COLOR][color=#0000BB]mymes[/color][color=#007700][[/color][color=#0000BB]4[/color][color=#007700]] = [/color][color=#0000BB]5[/color][COLOR=#007700]; 

                    [/COLOR][color=#0000BB]mysoc[/color][color=#007700].[/color][color=#0000BB]Send[/color][color=#007700]([/color][color=#0000BB]mymes[/color][COLOR=#007700]); 

                } 

                catch ([/COLOR][color=#0000BB]Exception x[/color][COLOR=#007700]) 

                { 

                    [/COLOR][color=#0000BB]MessageBox[/color][color=#007700].[/color][color=#0000BB]Show[/color][color=#007700]([/color][color=#0000BB]x[/color][color=#007700].[/color][color=#0000BB]Message[/color][COLOR=#007700]); 

                } 

            } 

            else if ([/COLOR][color=#0000BB]mysoc[/color][color=#007700].[/color][color=#0000BB]Connected [/color][color=#007700]== [/color][color=#0000BB]false[/color][COLOR=#007700]) 

            { 

                [/COLOR][color=#0000BB]MessageBox[/color][color=#007700].[/color][color=#0000BB]Show[/color][color=#007700]([/color][color=#DD0000]"Connect to server first!"[/color][COLOR=#007700]); 

            }

[/COLOR]
وهكذا نكون قد أتتممنا ال Cilent ...

__________________________________________________ ______________________

والان حان دور ال Server ...

كون السيرفر Console Application فإنه في حال فقدان جميع ال ForeTherads سوف يغلق البرنامج لذلك سوف نضطر إلى عمل Thread لا منتهية لحل هذه الأزمة...
(( لا يقلق الصاعدين من المبتدئ لأن هذا الموضوع لم أتطرق عليه بالدورة بعد ولكن وقته بات قريبا ))

قم بعمل ال Thread بالشكل التالي:

ولا قم بإضافة هذا الأمر:

رموز PHP:

كود :
[color=#007700]static [/color][color=#0000BB]void infinity[/color][COLOR=#007700]() 

        { 

            [/COLOR][color=#0000BB]System[/color][color=#007700].[/color][color=#0000BB]Threading[/color][color=#007700].[/color][color=#0000BB]Thread[/color][color=#007700].[/color][color=#0000BB]CurrentThread[/color][color=#007700].[/color][color=#0000BB]Suspend[/color][COLOR=#007700](); 

        }

[/COLOR]
ثم ضف Thread وشغلها كالتالي:
رموز PHP:

كود :
System[/color][color=#007700].[/color][color=#0000BB]Threading[/color][color=#007700].[/color][color=#0000BB]Thread life [/color][color=#007700]= new [/color][color=#0000BB]System[/color][color=#007700].[/color][color=#0000BB]Threading[/color][color=#007700].[/color][color=#0000BB]Thread[/color][color=#007700]([/color][color=#0000BB]infinity[/color][COLOR=#007700]); 

            [/COLOR][color=#0000BB]life[/color][color=#007700].[/color][color=#0000BB]Start[/color][COLOR=#007700]();

فيصبح الكود كامل:

رموز PHP:

كود :
[COLOR=#0000BB]namespace Server 

[/COLOR][COLOR=#007700]{ 

    class [/COLOR][COLOR=#0000BB]Program 

    [/COLOR][COLOR=#007700]{ 

        static [/COLOR][color=#0000BB]void Main[/color][color=#007700]([/color][color=#0000BB]string[/color][color=#007700][] [/color][color=#0000BB]args[/color][COLOR=#007700]) 

        { 

            [/COLOR][color=#0000BB]System[/color][color=#007700].[/color][color=#0000BB]Threading[/color][color=#007700].[/color][color=#0000BB]Thread life [/color][color=#007700]= new [/color][color=#0000BB]System[/color][color=#007700].[/color][color=#0000BB]Threading[/color][color=#007700].[/color][color=#0000BB]Thread[/color][color=#007700]([/color][color=#0000BB]infinity[/color][COLOR=#007700]); 

            [/COLOR][color=#0000BB]life[/color][color=#007700].[/color][color=#0000BB]Start[/color][COLOR=#007700](); 

        } 

        static [/COLOR][color=#0000BB]void infinity[/color][COLOR=#007700]() 

        { 

            [/COLOR][color=#0000BB]System[/color][color=#007700].[/color][color=#0000BB]Threading[/color][color=#007700].[/color][color=#0000BB]Thread[/color][color=#007700].[/color][color=#0000BB]CurrentThread[/color][color=#007700].[/color][color=#0000BB]Suspend[/color][COLOR=#007700](); 

        } 

    } 

}

[/COLOR]
والان لنبدأ بالسيرفر:

أولا قم بتعريف المتغيرين العامين نفسهم...
رموز PHP:

كود :
[color=#007700]static [/color][color=#0000BB]Socket mysoc [/color][color=#007700]= new [/color][color=#0000BB]Socket[/color][color=#007700]([/color][color=#0000BB]AddressFamily[/color][color=#007700].[/color][color=#0000BB]InterNetwork[/color][color=#007700], [/color][color=#0000BB]SocketType[/color][color=#007700].[/color][color=#0000BB]Stream[/color][color=#007700], [/color][color=#0000BB]ProtocolType[/color][color=#007700].[/color][color=#0000BB]IP[/color][COLOR=#007700]); 

        static [/COLOR][color=#0000BB]IPEndPoint PCLocation [/color][color=#007700]= new [/color][color=#0000BB]IPEndPoint[/color][color=#007700]([/color][color=#0000BB]IPAddress[/color][color=#007700].[/color][color=#0000BB]Parse[/color][color=#007700]([/color][color=#DD0000]"127.0.0.1"[/color][color=#007700]), [/color][color=#0000BB]1480[/color][COLOR=#007700]);

[/COLOR]
ثم بعد بعض الإضافات يكون الكود كاملا...

رموز PHP:

كود :
[color=#0000BB]using System[/color][COLOR=#007700]; 

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]Collections[/color][color=#007700].[/color][color=#0000BB]Generic[/color][COLOR=#007700]; 

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]Linq[/color][COLOR=#007700]; 

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]Text[/color][COLOR=#007700]; 

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]Net[/color][color=#007700].[/color][color=#0000BB]Sockets[/color][COLOR=#007700]; 

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]Net[/color][COLOR=#007700]; 

[/COLOR][COLOR=#0000BB]namespace Server 

[/COLOR][COLOR=#007700]{ 

    class [/COLOR][COLOR=#0000BB]Program 

    [/COLOR][COLOR=#007700]{ 

       static [/COLOR][color=#0000BB]Socket mysoc [/color][color=#007700]= new [/color][color=#0000BB]Socket[/color][color=#007700]([/color][color=#0000BB]AddressFamily[/color][color=#007700].[/color][color=#0000BB]InterNetwork[/color][color=#007700], [/color][color=#0000BB]SocketType[/color][color=#007700].[/color][color=#0000BB]Stream[/color][color=#007700], [/color][color=#0000BB]ProtocolType[/color][color=#007700].[/color][color=#0000BB]IP[/color][COLOR=#007700]); 

       static [/COLOR][color=#0000BB]IPEndPoint PCLocation [/color][color=#007700]= new [/color][color=#0000BB]IPEndPoint[/color][color=#007700]([/color][color=#0000BB]IPAddress[/color][color=#007700].[/color][color=#0000BB]Any[/color][color=#007700], [/color][color=#0000BB]1480[/color][COLOR=#007700]); 

        static [/COLOR][color=#0000BB]void Main[/color][color=#007700]([/color][color=#0000BB]string[/color][color=#007700][] [/color][color=#0000BB]args[/color][COLOR=#007700]) 

        { 

            [/COLOR][color=#0000BB]System[/color][color=#007700].[/color][color=#0000BB]Threading[/color][color=#007700].[/color][color=#0000BB]Thread life [/color][color=#007700]= new [/color][color=#0000BB]System[/color][color=#007700].[/color][color=#0000BB]Threading[/color][color=#007700].[/color][color=#0000BB]Thread[/color][color=#007700]([/color][color=#0000BB]infinity[/color][COLOR=#007700]); 

            [/COLOR][color=#0000BB]System[/color][color=#007700].[/color][color=#0000BB]Threading[/color][color=#007700].[/color][color=#0000BB]Thread listen [/color][color=#007700]= new [/color][color=#0000BB]System[/color][color=#007700].[/color][color=#0000BB]Threading[/color][color=#007700].[/color][color=#0000BB]Thread[/color][color=#007700]([/color][color=#0000BB]filerec[/color][COLOR=#007700]); 

            [/COLOR][color=#0000BB]listen[/color][color=#007700].[/color][color=#0000BB]Start[/color][COLOR=#007700](); 

            [/COLOR][color=#0000BB]life[/color][color=#007700].[/color][color=#0000BB]Start[/color][COLOR=#007700](); 

        } 

        static [/COLOR][color=#0000BB]void infinity[/color][COLOR=#007700]() 

        { 

            [/COLOR][color=#0000BB]System[/color][color=#007700].[/color][color=#0000BB]Threading[/color][color=#007700].[/color][color=#0000BB]Thread[/color][color=#007700].[/color][color=#0000BB]CurrentThread[/color][color=#007700].[/color][color=#0000BB]Suspend[/color][COLOR=#007700](); 

        } 

        static [/COLOR][color=#0000BB]void filerec[/color][COLOR=#007700]() 

        { 

            [/COLOR][color=#0000BB]mysoc[/color][color=#007700].[/color][color=#0000BB]Bind[/color][color=#007700]([/color][color=#0000BB]PCLocation[/color][COLOR=#007700]); 

            [/COLOR][color=#0000BB]mysoc[/color][color=#007700].[/color][color=#0000BB]Listen[/color][color=#007700]([/color][color=#0000BB]5[/color][COLOR=#007700]); 

            [/COLOR][color=#0000BB]Console[/color][color=#007700].[/color][color=#0000BB]WriteLine[/color][color=#007700]([/color][color=#DD0000]"waiting for cilent..."[/color][COLOR=#007700]); 

            [/COLOR][color=#0000BB]Socket cilent [/color][color=#007700]= [/color][color=#0000BB]mysoc[/color][color=#007700].[/color][color=#0000BB]Accept[/color][COLOR=#007700](); 

            [/COLOR][color=#0000BB]Console[/color][color=#007700].[/color][color=#0000BB]WriteLine[/color][color=#007700]([/color][color=#DD0000]"connection accept!  receving data..."[/color][COLOR=#007700]); 

            [/COLOR][color=#0000BB]byte[/color][color=#007700][] [/color][color=#0000BB]msg [/color][color=#007700]= new [/color][color=#0000BB]byte[/color][color=#007700][[/color][color=#0000BB]5[/color][COLOR=#007700]]; 

            [/COLOR][color=#0000BB]cilent[/color][color=#007700].[/color][color=#0000BB]Receive[/color][color=#007700]([/color][color=#0000BB]msg[/color][COLOR=#007700]); 

            [/COLOR][color=#0000BB]Console[/color][color=#007700].[/color][color=#0000BB]WriteLine[/color][color=#007700]([/color][color=#0000BB]msg[/color][color=#007700][[/color][color=#0000BB]0[/color][color=#007700]].[/color][color=#0000BB]ToString[/color][COLOR=#007700]()); 

            [/COLOR][color=#0000BB]Console[/color][color=#007700].[/color][color=#0000BB]WriteLine[/color][color=#007700]([/color][color=#0000BB]msg[/color][color=#007700][[/color][color=#0000BB]1[/color][color=#007700]].[/color][color=#0000BB]ToString[/color][COLOR=#007700]()); 

            [/COLOR][color=#0000BB]Console[/color][color=#007700].[/color][color=#0000BB]WriteLine[/color][color=#007700]([/color][color=#0000BB]msg[/color][color=#007700][[/color][color=#0000BB]2[/color][color=#007700]].[/color][color=#0000BB]ToString[/color][COLOR=#007700]()); 

            [/COLOR][color=#0000BB]Console[/color][color=#007700].[/color][color=#0000BB]WriteLine[/color][color=#007700]([/color][color=#0000BB]msg[/color][color=#007700][[/color][color=#0000BB]3[/color][color=#007700]].[/color][color=#0000BB]ToString[/color][COLOR=#007700]()); 

            [/COLOR][color=#0000BB]Console[/color][color=#007700].[/color][color=#0000BB]WriteLine[/color][color=#007700]([/color][color=#0000BB]msg[/color][color=#007700][[/color][color=#0000BB]4[/color][color=#007700]].[/color][color=#0000BB]ToString[/color][COLOR=#007700]()); 

        } 

    } 

}

[/COLOR]
والان لم يبقى عليك إلا تجربة البرنامج كالتالي...

إفتح الServer ثم إفتح ال Cilent وإضغط على زر Connect سوف تلاحظ إتصل ال Cilent بال Server
الان إضغط على زر Send Message فقوم ال Cilent بإرسال رسالة إلى ال Server ويقوم ال Server بتلقيها وطباعتها على ال Console

مبروك!! أول برنامج لك في عالم ال Sockets أصبح جاهزا...

يتبع في الدرس القادم إن شاء الله.

الدرس 10- تعرف على أهم ال Controls

Thu, 18 Oct 2012 10:46:50 +0000

[b]كاتب الموضوع : Tarek Aldwire

[/b]السلام عليكم ورحمة الله وبركاته...

في هذا الدرس سوف نقوم بشرح أهم الأدوات الموجودة داخل ال Visual Studio 2008
وهي كالتالي:
TextBox
label
PictureBox
ProgressBar
Numeric UpDown
Masked TextBox
Radio Button
Tool Tip
Web Browser
ComboBox
ListBox

ملاحظة : أن أكثر الخواص التي تملكها هذه الأدوات هي خواص متماثلة حيث تجدها في كل هذه الأدوات ومنها:
Enabled : تتحكم بإن كان الأداة تعمل أم لا
Nane: إسم الأداة
Location : تحديد مكان الأداة
Maximum Size : ومن خلالها تحدد أكبر حجم ممكن
Minimum Size : أصغر حجم ممكن
Dock : تفعيل خاصية Dock في الجهة التي تريد
Cursor : تتحكم بأيقونة الفأرة عند الإقتراب على الأداة

__________________________________________________ __________________

أولا: TextBox
وهو عبارة عن صندوق يكتب به النص المراد إدخاله للبرنامج وأهم خصائصه هي كالتالي:
Text : ومن خلالها يتم تحديد أو جلب ما كتب فيه
Font : ومن خلالها يتم تحديد حجم الخط , نوعه , وحدات قياسه ....
ForeColor : ويتم من خلالها تحديد اللون للخط
BackColor : ويتم من خلالها تحديد لون الخلفية لل TextBox

- مثال على إستخدامه:

كود :
[color=#0000BB]textBox1[/color][color=#007700].[/color][color=#0000BB]Text [/color][color=#007700]= [/color][color=#DD0000]"i love text boxes"[/color][COLOR=#007700]; 

[/COLOR][color=#0000BB]textBox1[/color][color=#007700].[/color][color=#0000BB]ForeColor [/color][color=#007700]= [/color][color=#0000BB]Color[/color][color=#007700].[/color][color=#0000BB]Red[/color][COLOR=#007700]; 

[/COLOR][color=#0000BB]textBox1[/color][color=#007700].[/color][color=#0000BB]BackColor [/color][color=#007700]= [/color][color=#0000BB]Color[/color][color=#007700].[/color][color=#0000BB]Yellow[/color][COLOR=#007700];

[/COLOR]
(( بعدتجربت هذا الكود سوف تؤلمك عيونك بسبب الألون التي أجدها مزعحة بالنسبة لي ))

2- label
وهي صندوق للكتابة أيضا ولكن لا يمكن للمستخدم الكتابة بها حيث يقتصر إستخدامها عليم فقط.
وخواصها هي نس خواص ال TextBox

3- PictureBox

وهي أداة يتم من خلالها عرض الصور أهم خواصها:
Image ومن خلالها تحدد الصورة التي تود عرضها به

مثال على إستخدامها:

كود :
pictureBox1[/color][color=#007700].[/color][color=#0000BB]Image [/color][color=#007700]= [/color][color=#0000BB]Image[/color][color=#007700].[/color][color=#0000BB]FromFile[/color][color=#007700]([/color][color=#DD0000]"your image url"[/color][COLOR=#007700]);

4-Progress Bar
وهي أداة تستخدم لإظهار مقدار تقدم ما مثل التنصيب... وأهم خواصها:
Value وهي من خلالها يتم تحديد قيمت المنجز من الشيئ
Maximum ومن هنا يتم تحديد أقصى فيمة لها ((( وإذا كانت ال Value = ال Maximum فإنها سوف تكون كلها باللون الأخضر ))

Minimum : تحديد أصغر قيمة له

Styel : تحديد نوع ال Progress Bar..
MarqueeAnimationSpeed ومن خلالها يتم تحديد سرعة ال ProgressBar إذا تم إختيار ال Styel كـ Marquee

مثال على إستخدامها:

كود :
[color=#0000BB]progressBar1[/color][color=#007700].[/color][color=#0000BB]Maximum [/color][color=#007700]= [/color][color=#0000BB]500[/color][COLOR=#007700]; 

            [/COLOR][color=#0000BB]progressBar1[/color][color=#007700].[/color][color=#0000BB]Minimum [/color][color=#007700]= [/color][color=#0000BB]0[/color][COLOR=#007700]; 

            [/COLOR][color=#0000BB]progressBar1[/color][color=#007700].[/color][color=#0000BB]Value [/color][color=#007700]= [/color][color=#0000BB]250[/color][COLOR=#007700];

[/COLOR]
مثال اخر بفرض أننا نريد تحديد ال Styel كـ Marquee

كود :
progressBar1[/color][color=#007700].[/color][color=#0000BB]MarqueeAnimationSpeed [/color][color=#007700]= [/color][color=#0000BB]50[/color][COLOR=#007700]; 

            [/COLOR][color=#0000BB]progressBar1[/color][color=#007700].[/color][color=#0000BB]Style [/color][color=#007700]= [/color][color=#0000BB]ProgressBarStyle[/color][color=#007700].[/color][color=#0000BB]Marquee[/color][COLOR=#007700];

5- Numeric UpDown
وتستخدم هذه الأداة لكتابة الأرقام فقط مثلا العمر.. وأهم خصائصها:
Value وهي كالقيمة Text بالنسبة لل TextBox ولكنها لا تقبل إلا الأرقام
مثال على إستحدامها:

كود :
numericUpDown1[/color][color=#007700].[/color][color=#0000BB]Value [/color][color=#007700]= [/color][color=#0000BB]50[/color][COLOR=#007700]; 

            [/COLOR][color=#0000BB]MessageBox[/color][color=#007700].[/color][color=#0000BB]Show[/color][color=#007700]([/color][color=#0000BB]numericUpDown1[/color][color=#007700].[/color][color=#0000BB]Value[/color][color=#007700].[/color][color=#0000BB]ToString[/color][COLOR=#007700]());

6- Masked TextBox
ويستخدم لكتابة شيئ محدد مثل التاريخ, رقم الهاتف وميزته أنه يمكنه رسم التفاصيل التي تود أن يدخلها المستخدم كما تشاء وأهم خواصه:

Mask وهي من خلالها يتم تحديد ال Mask حيث أكتب أصفارا مكان الرموز المراد إدخالها ورمز خاص أين ما تشاء مثل 0000 00 00

مثال على إستخدامها:
سوف أجعله يرسم بشكل مناسب لإدخال التاريخ:

كود :
maskedTextBox1[/color][color=#007700].[/color][color=#0000BB]Mask [/color][color=#007700]= [/color][color=#DD0000]"0000 00 00"[/color][COLOR=#007700];

7- Radio Button
وهي أداة تستخدم للإختيار المتعدد ولذلك لا يمكنك إستخدام واحدة منها فقط بل يجب أن يكون على الأقل 2 أهم خواصها:

Checked وهي التي بحدد إن كانت الأداة محددة أم لا
AutoCheck وتعني أنه عندما يتم النقر على ال RadioButton يتم تحديدها وأنصحك أن تجعلها true لأنه إذا سويتها false سوف يصبح التعامل معها صعب...

مثال على إستخدامها (( ضع إثنين Radio Button على ال Form واكتب )):

كود :
[color=#007700]if ([/color][color=#0000BB]radioButton1[/color][color=#007700].[/color][color=#0000BB]Checked [/color][color=#007700]== [/color][color=#0000BB]true[/color][COLOR=#007700]) 

            { 

                [/COLOR][color=#0000BB]MessageBox[/color][color=#007700].[/color][color=#0000BB]Show[/color][color=#007700]([/color][color=#DD0000]"The Selected Radio Button Is Radio Button1"[/color][COLOR=#007700]); 

            } 

            else if ([/COLOR][color=#0000BB]radioButton2[/color][color=#007700].[/color][color=#0000BB]Checked [/color][color=#007700]== [/color][color=#0000BB]true[/color][COLOR=#007700]) 

            { 

                [/COLOR][color=#0000BB]MessageBox[/color][color=#007700].[/color][color=#0000BB]Show[/color][color=#007700]([/color][color=#DD0000]"The Selected Radio Button Is Radio Button2"[/color][COLOR=#007700]); 

            } 

            else 

            { 

                [/COLOR][color=#0000BB]MessageBox[/color][color=#007700].[/color][color=#0000BB]Show[/color][color=#007700]([/color][color=#DD0000]"Please Select A Radio Button!"[/color][COLOR=#007700]); 

            }

[/COLOR]
8- ToolTip
وهي أداة تستخدم لإظهار التلميحات عن أداة معينة وأهم خوصها:
IsBallon : وهنا تحدد هل هي على شكل بالون
ToolTipIcon: أيقونة التلميح (( خطا , معلومة , تحذير ... ))
ToolTipTitle : عنوان التلميح
Reshow Delay : ومن خلالها تحدد بعد بكم تظهر الرسالة من وقوف الفأرة فوق الاداة...

مثال على إستخدامها:
ضع بوتون على الفورم بعد إضافة الأداة ToolTip وذهب إلى خاصية ToolTip on toolTip1
واكتب التلميح الذي تريد ويمكنك إنجاز ذلك برمجيا كالتالي:

كود :
[color=#0000BB]toolTip1[/color][color=#007700].[/color][color=#0000BB]SetToolTip[/color][color=#007700]([/color][color=#0000BB]button1[/color][color=#007700], [/color][color=#DD0000]"my button is beatuful"[/color][COLOR=#007700]);

[/COLOR]
9- WebBrowser
وهي أداة لتصفح الإنترنت وهي بسيطة جدا من ناحية التعامل أهم خصائصها:
url ومن خلاله يتم الإستعلام حول الurl المتصفح الان..

مثال على إستخدامه...

كود :
webBrowser1[/color][color=#007700].[/color][color=#0000BB]Navigate[/color][color=#007700]([/color][color=#DD0000]"http://www.google.com"[/color][COLOR=#007700]);

10 - ComboBox
وهو صندوق يتم به إضافة عناصر للإظهار أو الإدخال تكون عناصره كمصفوفة وأهم خواصه:
Items وهي التي من خلالها يتم تحديد عناصره ( أكتب في كل سطر عنصر )

أو برمجيا:

كود :
[color=#0000BB]comboBox1[/color][color=#007700].[/color][color=#0000BB]Items[/color][color=#007700].[/color][color=#0000BB]Add[/color][color=#007700]([/color][color=#DD0000]"MyItem"[/color][COLOR=#007700]);

[/COLOR]
مثال على إستخدامه:
أولا جلب العناصر:

كود :
[color=#007700]foreach ([/color][color=#0000BB]string x in listBox1[/color][color=#007700].[/color][color=#0000BB]Items[/color][COLOR=#007700]) 

            { 

                [/COLOR][color=#0000BB]MessageBox[/color][color=#007700].[/color][color=#0000BB]Show[/color][color=#007700]([/color][color=#0000BB]x[/color][COLOR=#007700]); 

            }

[/COLOR]
ثانيا إضافة عنصر:

كود :
[color=#0000BB]comboBox1[/color][color=#007700].[/color][color=#0000BB]Items[/color][color=#007700].[/color][color=#0000BB]Add[/color][color=#007700]([/color][color=#DD0000]"MyItem"[/color][COLOR=#007700]);

[/COLOR]
ثالثا : معرقة ما هو العنصر المحدد:

كود :
MessageBox[/color][color=#007700].[/color][color=#0000BB]Show[/color][color=#007700]([/color][color=#0000BB]listBox1[/color][color=#007700].[/color][color=#0000BB]SelectedItem[/color][color=#007700].[/color][color=#0000BB]ToString[/color][COLOR=#007700]());

رابعا : تحديد عنصر ما حسب الترتيب:

كود :
[color=#0000BB]listBox1[/color][color=#007700].[/color][color=#0000BB]SelectedIndex [/color][color=#007700]= [/color][color=#0000BB]2[/color][COLOR=#007700];

[/COLOR]
حيث سوف يتم في هذا الكود تعيين العنصر الثالث

خامسا : تحديد العنصر حسب المكتوب به:

كود :
listBox1[/color][color=#007700].[/color][color=#0000BB]SelectedItem [/color][color=#007700]= [/color][color=#DD0000]"td"[/color][COLOR=#007700];

11- ListBox
وهي أداة مماثلة تماما لل ComboBox والفرق الوحيد بينهما هو طريقة العرض

أرجو أن أكون قد أفدتكم في هذا الدرس...
وإلى اللقاء في الدرس القادم إن شاء الله...

الدرس 9- التعامل مع الأحداث وتنسيقها

Thu, 18 Oct 2012 10:40:50 +0000

[b]كاتب الموضوع : Tarek Aldwire

[/b]
السلام عليكم ورحمة الله...

في درسنا اليوم سوف نتعلم كيف نتعامل مع الأحداث والتي تعد من أساسيات أي Control تقوم بإضافته إلى الفورم

أولا : قم بإنشاء مشروع جديد وضع عليه Button فقط...

والان إضغط ضغطا مزدوجا على ال Button واكتب في الحدث Click الخاص به كما تعلمنا سابقا:

كود :
[COLOR=#0000BB]MessageBox[/color][color=#007700].[/color][color=#0000BB]Show[/color][color=#007700]([/color][color=#DD0000]"MyMessage"[/color][color=#007700]);[/color]

ثم جرب البرنامج حيث سوف يكون عندما تضغط على ال Button يستدعى الحدث Click مما أدى إلى بدء الأمر الذي كتبناه أعلاه..

ولكن أين تم إضافة الأمر إلى حدث وكيف يتم ذلك؟؟؟

الان دعك من ما فعلناه وأكتب تحت الأمر InitializeComponent أي هنا:

كود :
[COLOR=#007700]public [/color][color=#0000BB]Form1[/color][COLOR=#007700]() 

        { 

            [/COLOR][color=#0000BB]InitializeComponent[/color][COLOR=#007700](); 

     [/COLOR][COLOR=#0000BB]هنا 

        [/COLOR][color=#007700]}[/color]

أكتب:

كود :
button1

كود :
[color=#007700].[/color][color=#0000BB]MouseEnter [/color][color=#007700]+= new [/color][color=#0000BB]EventHandler[/color][color=#007700]([/color][color=#0000BB]entermousevoid[/color][color=#007700]);[/color]

ولا تقلق بشأن الخطأ الناتج عن هذا الكود لأن الأمر ليس موجود حاليا...

والان أنشئ الأمر entermousevoid كالتالي:

كود :
[COLOR=#007700]private [/color][color=#0000BB]void entermousevoid[/color][color=#007700]([/color][color=#0000BB]object sender[/color][color=#007700], [/color][color=#0000BB]EventArgs e[/color][COLOR=#007700]) 

        { 

        }[/COLOR]

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

واكتب به .

كود :
[color=#0000BB]MessageBox[/color][color=#007700].[/color][color=#0000BB]Show[/color][color=#007700]([/color][color=#DD0000]"MyMessage"[/color][color=#007700]);[/color]

والان قم بتجريب البرنامج وادخل الفأرة على ال Button سوف تلاحظ أن الأمر نفذ!
والسبب أنه قد إستدعى الحدث MouseEnter وعلى ذلك فإن الأمر الذي أنشأناه entermousevoid
قد ربطناه بهاذا الحدث ولذلك تم تنفيذه عند إستدعاء الحدث...

هناك الكثير من الأحداث سوف أشرح وقت تنفيذ بعض منها...

MouseMove : يتنفذ عند تحريك الفأرة فوق ال Control المضاف إليه الأمر على حدثه
MouseDown : يتنفذ عندما يتم ضغط أي زر من الماوس
MouseUp : يتنفذ عندما يتم تحرير كبسة الماوس
KeyDown : عند ضغط أي زر كان
MouseWhile: عند ضغط أو تحريك دولاب الفأرة
MouseLeave : عند خروج الفأرة عن ال Control
LostFocus : عندما يخسر التركيز
GotFocus : عندما يستلم التركيز
KeyUp : عند تحرير أي زر من الكيبورد
FontChanged: عند تغيير الخط
ForeColorChanged : عند تغيير اللون الأمامي
DoubleClick : عند الضغط المزدوج
Resize : عند إعادة التحجيم
Paint : عند رسم الأداة
VisibleChanged : إذا تغيرت خاصية Visible للإداة

هذه أهم الأحداث على ما أظن ويمكنك إستكشاف باقي الأحداث يدويا ...

لتوفير وتسهيل كتابة الأمور لكل أمر نضيفه إلى حدث عند كتابة الإضافة إفعل ما يلي:

button1.Click +=
ثم إضغط على زر Tab مرتين حيث سوف يتم إضافة الأمر مع لب parameters المناسبة تلقائيا...

مثلا MouseLeave
رموز PHP:

كود :
[color=#007700]public [/color][color=#0000BB]Form1[/color][COLOR=#007700]() 

        { 

            [/COLOR][color=#0000BB]InitializeComponent[/color][COLOR=#007700](); 

            [/COLOR][color=#0000BB]button1[/color][color=#007700].[/color][color=#0000BB]MouseLeave [/color][color=#007700]+= new [/color][color=#0000BB]EventHandler[/color][color=#007700]([/color][color=#0000BB]button1_MouseLeave[/color][COLOR=#007700]); 

        } 

        [/COLOR][color=#0000BB]void button1_MouseLeave[/color][color=#007700]([/color][color=#0000BB]object sender[/color][color=#007700], [/color][color=#0000BB]EventArgs e[/color][COLOR=#007700]) 

        { 

            throw new [/COLOR][color=#0000BB]NotImplementedException[/color][COLOR=#007700](); 

        }[/COLOR]

إحذف السطر الذي يتم كتابته تلقائيا والذي هو:
رموز PHP:

كود :
[color=#007700]throw new [/color][color=#0000BB]NotImplementedException[/color][color=#007700]();[/color]

وكتب الأمر كما يحلو لك

أظن أنه أصبح لديك معلومات جيدة عن الأحداث

ولكي تعلم أين يتم إضافة الحدث button1_Click عند الضغط المزدوج عليه من solution explorer إضغط على الفورم التي تحوي الأداة ومن قائمتها المسندلة إدخل على ال
Form1.Designer ومن هنا سوف تجد كل شيئ عن ذلك

إلى اللقاء في الدرس القادم إن شاء الله ...

الدرس 8- أمثلة عملية على ما مضى

Thu, 18 Oct 2012 10:24:46 +0000

[b]كاتب الموضوع : Tarek Aldwire

[/b]
السلام عليكم ورحمة الله وبركاته ...

نظرا لأني قد رأيت الكثير من الأعضاء قد ضلوا الطريق بعد الدروس المتتالية...
في هذا اليوم لن تجد درس كالعادة بل سوف تجد أمثلة غملية على كل ما تعلمنا وسوف تكون هذه الأمثلة عبارة عن برامج بسيطة سوف نبرمجها سويا... وسوف أقسمها إلى
المستوى الأول - المستوى الثاني - المستوى الثالث

أولا : المستوى الأول...
البرنامج الأول: برنامج نقوم بإعطاءه الإسم الأول والكنية فيعود لنا بالإسم كاملا...
مانحتاجه في البرنامج...
1- 2 TextBox حيث سوف يتم إدخال الإسم في الأول والكنية في الثاني
2- label حيث سوف يتم كتابة الإسم الكامل بها...
3- Button حيث سوف يتم إظهار الإسم عند ضغطه...

بعد إضافة الأدوات السابقة أكتب الكود في الحدث Click للButton:

كود :
label1[/COLOR][color=#007700].[/color][color=#0000BB]Text [/color][color=#007700]= [/color][color=#0000BB]textBox1[/color][color=#007700].[/color][color=#0000BB]Text [/color][color=#007700]+ [/color][color=#DD0000]" " [/color][color=#007700]+ [/color][color=#0000BB]textBox2[/color][color=#007700].[/color][color=#0000BB]Text[/color][color=#007700];[/color]

[COLOR=#007700]

وجرب البرنامج....

________________________________________
المستوى الثاني...
البرنامج الثاني: برنامج نرسل له ثلاث أرقام فيقوم بإعادة (الرقم الأول + الرقم الثاني ) x الرقم الثالث...

ما تحتاجه في البرنامج...
1- 3 TextBox حيث سوف يتم وضع في كل واحد منها رقم ولكن أنتبه يجب أن تكون على التوالي:
TextBox1,TextBox2,TextBox3 بشكل عمودي

2- label لكي يتم كتابة الناتج بها...
3- Button لكي يتم إظهار الناتج عند ضغط الزر...
بعد إضافة الأدوات ...
الكود:

أولا نقوم بعمل الأمر الخاص بذلك الذي سوف يكون على النمط التالي: (( يمكنك إظهار صفحة محرر الأكواد بالضغط على f7)

كود :
[COLOR=#007700]private [/color][color=#0000BB]void WhatIsTheAnswer[/color][color=#007700]([/color][color=#0000BB]double Num1[/color][color=#007700], [/color][color=#0000BB]double Num2[/color][color=#007700], [/color][color=#0000BB]double Num3[/color][color=#007700],[/color][color=#0000BB]out double answer[/color][COLOR=#007700]) 

        { 

            [/COLOR][color=#0000BB]answer [/color][color=#007700]= ([/color][color=#0000BB]Num1 [/color][color=#007700]+ [/color][color=#0000BB]Num2[/color][color=#007700]) * [/color][color=#0000BB]Num3[/color][COLOR=#007700]; 

        }[/COLOR]

(( ولمن واجه أخطاء في مكان كتابة الكود فإن الكود كاملا سوف يكون كالتالي :

كود :
[COLOR=#0000BB]using System[/color][COLOR=#007700]; 

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]Collections[/color][color=#007700].[/color][color=#0000BB]Generic[/color][COLOR=#007700]; 

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]ComponentModel[/color][COLOR=#007700]; 

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]Data[/color][COLOR=#007700]; 

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]Drawing[/color][COLOR=#007700]; 

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]Linq[/color][COLOR=#007700]; 

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]Text[/color][COLOR=#007700]; 

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]Windows[/color][color=#007700].[/color][color=#0000BB]Forms[/color][COLOR=#007700]; 

[/COLOR][COLOR=#0000BB]namespace WindowsFormsApplication11 

[/COLOR][COLOR=#007700]{ 

    public [/COLOR][color=#0000BB]partial [/color][color=#007700]class [/color][color=#0000BB]Form1 [/color][color=#007700]: [/color][COLOR=#0000BB]Form 

    [/COLOR][COLOR=#007700]{ 

        public [/COLOR][color=#0000BB]Form1[/color][COLOR=#007700]() 

        { 

            [/COLOR][color=#0000BB]InitializeComponent[/color][COLOR=#007700](); 

        } 

        private [/COLOR][color=#0000BB]void WhatIsTheAnswer[/color][color=#007700]([/color][color=#0000BB]double Num1[/color][color=#007700], [/color][color=#0000BB]double Num2[/color][color=#007700], [/color][color=#0000BB]double Num3[/color][color=#007700],[/color][color=#0000BB]out double answer[/color][COLOR=#007700]) 

        { 

            [/COLOR][color=#0000BB]answer [/color][color=#007700]= ([/color][color=#0000BB]Num1 [/color][color=#007700]+ [/color][color=#0000BB]Num2[/color][color=#007700]) * [/color][color=#0000BB]Num3[/color][COLOR=#007700]; 

        } 

    } 

}[/COLOR]

))

والان بعد عمل الأمر الخاص بذلك ندخل إلى الحدث Click لل Button1 عن طريق الضغط المزدوج عليه أو بأي طريقة أخرى ونكتب..

كود :
[COLOR=#007700]private [/color][color=#0000BB]void button1_Click[/color][color=#007700]([/color][color=#0000BB]object sender[/color][color=#007700], [/color][color=#0000BB]EventArgs e[/color][COLOR=#007700]) 

        { 

            try 

            { 

                [/COLOR][color=#0000BB]double answer [/color][color=#007700]= [/color][color=#0000BB]0[/color][COLOR=#007700]; 

                [/COLOR][color=#0000BB]WhatIsTheAnswer[/color][color=#007700]([/color][color=#0000BB]double[/color][color=#007700].[/color][color=#0000BB]Parse[/color][color=#007700]([/color][color=#0000BB]textBox1[/color][color=#007700].[/color][color=#0000BB]Text[/color][color=#007700]), [/color][color=#0000BB]double[/color][color=#007700].[/color][color=#0000BB]Parse[/color][color=#007700]([/color][color=#0000BB]textBox2[/color][color=#007700].[/color][color=#0000BB]Text[/color][color=#007700]), [/color][color=#0000BB]double[/color][color=#007700].[/color][color=#0000BB]Parse[/color][color=#007700]([/color][color=#0000BB]textBox3[/color][color=#007700].[/color][color=#0000BB]Text[/color][color=#007700]), [/color][color=#0000BB]out answer[/color][COLOR=#007700]); 

                [/COLOR][color=#0000BB]label1[/color][color=#007700].[/color][color=#0000BB]Text [/color][color=#007700]= [/color][color=#0000BB]answer[/color][color=#007700].[/color][color=#0000BB]ToString[/color][COLOR=#007700](); 

            } 

            catch 

            { 

                [/COLOR][color=#0000BB]MessageBox[/color][color=#007700].[/color][color=#0000BB]Show[/color][color=#007700]([/color][color=#DD0000]"يرجى التحقق من القيم الدخلة"[/color][COLOR=#007700]); 

                [/COLOR][color=#0000BB]textBox1[/color][color=#007700].[/color][color=#0000BB]Text [/color][color=#007700]= [/color][color=#DD0000]"0"[/color][COLOR=#007700]; 

                [/COLOR][color=#0000BB]textBox2[/color][color=#007700].[/color][color=#0000BB]Text [/color][color=#007700]= [/color][color=#DD0000]"0"[/color][COLOR=#007700]; 

                [/COLOR][color=#0000BB]textBox3[/color][color=#007700].[/color][color=#0000BB]Text [/color][color=#007700]= [/color][color=#DD0000]"0"[/color][COLOR=#007700]; 

            } 

        }[/COLOR]

وجرب البرنامج....
_________________________________

المستوى الثالث ....
البرنامج الثالث: برنامج تعطيه رقم يقوم بطرح أو الزيادة عليه حتى يوصله إلى أكبر أو أصغر من الصفر بواحد...

اللازم: Button و TextBox فقط...

الكود: ( يكتب في الحدث Click لل Button1)

كود :
[COLOR=#007700]try 

            { 

                [/COLOR][color=#0000BB]int stnum [/color][color=#007700]= [/color][color=#0000BB]int[/color][color=#007700].[/color][color=#0000BB]Parse[/color][color=#007700]([/color][color=#0000BB]textBox1[/color][color=#007700].[/color][color=#0000BB]Text[/color][COLOR=#007700]); 

                [/COLOR][color=#0000BB]textBox1[/color][color=#007700].[/color][color=#0000BB]Text [/color][color=#007700]= [/color][color=#DD0000]""[/color][COLOR=#007700]; 

                if ([/COLOR][color=#0000BB]stnum [/color][color=#007700]> [/color][color=#0000BB]0[/color][COLOR=#007700]) 

                { 

                    while ([/COLOR][color=#0000BB]stnum [/color][color=#007700]> [/color][color=#0000BB]0[/color][COLOR=#007700]) 

                    { 

                        [/COLOR][color=#0000BB]textBox1[/color][color=#007700].[/color][color=#0000BB]Text [/color][color=#007700]+= [/color][color=#0000BB]stnum[/color][color=#007700].[/color][color=#0000BB]ToString[/color][color=#007700]() + [/color][color=#DD0000]" "[/color][COLOR=#007700]; 

                        [/COLOR][color=#0000BB]stnum[/color][COLOR=#007700]--; 

                    } 

                } 

                else if ([/COLOR][color=#0000BB]stnum [/color][color=#007700]< [/color][color=#0000BB]0[/color][COLOR=#007700]) 

                { 

                    while ([/COLOR][color=#0000BB]stnum [/color][color=#007700]< [/color][color=#0000BB]0[/color][COLOR=#007700]) 

                    { 

                        [/COLOR][color=#0000BB]textBox1[/color][color=#007700].[/color][color=#0000BB]Text [/color][color=#007700]+= [/color][color=#0000BB]stnum[/color][color=#007700].[/color][color=#0000BB]ToString[/color][color=#007700]() + [/color][color=#DD0000]" "[/color][COLOR=#007700]; 

                        [/COLOR][color=#0000BB]stnum[/color][COLOR=#007700]++; 

                    } 

                } 

                else 

                { 

                    [/COLOR][color=#0000BB]MessageBox[/color][color=#007700].[/color][color=#0000BB]Show[/color][color=#007700]([/color][color=#DD0000]"يرجى إدخال رقم أكبر أو أصغر من الصفر"[/color][COLOR=#007700]); 

                } 

            } 

            catch 

            { 

                [/COLOR][color=#0000BB]MessageBox[/color][color=#007700].[/color][color=#0000BB]Show[/color][color=#007700]([/color][color=#DD0000]"يرجى التحقق من القيم الدخلة"[/color][COLOR=#007700]); 

            } 

        }[/COLOR]

ربما يكون الكود معقدا فليلا بما أنك ما زلت جديد على عالم البرمجة ركز بالكود وحاول فهمه وإن شاء الله سوف تفهمه

ولمن واجه أي مشكلة بالكود فهاذا هو كاملا:

كود :
[COLOR=#0000BB]using System[/color][COLOR=#007700]; 

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]Collections[/color][color=#007700].[/color][color=#0000BB]Generic[/color][COLOR=#007700]; 

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]ComponentModel[/color][COLOR=#007700]; 

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]Data[/color][COLOR=#007700]; 

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]Drawing[/color][COLOR=#007700]; 

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]Linq[/color][COLOR=#007700]; 

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]Text[/color][COLOR=#007700]; 

[/COLOR][color=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]Windows[/color][color=#007700].[/color][color=#0000BB]Forms[/color][COLOR=#007700]; 

[/COLOR][COLOR=#0000BB]namespace WindowsFormsApplication11 

[/COLOR][COLOR=#007700]{ 

    public [/COLOR][color=#0000BB]partial [/color][color=#007700]class [/color][color=#0000BB]Form1 [/color][color=#007700]: [/color][COLOR=#0000BB]Form 

    [/COLOR][COLOR=#007700]{ 

        public [/COLOR][color=#0000BB]Form1[/color][COLOR=#007700]() 

        { 

            [/COLOR][color=#0000BB]InitializeComponent[/color][COLOR=#007700](); 

        } 

        private [/COLOR][color=#0000BB]void button1_Click[/color][color=#007700]([/color][color=#0000BB]object sender[/color][color=#007700], [/color][color=#0000BB]EventArgs e[/color][COLOR=#007700]) 

        { 

            try 

            { 

                [/COLOR][color=#0000BB]int stnum [/color][color=#007700]= [/color][color=#0000BB]int[/color][color=#007700].[/color][color=#0000BB]Parse[/color][color=#007700]([/color][color=#0000BB]textBox1[/color][color=#007700].[/color][color=#0000BB]Text[/color][COLOR=#007700]); 

                [/COLOR][color=#0000BB]textBox1[/color][color=#007700].[/color][color=#0000BB]Text [/color][color=#007700]= [/color][color=#DD0000]""[/color][COLOR=#007700]; 

                if ([/COLOR][color=#0000BB]stnum [/color][color=#007700]> [/color][color=#0000BB]0[/color][COLOR=#007700]) 

                { 

                    while ([/COLOR][color=#0000BB]stnum [/color][color=#007700]> [/color][color=#0000BB]0[/color][COLOR=#007700]) 

                    { 

                        [/COLOR][color=#0000BB]textBox1[/color][color=#007700].[/color][color=#0000BB]Text [/color][color=#007700]+= [/color][color=#0000BB]stnum[/color][color=#007700].[/color][color=#0000BB]ToString[/color][color=#007700]() + [/color][color=#DD0000]" "[/color][COLOR=#007700]; 

                        [/COLOR][color=#0000BB]stnum[/color][COLOR=#007700]--; 

                    } 

                } 

                else if ([/COLOR][color=#0000BB]stnum [/color][color=#007700]< [/color][color=#0000BB]0[/color][COLOR=#007700]) 

                { 

                    while ([/COLOR][color=#0000BB]stnum [/color][color=#007700]< [/color][color=#0000BB]0[/color][COLOR=#007700]) 

                    { 

                        [/COLOR][color=#0000BB]textBox1[/color][color=#007700].[/color][color=#0000BB]Text [/color][color=#007700]+= [/color][color=#0000BB]stnum[/color][color=#007700].[/color][color=#0000BB]ToString[/color][color=#007700]() + [/color][color=#DD0000]" "[/color][COLOR=#007700]; 

                        [/COLOR][color=#0000BB]stnum[/color][COLOR=#007700]++; 

                    } 

                } 

                else 

                { 

                    [/COLOR][color=#0000BB]MessageBox[/color][color=#007700].[/color][color=#0000BB]Show[/color][color=#007700]([/color][color=#DD0000]"يرجى إدخال رقم أكبر أو أصغر من الصفر"[/color][COLOR=#007700]); 

                } 

            } 

            catch 

            { 

                [/COLOR][color=#0000BB]MessageBox[/color][color=#007700].[/color][color=#0000BB]Show[/color][color=#007700]([/color][color=#DD0000]"يرجى التحقق من القيم الدخلة"[/color][COLOR=#007700]); 

            } 

        } 

    } 

}[/COLOR]

أرجو أن تكونو قد أستفدتم على هذا الدرس...

الدرس 7- التعامل مع الملفات

Thu, 18 Oct 2012 10:05:02 +0000

[b]كاتب الموضوع : Tarek Aldwire

السلام عليكم ورحمة الله[/b]
في درسنا هذا سوف نتعلم التعامل مع الملفات مع مثال صغير يشرح ذلك...

أولا:
خلال تعاملنا مع الملفات أقضل أن نستورد المجال التالي:
System.IO لأنه هو المجال السؤول عن ذلك ولإستيراده كما ذكر سابقا..

كود :
[COLOR=#0000BB]using System[/color][color=#007700].[/color][color=#0000BB]IO[/color][color=#007700];[/color]

والان لنبدأ بصنع مفكرة بسيطة...
أولا قم بوضع 2 TextBox و 1 Button
2- أكتب في الكود الخاص بالحدث Click لل Button ما يلي:

كود :
[COLOR=#000000][FONT=arial][b][COLOR=#0000BB]

File[/COLOR][color=#007700].[/color][color=#0000BB]WriteAllText[/color][color=#007700]([/color][color=#0000BB]textBox1[/color][color=#007700].[/color][color=#0000BB]Text[/color][color=#007700], [/color][color=#0000BB]textBox2[/color][color=#007700].[/color][color=#0000BB]Text[/color][color=#007700]);[/color]

[/b][/FONT][/COLOR]

ملاحظة : في حال لم تستورد المجال System.IO سوف يكون عليك كتابة الكود بالشكل التالي (بناءا على سؤال انسة في المنتدى )

كود :
[color=#000000][FONT=arial][b][COLOR=#0000BB]System[/color][color=#007700].[/color][color=#0000BB]IO[/color][color=#007700].[/color][color=#0000BB]File[/color][color=#007700].[/color][color=#0000BB]WriteAllText[/color][color=#007700]([/color][color=#0000BB]textBox1[/color][color=#007700].[/color][color=#0000BB]Text[/color][color=#007700], [/color][color=#0000BB]textBox2[/color][color=#007700].[/color][color=#0000BB]Text[/color][color=#007700]);[/color]

[/b][/FONT][/COLOR]

وجرب البرنامج واكتب في ال textBox1 عنوان الملف مثلا:
c:\myfolder\mytext.txt
(( في حال إستخدمت هذا العنوان يجب عليك التأكد من وجود مجلد في القرص c يدعى myfolder))

ثم أكتب ما تشاء في ال textBox2 واضغط على ال Button ولاحظ....

لقد تم إنشاء ملف في العنوان المكتوب وكتب به ما كتبت في ال textBox2
لأنه الأمر WriteAllText يقوم بكتابة ملف على الطريقة التالية:

كود :
[COLOR=#0000BB]File[/color][color=#007700].[/color][color=#0000BB]WriteAllText[/color][color=#007700]([/color][color=#DD0000]"FileURL"[/color][color=#007700],[/color][color=#DD0000]"MyText"[/color][color=#007700]);[/color]

- إنشاء المجلدات... ( تأكد أنك مازلت مستورد للمجال System.IO)
لأنشاء مجلد ما نتبع الطريقة التالية:

كود :
[color=#000000][FONT=arial][b][COLOR=#0000BB]Directory[/color][color=#007700].[/color][color=#0000BB]CreateDirectory[/color][color=#007700]([/color][color=#DD0000]"c:\\myfolder"[/color][color=#007700]);[/color]

[/b][/FONT][/COLOR]

أنتبه,,, في حال كنت تقوم بكتابة الرابط كما في الشكل أعلاه فيجب أن تكتب ال \ على الشكل \\
أو / لأن الحرف \ في لغة ال سي شارب كلمة محجوزة سوف نأخذ إستخداماتها في ما بعد

وللتحقق من وجود ملف ما:

كود :
[COLOR=#0000BB]MessageBox[/color][color=#007700].[/color][color=#0000BB]Show[/color][color=#007700]([/color][color=#0000BB]File[/color][color=#007700].[/color][color=#0000BB]Exists[/color][color=#007700]([/color][color=#DD0000]"c:\\myfolder\\fx.txt"[/color][color=#007700]).[/color][color=#0000BB]ToString[/color][color=#007700]());[/color]

حيث سوف تعود لنا هذه الدالة بالقيمة true إذا كان موجود و false إن لم يكن...

للتحقق من وجود مجلد ما:

كود :
[COLOR=#0000BB]MessageBox[/color][color=#007700].[/color][color=#0000BB]Show[/color][color=#007700]([/color][color=#0000BB]Directory[/color][color=#007700].[/color][color=#0000BB]Exists[/color][color=#007700]([/color][color=#DD0000]"c:\\myfolder"[/color][color=#007700]).[/color][color=#0000BB]ToString[/color][color=#007700]());[/color]

وللحذف بالأمر Delete

كود :
[COLOR=#0000BB]Directory[/color][color=#007700].[/color][color=#0000BB]Delete[/color][color=#007700]([/color][color=#DD0000]"c:\\myfolder"[/color][color=#007700], [/color][color=#0000BB]true[/color][color=#007700]); [/color]

نلاحظ أننا في قد وضعنا في الإعطاء الثاني القيمة true وتعني أن يتم حذف أيضا كل مافي المجلد
ونفس الأمر بالنسبة للملفات

وأما عن نسخ الملفات فذلك باستخدام الأمر Copy كالتالي:

كود :
[COLOR=#0000BB]File[/color][color=#007700].[/color][color=#0000BB]Copy[/color][color=#007700]([/color][color=#DD0000]"FileURL"[/color][color=#007700],[/color][color=#DD0000]"Copied File URL"[/color][color=#007700]);[/color]

والان سوف نأتي إلى القراءة من ملف....

للقراءة من ملف نصي هناك الكثير من الطرق سوف أتطرق إلى أبسطها وهي باستخدام الأمر ReadAllText

أولا ضع TextBox و Button
2- أكتب في الحدث Click الخاص بال Button ما يلي:

كود :
[color=#000000][FONT=arial][b][COLOR=#0000BB]textBox1[/color][color=#007700].[/color][color=#0000BB]Text [/color][color=#007700]= [/color][color=#0000BB]System[/color][color=#007700].[/color][color=#0000BB]IO[/color][color=#007700].[/color][color=#0000BB]File[/color][color=#007700].[/color][color=#0000BB]ReadAllText[/color][color=#007700]([/color][color=#DD0000]"C:\\Users\\TD\\Documents\\y.txt"[/color][color=#007700]);[/color][color=#007700] [/color]

[/b][/FONT][/COLOR]

سوف تلاحظ ظهور الكتابة المكتوبة في الملف في ال TextBox

أرجو أن أجد تفاعل على هذا الدرس كما في الدروس السابقة...
وإلى اللقاء في الدرس القادم إن شاء الله...