PDA

View Full Version : سوال: عدم اجرای دوباره ماشین حساب ویندوز



Morteza_s
سه شنبه 19 آذر 1387, 17:21 عصر
سلام
من با این کد ماشین حساب ویندوز رو اجرا می کنم:


System.Diagnostics.Process.Start("calc.exe")


حالا اگر کاربر یک بار ماشین حساب رو باز کرد، چطور میشه از اجرای مجدد اون جلوگیری کرد؟
در واقع چطور میشه فهمید که الآن ماشین حساب باز هست یا نه؟

ممنون

mostafaaa
سه شنبه 19 آذر 1387, 17:38 عصر
سلام دوست من
یکی از راه هایی که میتونی استفاده کنی اینه:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If Not ProcessExist("calc") Then
Process.Start("calc.exe")
End If
End Sub
Public Function ProcessExist(ByVal Name As String) As Boolean
Dim ProcessArray As Array = Process.GetProcessesByName(Name)
If ProcessArray.Length > 0 Then Return True
Return False
End Function