Método ShellFolderItem.InvokeVerbEx
Ejecuta un verbo en un elemento de Shell.
Sintaxis
iRetVal = ShellFolderItem.InvokeVerbEx(
[ vVerb ],
[ vArgs ]
)
Parámetros
-
vVerb [in, optional]
-
Tipo: Variant
Variant que contiene la cadena de verbo que corresponde al comando que se va a ejecutar. Debe ser uno de los valores devueltos por la propiedad Name del elemento. Si no se especifica ningún verbo, se ejecuta el verbo predeterminado.
-
vArgs [in, optional]
-
Tipo: Variant
Variant que consta de una cadena con uno o varios argumentos para el comando especificado por vVerb. El formato de esta cadena depende del verbo concreto.
Comentarios
Un verbo es una cadena que se usa para especificar una acción determinada que admite un elemento. Normalmente, llamar a un verbo inicia una aplicación relacionada. Por ejemplo, al llamar al verbo abierto en un archivo de .txt normalmente se abre el archivo con un editor de texto, normalmente el Bloc de notas de Microsoft. El objeto FolderItemVerbs representa la colección de verbos asociados al elemento. Para obtener más información sobre los verbos, consulte Inicio de aplicaciones.
Este método es similar a InvokeVerb, pero permite especificar argumentos en el comando, así como en el propio comando.
Ejemplos
En los ejemplos siguientes se muestra el uso adecuado de este método en JScript, VBScript y 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
Requisitos
Requisito | Value |
---|---|
Cliente mínimo compatible |
Windows 2000 Professional, Windows XP [solo aplicaciones de escritorio] |
Servidor mínimo compatible |
Windows Server 2003 [solo aplicaciones de escritorio] |
Encabezado |
|
IDL |
|
Archivo DLL |
|
Consulte también