vb.net - Access 无法识别 System 32 中的文件

Question

我有一个数据库，它查找隐藏在 System 32 中的文件，以防止用户将数据库复制到另一台计算机。但是，当我在 VB 中运行子程序时，Access 无法识别该文件并直接关闭数据库

If Dir("C:\Windows\System32\theFile") = "" Then
    If MsgBox("This is not a registered version of this program.", vbCritical, "ERROR") Then
        DoCmd.Quit
    End If
End If

如何获得访问权限以查找文件？

Answer 1

回到windows XP或更早版本，或者不要把它放在System32中。Vista/7/8 不喜欢你弄乱那个文件夹。

您可能希望将位置更改为不受 UAC 影响的位置并将属性更改为隐藏。

Answer 2

您应该使用 DIR 函数指定隐藏属性以查找隐藏文件：

If Dir("C:\Windows\System32\theFile", FileAttribute.Hidden) = "" Then