Функция CreateDirectory

Declare Function CreateDirectory Lib "kernel32" Alias "CreateDirectoryA" ( _
    ByVal lpPathName As String,  _
    lpSecurityAttributes As SECURITY_ATTRIBUTES) As Long

CreateDirectory создает новую папку на диске. Также вы можете установить аттрибуты безопасности для вновь созданной папки, если это позволяет операционная система

lpPathName

Имя для новой папки

lpSecurityAttributes

Аттрибуты безопасности для новой папки

Пример

' Создаем новую папку C:\RussianProject и
' устанавливаем аттрибуты по умолчанию
Dim Security As SECURITY_ATTRIBUTES  ' структура аттрибутов безопасности
Dim lRet As Long ' возвращаемое значение

' Создаем папку
lRet = CreateDirectory("C:\RussianProject", Security)
' Если функция вернула 0, значит ошибка
 If lRet = 0 Then
  MsgBox "Ошибка : Не могу создать папку !"
 End If
 

Смотри также

CreateDirectoryEx, RemoveDirectory

Категория

Файлы

Реклама