Mega Code Archive

 

Categories / VB.Net / File Directory

 

Gets the creation date and time of a directory

Imports System Imports System.IO Public Class Test     Public Shared Sub Main()         Try             Dim dt As DateTime = Directory.GetCreationTime(Environment.CurrentDirectory)             If DateTime.Now.Subtract(dt).TotalDays > 364 Then                 Console.WriteLine("This directory is over a year old.")             ElseIf DateTime.Now.Subtract(dt).TotalDays > 30 Then                 Console.WriteLine("This directory is over a month old.")             ElseIf DateTime.Now.Subtract(dt).TotalDays <= 1 Then                 Console.WriteLine("This directory is less than a day old.")             Else                 Console.WriteLine("This directory was created on {0}", dt)             End If         Catch e As Exception             Console.WriteLine("The process failed: {0}", e.ToString())         End Try     End Sub End Class