vb. net klasöre dosya girişini engelleme _?

[ARTHUR48]

merhaba arkadaşlar. bir uygulama çalıştırdığımızda ona bağlı klasörlerin içinde dosyalar oluşuyor (örneğin: temp klasörü gibi). dosyaya herhangi bir şekilde dışardan dosya girişini nasıl engelleyebiliriz. bu işe yarayacak bir kod varmı._? teşekkürler

 

[Nuardy]

Bi tane timer ekle ve kodları forma yapıştır.Timer in süresi kısa olursa daha etkili olur.

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

For Each selProcess As Process In Process.GetProcesses
If selProcess.ProcessName = "cheatengine" Then 'cheatengine yazan yeri degiştiredebilirsin sonuna .exe koyma
selProcess.Kill()
Exit For
End If
Next
End Sub

 

[ARTHUR48]

Bi tane timer ekle ve kodları forma yapıştır.Timer in süresi kısa olursa daha etkili olur.

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

For Each selProcess As Process In Process.GetProcesses
If selProcess.ProcessName = "cheatengine" Then 'cheatengine yazan yeri degiştiredebilirsin sonuna .exe koyma
selProcess.Kill()
Exit For
End If
Next
End Sub

sağol, deniyorum. yalnız klasör yolunu nasıl tanımlayacağız

 

[Cromeflex]

şöyle bir basit kod var ama dışardan farklı yazılım ile açılabilir
bunu import et
Imports System.Security.AccessControl

sonra butona yada bir şeye yapıştır bu kodu
Dim yol as string = "klasörün konumu" 'değiştirmeyi unutma

Dim fs1 As FileSystemSecurity = File.GetAccessControl(Yol)
fs1.AddAccessRule(New FileSystemAccessRule(Environment.UserName, FileSystemRights.FullControl, AccessControlType.Deny))
File.SetAccessControl(Yol, fs1)



açmak içinse:
Dim fs As FileSystemSecurity = File.GetAccessControl(Yol)
fs.RemoveAccessRule(New FileSystemAccessRule(Environment.UserName, FileSystemRights.FullControl, AccessControlType.Deny))
File.SetAccessControl(Yol, fs)

 

[mowen1]

şöyle bir basit kod var ama dışardan farklı yazılım ile açılabilir
bunu import et
Imports System.Security.AccessControl

sonra butona yada bir şeye yapıştır bu kodu
Dim yol as string = "klasörün konumu" 'değiştirmeyi unutma

Dim fs1 As FileSystemSecurity = File.GetAccessControl(Yol)
fs1.AddAccessRule(New FileSystemAccessRule(Environment.UserName, FileSystemRights.FullControl, AccessControlType.Deny))
File.SetAccessControl(Yol, fs1)



açmak içinse:
Dim fs As FileSystemSecurity = File.GetAccessControl(Yol)
fs.RemoveAccessRule(New FileSystemAccessRule(Environment.UserName, FileSystemRights.FullControl, AccessControlType.Deny))
File.SetAccessControl(Yol, fs)

çalışıcak gibi