Méthode FolderItem.InvokeVerb

Article
06/13/2023

Exécute un verbe sur l’élément.

Syntaxe

FolderItem.InvokeVerb(
  [ vVerb ]
)

Paramètres

vVerb [in, facultatif]

Type : Variant

Chaîne qui spécifie le verbe à exécuter. Il doit s’agir de l’une des valeurs retournées par la propriété FolderItemVerb.Name de l’élément . Si aucun verbe n’est spécifié, le verbe par défaut est appelé.

Valeur retournée

Cette méthode ne retourne pas de valeur.

Notes

Un verbe est une chaîne utilisée pour spécifier une action particulière prise en charge par un élément. Appeler un verbe revient à sélectionner une commande dans le menu contextuel d’un élément. En règle générale, l’appel d’un verbe lance une application associée. Par exemple, l’appel du verbe « ouvrir » sur un fichier .txt ouvre le fichier avec un éditeur de texte, généralement le Bloc-notes Microsoft. Pour plus d’informations sur les verbes, consultez Lancement d’applications .

L’objet FolderItemVerbs représente la collection de verbes associés à l’élément. Le verbe par défaut peut varier selon les éléments, mais il est généralement « ouvert ».

Exemples

L’exemple suivant utilise InvokeVerb pour appeler le verbe par défaut (« open » dans ce cas) sur le dossier Windows. Une utilisation correcte est indiquée pour JScript, VBScript et Visual Basic.

Jscript:

<script language="JScript">
    function fnFolderItemInvokeVerbJ()
    {
        var objShell = new ActiveXObject("shell.application");
        var objFolder2;
        var ssfWINDOWS = 36;
        
        objFolder2 = objShell.NameSpace(ssfWINDOWS);
        if (objFolder2 != null)
        {
            var objFolderItem;
            
            objFolderItem = objFolder2.Self;
            if (objFolderItem != null)
            {
                var szReturn;
                
                objFolderItem.InvokeVerb();
            }
        }
    }
</script>

Vbscript:

<script language="VBScript">
    function fnFolderItemInvokeVerbVB()
        dim objShell
        
        set objShell = CreateObject("shell.application")
        if (not objShell is nothing) then
            dim objFolder2
            dim ssfWINDOWS
                
            ssfWINDOWS = 36
            set objFolder2 = objShell.NameSpace(ssfWINDOWS)
            if (not objFolder2 is nothing) then
                dim objFolderItem
                        
                set objFolderItem = objFolder2.Self
                if (not objFolderItem is nothing) then
                    dim szReturn
                                
                    objFolderItem.InvokeVerb()
                end if
                set objFolderItem = nothing
            end if
            set objFolder2 = nothing
        end if
        set objShell = nothing
    end function
</script>

Visual Basic :

Private Sub fnFolderItemInvokeVerbVB()
    Dim objShell   As Shell
    Dim objFolder2 As Folder2
    Dim ssfWINDOWS As Long
    
    ssfWINDOWS = 36
    Set objShell = New Shell
    Set objFolder2 = objShell.NameSpace(ssfWINDOWS)
        If (Not objFolder2 Is Nothing) Then
            Dim objFolderItem As FolderItem
            
            Set objFolderItem = objFolder2.Self
                If (Not objFolderItem Is Nothing) Then
                    Dim szReturn As String
                    
                    objFolderItem.InvokeVerb
                Else
                    'FolderItem object returned nothing.
                End If
            Set objFolderItem = Nothing
        Else
            'Folder object returned nothing.
        End If
    Set objFolder2 = Nothing
    Set objShell = Nothing
End Sub

Spécifications

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	Shldisp.h
IDL	Shldisp.idl
DLL	Shell32.dll (version 4.71 ou ultérieure)

Voir aussi

FolderItem
Verbes et adverbes
DoIt

Share via