Metodo ShellFolderItem.InvokeVerbEx
Esegue un verbo su un elemento shell.
Sintassi
iRetVal = ShellFolderItem.InvokeVerbEx(
[ vVerb ],
[ vArgs ]
)
Parametri
-
vVerb [in, facoltativo]
-
Tipo: Variant
Valore Variant contenente la stringa verbo corrispondente al comando da eseguire. Deve essere uno dei valori restituiti dalla proprietà Name dell'elemento. Se non viene specificato alcun verbo, viene eseguito il verbo predefinito.
-
vArgs [in, facoltativo]
-
Tipo: Variant
Valore Variant costituito da una stringa con uno o più argomenti per il comando specificato da vVerb. Il formato di questa stringa dipende dal verbo specifico.
Commenti
Un verbo è una stringa utilizzata per specificare una particolare azione supportata da un elemento. In genere, la chiamata di un verbo avvia un'applicazione correlata. Ad esempio, la chiamata al verbo aperto in un file di .txt apre normalmente il file con un editor di testo, in genere il Blocco note Microsoft. L'oggetto FolderItemVerbs rappresenta l'insieme di verbi associati all'elemento. Per altre informazioni su verbi, vedere Avvio di applicazioni.
Questo metodo è simile a InvokeVerb, ma consente di specificare argomenti per il comando e il comando stesso.
Esempio
Negli esempi seguenti viene illustrato l'uso corretto di questo metodo in JScript, VBScript e 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
Requisiti
Requisito | Valore |
---|---|
Client minimo supportato |
Windows 2000 Professional, Windows XP [solo app desktop] |
Server minimo supportato |
Windows Server 2003 [solo app desktop] |
Intestazione |
|
IDL |
|
DLL |
|
Vedi anche