Example - RmDir Statement

PC-DMIS Basic creates the new directories in the default location "C:\Users\Public\Public Documents\Hexagon\PC-DMIS\<version>", where <version> is the version of the PC-DMIS application.

' This sample shows the functions MkDir (Make Directory)
' and RmDir (Remove Directory)
Sub Main()
   Dim dirName As String
   dirName = "t1"
   MkDir dirName
   MkDir "t2"
   MsgBox "Directories: t1 and t2 created. Press OK to remove them"
   RmDir "t1"
   RmDir "t2"
End Sub