vb FTP 中 如何判断 该文件是文件还是文件夹? 最好提供下思路,有源码最好

解决方案 »

  1.   

    用API遍历ftp上的某个文件夹,获取到的每个项目都是一个WIN32_FIND_DATA结构体,即:
    Type WIN32_FIND_DATA
        dwFileAttributes As Long
        ftCreationTime As FILETIME
        ftLastAccessTime As FILETIME
        ftLastWriteTime As FILETIME
        nFileSizeHigh As Long
        nFileSizeLow As Long
        dwReserved0 As Long
        dwReserved1 As Long
        cFileName As String * MAX_PATH
        cAlternate As String * 14
    End Type
    里面的dwFileAttributes是以下常数值或者是其组合:
    Public Const FILE_ATTRIBUTE_READONLY = &H1
    Public Const FILE_ATTRIBUTE_HIDDEN = &H2
    Public Const FILE_ATTRIBUTE_SYSTEM = &H4
    Public Const FILE_ATTRIBUTE_DIRECTORY = &H10
    Public Const FILE_ATTRIBUTE_ARCHIVE = &H20
    Public Const FILE_ATTRIBUTE_NORMAL = &H80
    Public Const FILE_ATTRIBUTE_TEMPORARY = &H100
    Public Const FILE_ATTRIBUTE_COMPRESSED = &H800
    Public Const FILE_ATTRIBUTE_OFFLINE = &H1000可以把dwFileAttributes与FILE_ATTRIBUTE_DIRECTORY按位运算,即:if dwFileAttributes and FILE_ATTRIBUTE_DIRECTORY<>0 then '这个是文件夹,否则是文件