aboutsummaryrefslogtreecommitdiff
path: root/ShiftOS-TheRevival/TerminalApplications/Internal/Com_Mkdir.vb
blob: 2943916eea5a2170024b34e7d3e95a21514c73d4 (plain) (blame)
1
2
3
4
5
6
7
8
9
Module Com_Mkdir
    Public Sub CreateDir(TheDirectory As String)
        If IO.Directory.Exists(Console.CurrentDirectory + "\" + TheDirectory) Then
            NewLine("Directory is already exists!")
        Else
            IO.Directory.CreateDirectory(Console.CurrentDirectory + "\" + TheDirectory)
        End If
    End Sub
End Module