ShellWindows.Item, méthode
Récupère un objet InternetExplorer qui représente la fenêtre Shell.
retVal = ShellWindows.Item(
[ iIndex ]
)
-
iIndex [in, facultatif]
-
Type : Variant
Index de base zéro de l'élément à récupérer. Cette valeur doit être inférieure à la valeur de la propriété Count . Si cette valeur est omise, une valeur par défaut de 0 est utilisée.
Type : IDispatch**
Référence d’objet à l’objet InternetExplorer qui représente la fenêtre Shell.
L’exemple suivant utilise Item pour récupérer l’objet InternetExplorer qui représente le premier élément de fenêtre Shell. Une utilisation correcte est indiquée pour JScript, VBScript et Visual Basic.
Jscript:
<script language="JScript">
function fnShellWindowsItemJ()
{
var objShell = new ActiveXObject("shell.application");
var objShellWindows;
objShellWindows = objshell.Windows();
if (objShellWindows != null)
{
var objIE;
objIE = objShellWindows.Item();
if (objIE != null)
{
alert(objIE.path());
}
}
}
</script>
Vbscript:
<script language="VBScript">
function fnShellWindowsItemVB()
dim objShell
dim objShellWindows
set objShell = CreateObject("shell.application")
set objShellWindows = objshell.Windows()
if (not objShellWindows is nothing) then
dim objIE
set objIE = objShellWindows.Item
if (not objIE is nothing) then
Wscript.Echo objIE.path
end if
set objIE = nothing
end if
set objShellWindows = nothing
set objShell = nothing
end function
</script>
Visual Basic :
Private Sub fnShellWindowsItemVB()
Dim objShell As Shell
Dim objShellWindows As ShellWindows
Set objShell = New Shell
Set objShellWindows = objshell.Windows()
If (Not objShellWindows Is Nothing) Then
Dim objIE As InternetExplorer
Set objIE = objShellWindows.Item
If (Not objIE Is Nothing) Then
Debug.Print objIE.Path
End If
Set objIE = Nothing
End If
Set objShellWindows = Nothing
Set objShell = Nothing
End Sub
Condition requise | Valeur |
---|---|
Client minimal pris en charge |
Windows 2000 Professionnel, Windows XP [applications de bureau uniquement] |
Serveur minimal pris en charge |
Windows 2000 Server [applications de bureau uniquement] |
En-tête |
|
DLL |
|