Module DirInfo
    Sub Main()
        ' Declare the directory that you want to create.
        Dim dir As DirectoryInfo = New DirectoryInfo("c:\MyDir")
        Try
            ' Determine whether the folder exists.
            If dir.Exists Then
                ' Outputs to the console to tell the user if it exists already
                System.Console.WriteLine("That path exists already.")
                Return
            End If
 
            ' Attempt to create the folder.
            dir.Create()
            System.Console.WriteLine("The directory was created successfully.")
            System.Console.Writeline("Check your C:\ drive to see if the directory MyDir was added. When ready to continue, press enter..")
            System.Console.Readline()
            ' Delete the folder.
            dir.Delete()
            System.Console.WriteLine("The directory was deleted successfully.")
 
        Catch e As Exception
            ' If there is an error, this will catch it and output the error to the console
            System.Console.WriteLine("The process failed: {0}", e.ToString())
        End Try
        System.Console.ReadLine()
    End Sub
End Module

Commenting Options

Register or Login to Hawkee.com or use your Facebook or Twitter account by clicking the corresponding button below.