使用VB.net锁定计算机驱动器
我想创建一个项目,通过它我应该能够首先看到我的驱动器,然后选择其中一个以编程方式锁定它们。 可能吗?使用VB.net锁定计算机驱动器,vb.net,locking,vb.net-2010,Vb.net,Locking,Vb.net 2010,我想创建一个项目,通过它我应该能够首先看到我的驱动器,然后选择其中一个以编程方式锁定它们。 可能吗? 如果是,请回答您可以使用DriveInfo.GetDrives获取设备 您想如何锁定它们?如果要对文件夹进行编码,请查看 在没有加密的情况下锁定设备或文件夹是不可靠的,因为在这种情况下,数据不会在另一台电脑上锁定。我测试了下面从中提取的代码。首先,您必须提供一种方法来选择要锁定的目录,在本例中,使用了FolderBrowser对话框 Private Sub Button1_Click(sende
如果是,请回答您可以使用DriveInfo.GetDrives获取设备 您想如何锁定它们?如果要对文件夹进行编码,请查看
在没有加密的情况下锁定设备或文件夹是不可靠的,因为在这种情况下,数据不会在另一台电脑上锁定。我测试了下面从中提取的代码。首先,您必须提供一种方法来选择要锁定的目录,在本例中,使用了FolderBrowser对话框
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles btnBrowse.Click
Try
If FolderBrowserDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
TextBox1.Text = FolderBrowserDialog1.SelectedPath
End If
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
然后,我创建了两个按钮来锁定和解锁目录,该目录的路径先前由上述函数写入文本框
Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles btnLock.Click
Dim fs As FileSystemSecurity = File.GetAccessControl(TextBox1.Text)
fs.AddAccessRule(New FileSystemAccessRule(Environment.UserName, FileSystemRights.FullControl, AccessControlType.Deny))
File.SetAccessControl(TextBox1.Text, fs)
End Sub
Private Sub btnUnlock_Click(sender As System.Object, e As System.EventArgs) Handles btnUnlock.Click
Dim fs As FileSystemSecurity = File.GetAccessControl(TextBox1.Text)
fs.RemoveAccessRule(New FileSystemAccessRule(Environment.UserName, FileSystemRights.FullControl, AccessControlType.Deny))
File.SetAccessControl(TextBox1.Text, fs)
End Sub
第一个锁定目录,另一个解锁目录 感谢您的反馈。。。。。。但我的计划是锁定我电脑的驱动器。。。。。。。。。。使用加密、拒绝访问或其他任何方式。。即使在运行时间之后,它也应该能够工作