Creating automatic log file folder

[Harddisk]

Dim szTmpPath As String = System.IO.Path.Combine(Application.StartupPath, "Log")
 
Dim dirInfo As New System.IO.DirectoryInfo(szTmpPath)
 
'   if folder not exist, create
If Not dirInfo.Exists Then dirInfo.Create()