Método FolderItem.InvokeVerb
Ejecuta un verbo en el elemento.
Sintaxis
FolderItem.InvokeVerb(
[ vVerb ]
)
Parámetros
-
vVerb [in, optional]
-
Tipo: Variant
Cadena que especifica el verbo que se va a ejecutar. Debe ser uno de los valores devueltos por la propiedad FolderItemVerb.Name del elemento. Si no se especifica ningún verbo, se invocará el verbo predeterminado.
Valor devuelto
Este método no devuelve ningún valor.
Comentarios
Un verbo es una cadena que se usa para especificar una acción determinada que admite un elemento. Invocar un verbo equivale a seleccionar un comando en el menú contextual de un elemento. Normalmente, al invocar un verbo se inicia una aplicación relacionada. Por ejemplo, al invocar el verbo "abrir" en un archivo .txt se abre el archivo con un editor de texto, normalmente el Bloc de notas de Microsoft. Consulte Inicio de aplicaciones para obtener más información sobre los verbos.
El objeto FolderItemVerbs representa la colección de verbos asociados al elemento. El verbo predeterminado puede variar para distintos elementos, pero normalmente es "abierto".
Ejemplos
En el ejemplo siguiente se usa InvokeVerb para invocar el verbo predeterminado ("open" en este caso) en la carpeta Windows. Se muestra un uso adecuado para JScript, VBScript y 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
Requisitos
Requisito | Value |
---|---|
Cliente mínimo compatible |
Windows 2000 Professional, Windows XP [solo aplicaciones de escritorio] |
Servidor mínimo compatible |
Windows 2000 Server [solo aplicaciones de escritorio] |
Encabezado |
|
IDL |
|
Archivo DLL |
|
Consulte también