VB.NET блок .exe для запуска

Question

есть ли у кого-нибудь пример кода для предотвращения запуска файлов .exe?

Примерно так может работать:

For Each OSKInstance As Process In Process.GetProcessesByName("OSK").ToArray
OSKInstance.Kill()
Next

Но это может потребовать значительных ресурсовцикл работает все время.Есть ли более умный способ заблокировать .exe?

Answer 1

Нашел код:

Dim myFileStream As System.IO.FileStream
Dim sFileName As String = Application.StartupPath & "\test.exe"
'block
myFileStream = New System.IO.FileStream(sFileName, FileMode.Open, FileAccess.Read,    FileShare.None)
'unblock
myFileStream.Close()