منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
سؤال في كيفية جلب الخدمات Services ووضعها في DataGridView - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : سؤال في كيفية جلب الخدمات Services ووضعها في DataGridView (/showthread.php?tid=7540)

الصفحات: 1 2


سؤال في كيفية جلب الخدمات Services ووضعها في DataGridView - عبد الله - 01-02-13

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

إخواني وجدت موضوع على هذا الرابط - http://vb4arb.com/vb/showthread.php?2139 -

يتكلم عن الخدمات ولكن الكود الأخير لم يعمل معي ولم يتعرف الفيجوال على كلمة ServiceController

فما البديل عنها " اعمل على فيجوال بيسك 2010 " ؟

وكذلك السؤال الذي بعده وهو كيفية جلب أسماء الخدمات ووضعها في DataGridView أو ListView والتحكم بها ؟

وأخيراً عندما أريد عمل تصفية لبعض الخدمات بحيث أجلب من كان في أسمها كلمة name أو من كان في وصفها كلمة .Net

والتحكم بها من خلال إيقافها أو حذفها أو تشغيلها.


سؤال في كيفية جلب الخدمات Services ووضعها في DataGridView - Aly El-Haddad - 01-02-13

السلام عليكم و رحمة الله و بركاته،
المثال يعمل لكن أضف إلى الـReferences
System.ServiceProcess
و طبعاً أعمل لها Import في أول سطر من الكود

بخصوص طلبك الثاني فالـClass ServiceController يتيح لك ذلك.


سؤال في كيفية جلب الخدمات Services ووضعها في DataGridView - عبد الله - 01-02-13

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

أشكرك أخي علي الحداد على التوضيح المهم ، وفعلاً أستطعت عرض جميع الخدمات في
DataGridView ( ولم استطع عرضها في ListView )

لكن السؤال المهم الآن هو كيف لي بتحديد عمودان أو ثلاثة للعرض وليس عرض جميع الخيارات ؟

ثم كيف لي بــ
عمل تصفية لبعض الخدمات ؟


سؤال في كيفية جلب الخدمات Services ووضعها في DataGridView - learning.net - 02-02-13

اخى الكريم
لعرض ال services فى Datagridview
اكتب هذا الكود فى اى حذث تريده
كود :
Dim services() As ServiceController
        services = ServiceController.GetServices()

        DataGridView1.DataSource = services

ولاظهار عمود واحد او اكثر اكتب هذا الكود
كود :
Dim services() As ServiceController
        services = ServiceController.GetServices()

        Dim sv = From servic In services
                 Select servic.DisplayName, servic.ServiceName

        DataGridView1.DataSource = sv.ToList
هذا يظهر عمودين...ويمكنك ان تختار اى عامود ليظهر


سؤال في كيفية جلب الخدمات Services ووضعها في DataGridView - عبد الله - 02-02-13

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

يظهر لي خطأ في السطر الثالث في الكلمة الأخيرة وهي services ، فما المشكلة وما الحل ؟

تم الحل بتحويل المشروع إلى الإصدار 3.5 من .net

طيب الآن كيف لي بعمل فلترة لهذه الخدمات بحيث أجلب فقط من كان في اسمها حرف a مثلاً ؟


سؤال في كيفية جلب الخدمات Services ووضعها في DataGridView - learning.net - 02-02-13

Dim services() As ServiceController
services = ServiceController.GetServices()

Dim sv = From servic In services
Where servic.ServiceName.Contains("a")
Select servic

DataGridView1.DataSource = sv.ToList
هذا لعرض كل الخدمات التى اسمها يحتوى على حرف a
ويمكنك ان تغير ما تشاء من اعمده وتغير الحروف اللتى تختارها


سؤال في كيفية جلب الخدمات Services ووضعها في DataGridView - Aly El-Haddad - 02-02-13

من بعد إذن أخي learning.net، أنا حابب أن أضع هذا المثال البسيط (في المرفقات)


سؤال في كيفية جلب الخدمات Services ووضعها في DataGridView - learning.net - 02-02-13

مثال رائع اخى Aly El-Haddad
مشكور


سؤال في كيفية جلب الخدمات Services ووضعها في DataGridView - فاتن - 04-02-13

يسلمو على المثال الرائع


سؤال في كيفية جلب الخدمات Services ووضعها في DataGridView - عبد الله - 05-02-13

أشكركم يا أخوان على الأستجابة في طرح حلول للمسألة ، وجزاك الله خير أخي علي الحداد على المثال الرائع.

بارك الله في الجميع.