VB.NET code to create a new folder
Function
CreateNewFolder(ByVal Path, ByVal NewFolderName)
Dim objFSO
objFSO = CreateObject("Scripting.FileSystemObject")
Dim FullPath
FullPath = Path & NewFolderName
If Not objFSO.FolderExists(FullPath) Then
objFSO.CreateFolder(FullPath)
CreateNewFolder =
True
Else
CreateNewFolder =
False
End If
objFSO =
Nothing
End Function