FolderItems2.InvokeVerbEx-metod

Kör en verb på en samling FolderItem-objekt . Den här metoden är ett tillägg till metoden InvokeVerb , vilket ger ytterligare kontroll över åtgärden via en uppsättning flaggor.

Syntax

iRetVal = FolderItems2.InvokeVerbEx(
  [ vVerb ],
  [ vArgs ]
)

Parameterar

vVerb [in, valfritt]

Typ: Variant

En variant med strängen verb som motsvarar kommandot som ska köras. Om inget verb anges körs standardvärdet verb .

vArgs [in, valfritt]

Typ: Variant

En variant som består av en sträng med ett eller flera argument till kommandot som anges av vVerb. Formatet för den här strängen beror på den specifika verb.

Anmärkningar

A verb är en sträng som används för att ange en viss åtgärd som är associerad med ett objekt eller en samling objekt. Normalt startar anrop av ett verb relaterat program. Om du till exempel anropar openverb filen på en .txt öppnas filen normalt med en textredigerare, vanligtvis Microsoft Notepad. Mer information om verb finns i Starta program.

Exempel

I följande exempel används InvokeVerbEx för att anropa standardvärdet verb ("open") på min dator. Korrekt användning visas för JScript, VBScript och Visual Basic.

JScript:

<script language="JScript">
    function fnFolderItems2InvokeVerbExJ()
    {
        var objShell  = new ActiveXObject("shell.application");
        var objFolder;
        var ssfDRIVES = 17;
        
        objFolder = objShell.NameSpace(ssfDRIVES);
        if (objFolder != null)
        {
            var objFolderItems2;
            
            objFolderItems2 = objFolder.Items();
            if (objFolderItems2 != null)
            {
                objFolderItems2.InvokeVerbEx();
            }
        }
    }
</script>

VBScript:

<script language="VBScript">
    function fnFolderItems2InvokeVerbExVB()
        dim objShell
        
        set objShell = CreateObject("shell.application")
        if (not objShell is nothing) then
            dim objFolder
            dim ssfDRIVES
                
            ssfWINDOWS = 17
            set objFolder = objShell.NameSpace(ssfWINDOWS)
            if (not objFolder is nothing) then
                dim objFolderItems2
                        
                set objFolderItems2 = objFolder.Items()
                if (not objFolderItems2 is nothing) then
                    objFolderItems2.InvokeVerbEx
                end if
                set objFolderItems2 = nothing
            end if
            set objFolder = nothing
        end if
        set objShell = nothing
    end function
</script>

Visual Basic:

Private Sub fnFolderItems2InvokeVerbExVB()
    Dim objShell      As Shell
    Dim objFolder     As Folder2
    Dim ssfDRIVES     As Long
    
    ssfDRIVES = 17
    Set objShell = New Shell
    Set objFolder = objShell.NameSpace(ssfDRIVES)
        If (Not objFolder Is Nothing) Then
            Dim objFolderItems2 As FolderItems
            
            Set objFolderItems2 = objFolder.Items
                If (Not objFolderItems2 Is Nothing) Then
                    objFolderItems2.InvokeVerbEx
                End If
            Set objFolderItems2 = Nothing
        End If
    Set objFolder = Nothing
    Set objShell = Nothing
End Sub

Kravspecifikation

Krav	Värde
Lägsta klient som stöds	Windows 2000 Professional, Windows XP [endast skrivbordsappar]
Lägsta server som stöds	Windows Server 2003 [endast skrivbordsappar]
Rubrik	Shldisp.h
IDL	Shldisp.idl
DLL	Shell32.dll (version 5.0 eller senare)

Se även

FolderItems2

InvokeVerb