BrowseForFolder在Win98会报错？

Question

oPath = CreateObject("shell.application").BrowseForFolder(0, "", 0).Self.Path
说object doesn't support this property....
请问是怎么回事？
98下的shell32.dll是4.72版的。

Answer 1

BrowseForFolder Method Information：Minimum DLL version：
shell32.dll version 4.71 or later
Minimum operating systems:
Windows 2000, Windows NT 4.0 with Internet Explorer 4.0, Windows 98, Windows 95 with Internet Explorer 4.0

Answer 2

应该是你的调用有问题，参考：
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/shellcc/platform/shell/reference/objects/shell/browseforfolder.asp

Answer 3

Private Sub fnShellBrowseForFolderVB()
    Dim objShell   As Shell
    Dim ssfWINDOWS As Long
    Dim objFolder  As Folder
    
    ssfWINDOWS = 36
    Set objShell = New Shell
        Set objFolder = objShell.BrowseForFolder(0, "Example", 0, ssfWINDOWS)
            If (Not objFolder Is Nothing) Then
                'Add code here
            End If
        Set objFolder = Nothing
    Set objShell = Nothing
End Sub它返回的是一个folder，这是什么类型啊？我用了CreateObject("shell.application").BrowseForFolder(0, "", 0).Self.Path 返回字符串路径，好像.self.path不被98支持？