如何确定应用程序的首次运行/如何允许在app文件夹中删除文件

Question

我有一个旧的VB6应用程序，我正在与PDW一起分发。我需要在安装后确定它是否是应用程序的第一次运行。最简单的方法是什么？

目前，我安装了一个虚拟文本文件，并将其存在作为首次运行的证据。如果firstrun.txt在app目录中，我打开一个子程序，创建一些目录并复制一些文件，然后删除txt文件。下次，它会跳过子程序，因为firstrun.txt不在那里。在用户收到错误代码70之前一直工作正常，因为他们没有相应的权限来删除文件。

这是我用来删除文本文件的代码：

mobjFSO.DeleteFile App.Path & "\firstrun.txt

任何人都有更好的方法吗？或者有人可以告诉我如何允许程序删除文件而不管是否允许？

提前致谢！

Answer 1

尝试相反的方法。如果不存在文件，则假定它是第一次运行。在第一次运行之后，编写一个文件 - 但是将其写入用户区域，例如Windows上的C：\ Users \ myuser \ AppData。这将是存储此类数据的更合适的位置，您不会遇到相同的权限问题。