Метод FolderItems2.InvokeVerbEx
Выполняет команду в коллекции объектов FolderItem . Этот метод является расширением метода InvokeVerb , позволяя дополнительно управлять операцией с помощью набора флагов.
Синтаксис
iRetVal = FolderItems2.InvokeVerbEx(
[ vVerb ],
[ vArgs ]
)
Параметры
-
vVerb [in, необязательный]
-
Тип: Variant
Тип Variant со строкой глагола, соответствующей выполняемой команде. Если команда не указана, выполняется команда по умолчанию.
-
vArgs [in, необязательный]
-
Тип: Variant
Тип Variant, состоящий из строки с одним или несколькими аргументами для команды, заданной vVerb. Формат этой строки зависит от конкретной команды.
Комментарии
Глагол — это строка, используемая для указания определенного действия, связанного с элементом или коллекцией элементов. Как правило, при вызове команды запускается связанное приложение. Например, вызов команды open в файле .txt обычно открывает файл в текстовом редакторе, обычно в Блокноте Майкрософт. Дополнительные сведения о командах см. в разделе Запуск приложений.
Примеры
В следующем примере метод InvokeVerbEx используется для вызова команды по умолчанию ("открыть") на моем компьютере. Для JScript, VBScript и Visual Basic отображается правильное использование.
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
Требования
Требование | Значение |
---|---|
Минимальная версия клиента |
Windows 2000 Professional, Windows XP [только классические приложения] |
Минимальная версия сервера |
Windows Server 2003 [только классические приложения] |
Заголовок |
|
IDL |
|
DLL |
|
См. также раздел