Ескертпе
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Жүйеге кіруді немесе каталогтарды өзгертуді байқап көруге болады.
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Каталогтарды өзгертуді байқап көруге болады.
Открывает указанную папку.
Синтаксис
iRetVal = Shell.Open(
vDir
)
Shell.Open( _
ByVal vDir As Variant _
) As Integer
Параметры
-
vDir [in]
-
Тип: Variant
Строка, указывающая путь к папке или одному из значений ShellSpecialFolderConstants . Обратите внимание, что имена констант, найденные в ShellSpecialFolderConstants , доступны в Visual Basic, но не в VBScript или JScript. В таких случаях вместо них необходимо использовать числовые значения.
Если для vDir задано одно из модулей ShellSpecialFolderConstants , а специальная папка не существует, эта функция создаст папку.
Примеры
В следующем примере показано, как открыть в использовании. Для JScript, VBScript и Visual Basic отображается правильное использование.
Jscript:
<script language="JScript">
function fnShellOpenJ()
{
var objShell = new ActiveXObject("shell.application");
var ssfWINDOWS = 36
objShell.Shell.Open(ssfWINDOWS);
}
</script>
Vbscript:
<script language="VBScript">
function fnShellOpenVB()
dim objShell
set objShell = CreateObject("shell.application")
objShell.Shell.Open("C:\\")
set objShell = nothing
end function
</script>
Visual Basic:
Private Sub fnShellOpenVB()
Dim objShell As Shell
Set objShell = New Shell
objShell.Shell.Open(ssfPERSONAL)
Set objShell = Nothing
End Sub
Требования
| Требование | Значение |
|---|---|
| Минимальная версия клиента |
Windows 2000 Professional, Windows XP [только классические приложения] |
| Минимальная версия сервера |
Windows 2000 Server [только классические приложения] |
| Заголовок |
|
| IDL |
|
| DLL |
|
См. также раздел