FolderItems2.InvokeVerbEx-Methode
Führt ein Verb für eine Auflistung von FolderItem-Objekten aus. Diese Methode ist eine Erweiterung der InvokeVerb-Methode , die zusätzliche Kontrolle des Vorgangs über eine Reihe von Flags ermöglicht.
Syntax
iRetVal = FolderItems2.InvokeVerbEx(
[ vVerb ],
[ vArgs ]
)
Parameter
-
vVerb [in, optional]
-
Typ: Variant
Ein Variant-Wert mit der Verbzeichenfolge, die dem auszuführenden Befehl entspricht. Wenn kein Verb angegeben wird, wird das Standardverb ausgeführt.
-
vArgs [in, optional]
-
Typ: Variant
Ein Variant-Wert , der aus einer Zeichenfolge mit einem oder mehreren Argumenten für den von vVerb angegebenen Befehl besteht. Das Format dieser Zeichenfolge hängt vom jeweiligen Verb ab.
Bemerkungen
Ein Verb ist eine Zeichenfolge, die verwendet wird, um eine bestimmte Aktion anzugeben, die einem Element oder einer Auflistung von Elementen zugeordnet ist. In der Regel startet der Aufruf eines Verbs eine verwandte Anwendung. Wenn Sie z. B. das geöffnete Verb in einer .txt-Datei aufrufen, wird die Datei normalerweise mit einem Text-Editor geöffnet, in der Regel Microsoft Editor. Weitere Informationen zu Verben finden Sie unter Starten von Anwendungen.
Beispiele
Im folgenden Beispiel wird InvokeVerbEx verwendet, um das Standardverb ("open") auf Meinem Computer aufzurufen. Die ordnungsgemäße Verwendung wird für JScript, VBScript und Visual Basic angezeigt.
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
Anforderungen
Anforderung | Wert |
---|---|
Unterstützte Mindestversion (Client) |
Windows 2000 Professional, Windows XP [nur Desktop-Apps] |
Unterstützte Mindestversion (Server) |
Windows Server 2003 [nur Desktop-Apps] |
Header |
|
IDL |
|
DLL |
|
Siehe auch