Propriété FolderItemVerb.Name
Contient le nom du verbe.
Cette propriété est en lecture seule.
Syntaxe
strName = FolderItemVerb.Name
Valeur de la propriété
Variable de type BSTR qui reçoit la propriété Name.
Exemples
L’exemple suivant utilise Name pour récupérer le nom du premier élément de la collection de verbes à laquelle le dossier de programme de l’utilisateur répond. l’utilisation appropriée est indiquée pour JScript, VBScript et Visual Basic.
JScript :
<script language="JScript">
function fnFolderItemVerbNameJ()
{
var objShell = new ActiveXObject("shell.application");
var objFolder;
var ssfPROGRAMS = 2;
objFolder = objShell.NameSpace(ssfPROGRAMS);
if (objFolder != null)
{
var objVerbs;
objVerbs = objFolder.Self.Verbs();
if (objVerbs != null)
{
var szReturn = "";
szReturn = objVerbs.Item(0).Name;
alert(szReturn);
}
}
}
</script>
VBScript
<script language="VBScript">
function fnFolderItemVerbNameVB()
dim objShell
set objShell = CreateObject("shell.application")
if (not objShell is nothing) then
dim objFolder
dim ssfPROGRAMS
ssfPROGRAMS = 2
set objFolder = objShell.NameSpace(ssfPROGRAMS)
if (not objFolder is nothing) then
dim objVerbs
set objVerbs = objFolder.Self.Verbs
if (not objVerbs is nothing) then
dim szReturn
szReturn = objVerbs.Item(0).Name
alert(szReturn)
end if
set objVerbs = nothing
end if
set objFolder = nothing
end if
set objShell = nothing
end function
</script>
Visual Basic :
Private Sub fnFolderItemVerbNameVB()
Dim objShell As Shell
Dim objFolder2 As Folder2
Dim ssfPROGRAMS As Long
ssfPROGRAMS = 2
Set objShell = New Shell
Set objFolder2 = objShell.NameSpace(ssfPROGRAMS)
If (Not objFolder2 Is Nothing) Then
Dim objVerbs As FolderItemVerbs
Set objVerbs = objFolder2.Self.Verbs
If (Not objVerbs Is Nothing) Then
Dim szReturn As String
szReturn = objVerbs.Item(0).Name
Debug.Print szReturn
End If
Set objVerbs = Nothing
End If
Set objFolder2 = Nothing
Set objShell = Nothing
End Sub
Spécifications
| Condition requise | Valeur |
|---|---|
| Client minimal pris en charge |
Windows 2000 Professional, Windows XP [ desktop apps uniquement] |
| Serveur minimal pris en charge |
Windows 2000 Server - [Applications de bureau uniquement] |
| En-tête |
|
| MIDL |
|
| DLL |
|