Mega Code Archive

 

Categories / VB.Net / File Directory

 

File GetLastWriteTime returns the date and time the specified file or directory was last written to

Imports System Imports System.IO Imports System.Text Public Class Test     Public Shared Sub Main()         Try             Dim path As String = "c:\MyTest.txt"             If File.Exists(path) = False Then                 File.Create(path)             Else                 File.SetLastWriteTime(path, New DateTime(1985, 4, 3))             End If             Dim dt As DateTime = File.GetLastWriteTime(path)             Console.WriteLine("The last write time for this file was {0}.", dt)             File.SetLastWriteTime(path, DateTime.Now)             dt = File.GetLastWriteTime(path)             Console.WriteLine("The last write time for this file was {0}.", dt)         Catch e As Exception             Console.WriteLine("The process failed: {0}", e.ToString())         End Try     End Sub End Class