如何在要复制的文件中添加日期戳？

Question

我可以使用下面的代码行复制文件，效果很好。 如果目标文件名在复制时包含系统日期，我将非常喜欢。 我尝试了很多事情，但无法实现目标。 出租车有人帮我吗？

File.Copy（“ \\ Computer1 \\ mall \\ Files \\ Computer1.cfg”，“ c：\\ ComputerFiles \\ Computer1.cfg”，True）

Answer 1

您可以使用FileInfo类来设置文件CreationTime ， LastAccesstime ， LastWriteTime 。

Dim fileLocation As String = "c:\ComputerFiles\Computer1.cfg"

Dim fi As New FileInfo(fileLocation)
fi.CreationTime = DateTime.Now
fi.LastAccessTime = DateTime.Now
fi.LastWriteTime = DateTime.Now