Метод Folder.NewFolder
Создает новую папку.
Синтаксис
Folder.NewFolder(
bName,
[ vOptions ]
)
Параметры
-
bName
-
Тип: BSTR
Строка, указывающая имя новой папки.
-
vOptions [необязательно]
-
Тип: Variant
В настоящее время это значение не используется.
Возвращаемое значение
Этот метод не возвращает значение.
Комментарии
Примечание
Не все методы реализуются для всех папок. Например, метод ParseName не реализован для папки панель управления (CSIDL_CONTROLS). При попытке вызвать нереализованный метод возникает ошибка 0x800A01BD (десятичное число 445).
Примеры
В следующем примере используется NewFolder для создания папки C:\TestFolder. Для JScript, VBScript и Visual Basic отображается правильное использование.
Jscript:
<script language="JScript">
function fnFolderObjectNewFolderJ()
{
var objShell = new ActiveXObject("shell.application");
var objFolder = new Object;
objFolder = objShell.NameSpace("C:\\");
if (objFolder != null)
{
objFolder.NewFolder("TestFolder");
}
}
</script>
Vbscript:
<script language="VBScript">
function fnFolderObjectNewFolderVB()
dim objShell
dim objFolder
set objShell = CreateObject("shell.application")
set objFolder = objShell.NameSpace("C:\")
if (not objFolder is nothing) then
objFolder.NewFolder("TestFolder")
end if
set objFolder = nothing
set objShell = nothing
end function
</script>
Visual Basic:
Private Sub btnNewFolder_Click()
Dim objShell As Shell
Dim objFolder As Folder
Set objShell = New Shell
Set objFolder = objShell.NameSpace("C:\")
If (Not objFolder Is Nothing) Then
objFolder.NewFolder ("TestFolder")
End If
Set objFolder = Nothing
Set objShell = Nothing
End Sub
Требования
Требование | Значение |
---|---|
Минимальная версия клиента |
Windows 2000 Professional, Windows XP [только классические приложения] |
Минимальная версия сервера |
Windows 2000 Server [только классические приложения] |
Заголовок |
|
IDL |
|
DLL |
|