IShellDispatch.Windows-Methode
Erstellt ein ShellWindows-Objekt und gibt es zurück. Dieses Objekt stellt eine Auflistung aller geöffneten Fenster dar, die zur Shell gehören.
Syntax
retVal = IShellDispatch.Windows()
IShellDispatch.Windows() As IDispatch
Parameter
Diese Methode hat keine Parameter.
Rückgabewert
JScript
Typ: IDispatch**
Ein Objektverweis auf das ShellWindows-Objekt .
VB
Typ: IDispatch**
Ein Objektverweis auf das ShellWindows-Objekt .
Bemerkungen
Auf diese Methode wird über die Shell.Windows-Methode zugegriffen.
Beispiele
In den folgenden Beispielen wird Windows verwendet, um das ShellWindows-Objekt abzurufen und die Anzahl der enthaltenen Elemente anzuzeigen. Die Verwendung wird für JScript, VBScript und Visual Basic angezeigt.
Jscript:
<script language="JScript">
function fnShellWindowsJ()
{
var objShell = new ActiveXObject("shell.application");
var objShellWindows;
objShellWindows = objshell.Windows();
if (objShellWindows != null)
{
alert(objShellWindows.Count);
}
}
</script>
Vbscript:
<script language="VBScript">
function fnShellWindowsVB()
dim objShell
dim objShellWindows
set objShell = CreateObject("shell.application")
set objShellWindows = objshell.Windows
if (not objShellWindows is nothing) then
alert(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
Anforderungen
Anforderung | Wert |
---|---|
Unterstützte Mindestversion (Client) |
Windows 2000 Professional, Windows XP [nur Desktop-Apps] |
Unterstützte Mindestversion (Server) |
Windows 2000 Server [nur Desktop-Apps] |
Header |
|
IDL |
|
DLL |
|