السلام عليكم ورحمه الله وبركاته
أخوتي وأخواتي أعضاء هذا المنتدى الرائع أريد أن أقدم لكم اليوم درس متنوع في تقنية الـ LINQ, هذا الدرس ما هو إلا استعراض وتطبيق إمكانيات الإستعلام بواسطة هذه التقنية للوصول إلى الحلم LINQ to Everything, طبعا سأفترض أن الشخص القارىء قد تعرف مسبقا ولو الشيء اليسير عن هذه التقنية, لأنني ليس في صدد شرح هذه التقنية.
من المعروف لدينا وبعد ظهور الإصدار 3.0 متضمنا واحدة من أعظم التقنيات في مجال التعامل مع البيانات والاستعلام فيها, وكما نعلم أن الدوت نت في ذاك الإصدار وفر 3 أنواع من البيانات للاستعلام فيها سأحاول استعراض مثال لكل واحد منها, ومن ثم سنسعى للوصول إلى حلمنا المنشود.
1- LINQ to Objects
طبعا في هذا النوع يتم الإستعلام في الكائنات سوى كانت معرفة من أصل اللغة أو من قبل المبرمج.
سنقوم بكتابة مثال للإستعلام في مصفوفة نصية للبحث عن الأسماء التي تبدأ بحرف J
Dim names() As String = {"Peter", "Dave", "John", "Joseph", "Samantha"}
Dim query = From name In names
Where name.StartsWith("J")
Select name
For Each item In query
Console.WriteLine(item)
Nextأما المثال التالي سوف نقوم بعرض أرقام وأسماء العمليات الجارية في نظام التشغيل والتي تحتوي أكثر من 4 Thread
Dim query = From process In process.GetProcesses()
Where process.Threads.Count > 4
Select process.Id, process.ProcessName
For Each item In query
Console.WriteLine(String.Format("{0}: {1}", item.Id, item.ProcessName))
Next2- LINQ to ADO.NET
طبعا في هذا النوع يتم الإستعلام في تقنية الـ ADO.NET وله 3 أنواع:
- LINQ to DataSet
ويقوم هذا النوع بالاستعلام في الكائن DataSet
وفي المثال التالي تم جلب أسامي الأصناف مرتبة حسب أرقامها من جدول الأصناف الموجود في الذاكرة في الكائن DataSet
Dim adpt As New CategoriesTableAdapter()
Dim ds As New NorthwindDataSet()
adpt.Fill(ds.Categories)
Dim query = From category In ds.Categories
Order By category.CategoryID Descending
Select category.CategoryName
For Each item In query
Console.WriteLine(item)
Next
- LINQ to SQL
ويقوم هذا النوع بالاستعلام في قواعد البيانات العلائقية التي تستخدم لغة الاستعلام SQL
وفي المثال التالي تم الاستعلام عن عدد الطلبيات التي تاريخ طلبها أكبر من 3/2/1997
Dim db As New NorthwindDataContext()
Dim query = (From order In db.Orders
Where order.OrderDate > New DateTime(1997, 2, 3)
Select order).Count
Console.WriteLine(query)
- LINQ to Entities
ويقوم هذا النوع بالاستعلام في الـ Entity Framework والتي ظهرت رسميا في الاصدار الرابع للدوت نت
وفي المثال التالي سنقوم بجلب اول ثلاثة سجلات من جدول المنتجات وسنعرض اسم الصنف والمنتج و سعرة الوحدة
Dim db As New NorthwindEntities()
Dim query = (From product In db.Products
Select product).Take(3)
For Each item In query
Console.WriteLine(String.Format("{0}: {1} ({2})", item.Category.CategoryName, item.ProductName, item.UnitPrice))
Next
4- LINQ to XML
XML وهذا النوع يقوم بالاستعلام في ملف
وفي المثال التالي تم الاستعلام عن الزبون الذي رقمه 3 وفمنا بعرض معلوماته
Dim doc As XDocument = XDocument.Load("Customers.xml")
Dim query = (From customer In doc...<customer>
Where customer.@ID = 3
Select customer).Single
Console.WriteLine(String.Format("{0}: {1}", query.@ID, query.<name>.Value))
5- LINQ to Reflection
للكائنات Meta Data للحصول على الـ Reflection وهذا النوع يقوم بإستخدام مفهوم الـ
Static لكل دالة بشرط أن تكون من النوع Overloads وعدد الـ String وفي المثال التالي سيتم عرض أسامي دوال الفئة
Dim query = From method In Type.GetType("System.String").GetMethods()
Where Not method.IsStatic
Order By method.Name
Group method By method.Name Into Group
For Each item In query
Console.WriteLine(String.Format("{0} ({1})", item.Name, item.Group.Count))
Next</name></customer>
.. نكتفي اليوم بهذا القدر, وسنكمل المشوار في يوم آخر وسنتطرق لأنواع اخرى يمكن الاستعلام فيها
