Metode ShellFolderItem.InvokeVerbEx

Menjalankan kata kerja pada item Shell.

Sintaks

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

Parameter

vVerb [in, opsional]

Jenis: Varian

Varian yang berisi string kata kerja yang sesuai dengan perintah yang akan dijalankan. Ini harus menjadi salah satu nilai yang dikembalikan oleh properti Nama item. Jika tidak ada kata kerja yang ditentukan, kata kerja default dijalankan.

vArgs [in, opsional]

Jenis: Varian

Varian yang terdiri dari string dengan satu atau beberapa argumen ke perintah yang ditentukan oleh vVerb. Format string ini tergantung pada kata kerja tertentu.

Keterangan

Kata kerja adalah string yang digunakan untuk menentukan tindakan tertentu yang didukung item. Biasanya, memanggil kata kerja meluncurkan aplikasi terkait. Misalnya, memanggil kata kerja yang terbuka pada file .txt biasanya membuka file dengan editor teks, biasanya Microsoft Notepad. Objek FolderItemVerbs mewakili kumpulan kata kerja yang terkait dengan item. Untuk diskusi lebih lanjut tentang kata kerja, lihat Meluncurkan Aplikasi.

Metode ini mirip dengan InvokeVerb, tetapi memungkinkan Anda untuk menentukan argumen ke perintah serta perintah itu sendiri.

Contoh

Contoh berikut menunjukkan penggunaan metode ini yang tepat di JScript, VBScript, dan Visual Basic.

Jscript:

<script language="JScript">
    function fnFolderItem2InvokeVerbExJ()
    {
        var objShell = new ActiveXObject("shell.application");
        var objFolder2;
        var ssfWINDOWS = 36;
        
        objFolder2 = objShell.NameSpace(ssfWINDOWS);
        if (objFolder2 != null)
        {
            var objFolderItem;
            
            objFolderItem = objFolder2.ParseName("NOTEPAD.EXE");
            if (objFolderItem != null)
            {
                objFolderItem.InvokeVerbEx("open", "c:\\autoexec.bat");
            }
        }
    }
</script>

Vbscript:

<script language="VBScript">
    function fnFolderItemInvokeVerbExVB()
        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
                    objFolderItem.InvokeVerbEx()
                end if
                set objFolderItem = nothing
            end if
            set objFolder2 = nothing
        end if
        set objShell = nothing
    end function
 </script>

Visual Basic:

Private Sub fnFolderItem2InvokeVerbExVB()
    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 objFolderItem2 As Object
            
            Set objFolderItem2 = objFolder2.ParseName("NOTEPAD.EXE")
                If (Not objFolderItem2 Is Nothing) Then
                    objFolderItem2.InvokeVerbEx ("open")
                Else
                    'FolderItem object returned nothing.
                End If
            Set objFolderItem2 = Nothing
        Else
            'Folder object returned nothing.
        End If
    Set objFolder2 = Nothing
    Set objShell = Nothing
End Sub

Persyaratan

Persyaratan Nilai
Klien minimum yang didukung
Windows 2000 Professional, Windows XP [hanya aplikasi desktop]
Server minimum yang didukung
Windows Server 2003 [hanya aplikasi desktop]
Header
Shldisp.h
IDL
Shldisp.idl
DLL
Shell32.dll (versi 5.0 atau yang lebih baru)

Lihat juga

ShellFolderItem

InvokeVerb