Метод Shell.Windows
Создает и возвращает объект ShellWindows . Этот объект представляет коллекцию всех открытых окон, принадлежащих оболочке .
Синтаксис
retVal = Shell.Windows()
Shell.Windows() As IDispatch
Параметры
Этот метод не имеет параметров.
Возвращаемое значение
Язык JScript
Тип: IDispatch**
Ссылка на объект ShellWindows .
VB
Тип: IDispatch**
Ссылка на объект ShellWindows .
Примеры
В следующем примере используется Windows для получения объекта ShellWindows и отображения количества элементов, содержащихся в нем. Для JScript, VBScript и Visual Basic отображается правильное использование.
Jscript:
<script language="JScript">
function fnShellWindowsJ()
{
var objShell = new ActiveXObject("shell.application");
var objShellWindows;
objShellWindows = objShell.Windows();
if (objShellWindows != null)
{
var Shell = new ActiveXObject("WScript.Shell");
Shell.Popup(objShellWindows.Count);
}
}
</script>
Vbscript:
<script language="VBScript">
function fnShellWindowsVBS()
dim objShell
dim objShellWindows
set objShell = CreateObject("shell.application")
set objShellWindows = objShell.Windows
if (not objShellWindows is nothing) then
WScript.Echo objShellWindows.Count
end if
set objShellWindows = nothing
set objShell = nothing
end function
</script>
Visual Basic:
Private Sub fnShellWindowsVB()
Dim objShell As Shell
Dim objShellWindows As ShellWindows
Set objShell = New Shell
Set objShellWindows = objShell.Windows
If (Not objShellWindows Is Nothing) Then
Debug.Print objShellWindows.Count
End If
Set objShellWindows = Nothing
Set objShell = Nothing
End Sub
Требования
Требование | Значение |
---|---|
Минимальная версия клиента |
Windows 2000 Professional, Windows XP [только классические приложения] |
Минимальная версия сервера |
Windows 2000 Server [только классические приложения] |
Заголовок |
|
IDL |
|
DLL |
|