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