AccessTr.neT
Program Engelleme Hakında Yardım ! - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Visual Basic 6 (https://accesstr.net/forum-visual-basic-6.html)
+--- Forum: Visual Basic 6 Cevaplanmış Soruları (https://accesstr.net/forum-visual-basic-6-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Program Engelleme Hakında Yardım ! (/konu-program-engelleme-hakinda-yardim.html)



Program Engelleme Hakında Yardım ! - jagu - 28/02/2014

Merhaba arkadaslar bir projem var projenin amacı "chrome-notepad-firefox-winamp vs." programların aynı anda

açılmayı engelleme
Mesela "winamp" açıldımı "chrome-notepad" açılmıycak şekilde bir mantık yürütmem lazım
Programların ismini notdefteri benzeri bir veritabanı yazdım ve
"chrome.exe"
"notepad.exe"
"firefox.exe" vs
olarak yazdıgımda geliştirdiğim program ismini buldugu programı açıldığı gibi kapatıyor benim istediğim birini

çalıştırmaya izin vericek diğerleri çalışırsa kapanıcak inşallah detaylı anlatmısımdır bu konuyla ilgili

yardımlarınız beklıyorum.


Cvp: Program Engelleme Hakında Yardım ! - alpeki99 - 28/02/2014

Basit bir zaman kontrolü ile bunu yapabilirsiniz.

Aşağıdaki kodlar butonun tıklanma olayına yazılmış ve yanında bir metod var:



Public Function GetProcessStartTime(processName As String) As DateTime
Dim p As Process() = Process.GetProcessesByName(processName)
If p.Length <= 0 Then
Throw New Exception("Program çalışmıyor!")
End If
Return p(0).StartTime
End Function

Private Sub button1_Click(sender As Object, e As EventArgs)
Try
MessageBox.Show(GetProcessStartTime("filezilla").ToString())
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
End Sub

Formun üzerine Button1 isimli bir buton ekledim ve onun tıklanma olayına kodu yazdım. Processlerin çalışmaya başlama zamanlarını geri döndüren bir de fonksiyon var. Process'e parametre olarak uygulamaların adını gönderin geri gelen cevaba göre zamanları karşılaştırın. En yeni zamana sahip olan dışındaki diğer programları kapatın.


Cvp: Program Engelleme Hakında Yardım ! - jagu - 01/03/2014

Demek istediğini pek beceremedim projemi paylaşsam yardımcı olurmusun zamanın olursa

http://yadi.sk/d/0jO_TUdpJjdod


Cvp: Program Engelleme Hakında Yardım ! - alpeki99 - 02/03/2014

Proje VB6 imiş ancak ben .Net zannetmiştim artık bununla çalışmıyorum. Mantık yukarıdaki gibi olacak buna göre hareket edersiniz.


RE: Cvp: Program Engelleme Hakında Yardım ! - aliihsan322 - 16/02/2024

(02/03/2014, 15:06)alpeki99 yazdı: Proje VB6 imiş ancak ben .Net zannetmiştim artık bununla çalışmıyorum. Mantık yukarıdaki gibi olacak buna göre hareket edersiniz.

burası vb6 yeri zaten


RE: Program Engelleme Hakında Yardım ! - atoykan - 18/02/2024

(16/02/2024, 17:06)aliihsan322 yazdı:
(02/03/2014, 15:06)alpeki99 yazdı: Proje VB6 imiş ancak ben .Net zannetmiştim artık bununla çalışmıyorum. Mantık yukarıdaki gibi olacak buna göre hareket edersiniz.

burası vb6 yeri zaten

10 yıl önceki konu için uyarı da bulunduğunuz için teşekkür ederiz.
Polemiğe yol açabilecek ve gereksiz mesajlaşmalar yapmayınız.