Metodo Folder.ParseName

Articolo
06/13/2023

Crea e restituisce un oggetto FolderItem che rappresenta un elemento specificato.

Sintassi

retVal = Folder.ParseName(
  bName
)

Parametri

bName [in]

Tipo: BSTR

Stringa che specifica il nome dell'elemento.

Valore restituito

Tipo: FolderItem**

Riferimento all'oggetto FolderItem .

Commenti

ParseName non deve essere usato per le cartelle virtuali, ad esempio Documenti personali.

Esempio

Nell'esempio seguente viene usato ParseName per creare un oggetto che rappresenta l'elemento della cartella Clock.avi nella cartella C:\Windows. L'utilizzo appropriato viene visualizzato per JScript, VBScript e Visual Basic.

Jscript:

<script language="JScript">
    function fnFolderObjectParseNameJ()
    {
        var objShell  = new ActiveXObject("shell.application");
        var objFolder = new Object;
        
        objFolder = objShell.NameSpace("C:\\WINDOWS");
        if (objFolder != null)
        {
            var objFolderItem = new Object;
            
            objFolderItem = objFolder.ParseName("clock.avi");
            if (objFolderItem != null)
            {
                //Add code here.
            }
        }
    }
</script>

Vbscript:

<script language="VBScript">
    function fnFolderObjectParseNameVB()
        dim objShell
        dim objFolder
        
        set objShell = CreateObject("shell.application")
        set objFolder = objShell.NameSpace("C:\WINDOWS")

        if (not objFolder is nothing) then
            dim objFolderItem
            
            set objFolderItem = objFolder.ParseName("clock.avi")

            if (not objFolderItem is nothing) then
                'Add code here.
            end if
        end if

        set objFolder = nothing
        set objShell = nothing
    end function
</script>

Visual Basic:

Private Sub btnParseName_Click()
    Dim objShell  As Shell
    Dim objFolder As Folder

    Set objShell = New Shell
    Set objFolder = objShell.NameSpace("C:\WINDOWS")

    If (Not objFolder Is Nothing) Then
        Dim objFolderItem As FolderItem
        
        Set objFolderItem = objFolder.ParseName("clock.avi")
            'Add code here.
            Debug.Print "passed"
        Set objFolderItem = Nothing
    End If

    Set objFolder = Nothing
    Set objShell = Nothing
End Sub

Requisiti

Requisito	Valore
Client minimo supportato	Windows 2000 Professional, Windows XP [solo app desktop]
Server minimo supportato	Windows 2000 Server [solo app desktop]
Intestazione	Shldisp.h
IDL	Shldisp.idl
DLL	Shell32.dll (versione 4.71 o successiva)

Condividi tramite