vb.net - Windows 服务似乎无法正常工作

Question

这是我第一次创建Windows服务，在网上阅读了很多文章后，我自己做了一个。它安装成功，运行，但没有按预期工作。

例如：

在 Timer 内部，我调用以下代码：

 Public Sub WriteLog(log As String)
    log = DateTime.Now.ToLongTimeString() & ", " & DateTime.Now.ToLongDateString() & vbNewLine & "  -> " & log

    Dim path As String = "c:\Temp\z1111.log"
    Dim sw As StreamWriter

    sw = File.AppendText(path)
    sw.WriteLine(log)
    sw.Flush()
    sw.Close()
End Sub

上面的代码在 Windows 窗体项目中工作，但作为 Windows 服务，它会创建一个名为 z1111.log 的文件，添加内容覆盖并且不执行任何其他操作，但是当我删除该文件时，它会使用新的日期和时间再次创建.

问题是：为什么它作为 Windows 窗体附加而作为 Windows 服务覆盖并停止，仅在我删除文件时才有效？

可以下载项目：LINK

有谁知道如何解决它？

Answer 1

我通过将日志文件更改为 Windows 文件夹解决了这个问题。这是一个安全问题。