Folder.ParseName 方法
创建并返回一个代表指定项的 FolderItem 对象。
语法
retVal = Folder.ParseName(
bName
)
parameters
-
bName [in]
-
类型: BSTR
一个指定项名称的字符串。
返回值
类型: FolderItem**
对 FolderItem 对象的对象引用。
备注
ParseName 不应用于虚拟文件夹,例如“我的文档”。
示例
以下示例使用 ParseName 创建一个对象,该对象表示 C:\Windows 文件夹中Clock.avi文件夹项。 显示 JScript、VBScript 和 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
要求
要求 | 值 |
---|---|
最低受支持的客户端 |
Windows 2000 专业版、Windows XP [仅限桌面应用] |
最低受支持的服务器 |
Windows 2000 Server [仅限桌面应用] |
标头 |
|
IDL |
|
DLL |
|