Opprette mappe i vb

[Degeim]

Hvordan oppretter man en mappe (i en bestemt bane, lagret som string) i vb?

 

Eks: opprett("c:\", "ny mappe")

 

Takk

[aadnk]

Du kan opprette en mappe ved hjelp av Mkdir-funksjonen:

 

MkDir "C:\Ny mappe\"

 

Men, dersom du skal opprette flere mapper samtidig, er det en fordel å heller ty til SHCreateDirectoryEx:

 

Private Declare Function SHCreateDirectoryEx Lib "shell32" Alias "SHCreateDirectoryExA" (ByVal hwnd As Long, ByVal pszPath As String, ByVal psa As Any) As Long

 

Private Sub Form_Load()

    SHCreateDirectoryEx Me.hwnd, "c:\test\halloen\noe\temp\vel\vb\", ByVal 0&

End Sub