حالة الموضوع:
مغلق
  1. .:: RSS ::.

    .:: RSS ::. عضوية آلية

    الأنتساب:
    ‏9 سبتمبر 2011
    المشاركات:
    14,005
    الإعجابات المتلقاة:
    0
    نقاط الجائزة:
    36
    الإقامة:
    IQ-T34M
    السلام وعليكم
    احتاج كودين لااتم مشروعي الجديد
    الاول
    منع قتل البروسيس
    والتاني معقد شواي
    بدي لما يكون الفروم مفتوح يطبق الامر متال


    Sub HeX()
    Dim generaldee As Process() = Process.GetProcesses
    Dim i As Integer
    For i = 0 To generaldee.Length - 1
    Select Case Strings.LCase(generaldee(i).ProcessName)
    Case "Server"
    msgbox (" server is here")
    Case Else
    End Select
    Next
    End Sub
    الامر يطبق لو السرفر موجود وفتحت البرنامج بيشتغل تمام
    لاكن لا يطبق عندما يكون الفورم مفتوح وتفتح السرفر ماهو السبب ؟
    ارجو المساعدة
    وخصوصا من الملك سيمون

     
حالة الموضوع:
مغلق

مشاركة هذه الصفحة