| ilim | Дата: Вторник, 15.11.2011, 23:11 | Сообщение # 1 |
 Генералиссимус
Группа: Администраторы
Сообщений: 680
Награды: 17
Репутация: 4
Статус: Offline
| Как удалить каталог? - Visual Basic
===================================================
Private Declare Function RemoveDirectory& Lib "kernel32" Alias "RemoveDirectoryA" (ByVal lpPathName As String)
' Удаление каталога (пустого!)
PathName$ = "D:\t"
code& = RemoveDirectory(PathName)
If code& = 0 Then
' операция удаления не была выполнена
Else
' каталог удален
End If
www.ilim.kz
|
| |
|
|
